重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
换个目录试试,系统盘user目录权限较高。然后关闭杀毒软件试试。
专注于为中小企业提供网站设计制作、成都网站设计服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业宛城免费做网站提供优质的服务。我们立足成都,凝聚了一批互联网行业人才,有力地推动了成百上千企业的稳健成长,帮助中小企业通过网站建设实现规模扩充和转变。
可以将文件等分成两部分,分别用两个private读取就是2线程。
内存解决方案:不要等程序自动GC,自己手动释放不需要内存。
缺陷:可能会浪费时间。
只需要用变量存储 Image 对象,然后不需要的时候释放掉就行了。
Dim img1 As Image
img1 = Image.FromFile(pic)
PictureBox1.Image = img1
'窗口关闭时
img1 = Nothing
如满意,请采纳。
文件打开后使用完要及时关闭。
未关闭,这样再打开就显示处于被占用状态。