189 8069 5689
'先建立一个bitmap对象，指向图像文件
10年的萝北网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。全网营销推广的优势是能够根据用户设备显示端的尺寸不同，自动调整萝北建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联从事“萝北网站设计”,“萝北网站推广”以来，每个客户项目都认真落实执行。
Dim pic As Bitmap = New Bitmap("e:\1.jpg")
'定义一个图片框的graphics对象
Dim g As Graphics = PictureBox1.CreateGraphics()
'在图片框上绘图
g.DrawImage(pic, 0, 0, pic.Width, pic.Height)
'释放bitmap对象
pic.Dispose()
'现在即可对文件进行操作
没懂，脑补一下是在textbox1中显示1.txt的部分内容，在textbox2中输入textbox1显示的内容，直至手工“复制”完textbox1的内容。然后textbox1加载随后的部分内容。
求追问。
很简单，点击菜单“项目”--“WindowsApplication1属性”
在属性面板里点“资源”，这里可添加字符串资源、图片资源、多媒体资源等等。
使用资源很简单，举例如下：
Label1.Text = My.Resources.String1
PictureBox1.Image = My.Resources.小猫
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
FileOpen(1, "d:\python\hello.txt", OpenMode.Input, OpenAccess.Read)
While Not EOF(1)
ComboBox1.Items.Add(LineInput(1))
End While
FileClose(1)
End Sub