重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
只需要用变量存储 Image 对象,然后不需要的时候释放掉就行了。
创新互联长期为千余家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为丹徒企业提供专业的成都网站设计、成都网站建设,丹徒网站改版等技术服务。拥有十载丰富建站经验和众多成功案例,为您定制开发。
Dim img1 As Image
img1 = Image.FromFile(pic)
PictureBox1.Image = img1
'窗口关闭时
img1 = Nothing
如满意,请采纳。
1)首先你的程序是从form1开始的,这个时候并没有一个form2存在,所以要新建一个form2类型的对象。另外要看到form2的话,还要加一句 newform2.show()。
2)这里 objx=x 只是增加对对象的一个引用,并不是新建了一个objx对象,所以objx就相当于 x ,也就是picturebox1 。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'建立新的系统进程
Dim process As New System.Diagnostics.Process()
If RadioButton1.Checked Then
'设置文件名,此处为图片的真实路径+文件名
process.StartInfo.FileName = "c:\a.bmp"
'设置进程运行参数
process.StartInfo.Arguments = "rundll32.exe shimgvw.dll"
Else
process.StartInfo.FileName = "mspaint.exe"
process.StartInfo.Arguments = "c:\a.bmp"
End If
'此项为是否使用Shell执行程序,因系统默认为true,此项也可不设,但若设置必须为true
'process.StartInfo.UseShellExecute = True
'此处可以更改进程所打开窗体的显示样式,可以不设
'process.StartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden
process.Start()
process.Close()
End Sub
贴代码啊,贴上加载两个图片框的代码,有代码才知道你加载图片时错在那里.下回提问要详细周全,碰到了就回一下,但问题资料提供不全面会浪费时间也会浪费一个别人回答的机会,因为等你再提供更多资料时能回答的人就不一定在线了.下回再看到你这问题不知道等到什么时候了...