dim testpic as pictureset testpic=loadpicture("i:\my.ico")
set picture1.picture=testpic
picture1.autosize=true
picture1.refresh
savepicture picture1.image, "i:\my.bmp"
set picture1.picture=testpic
picture1.autosize=true
picture1.refresh
savepicture picture1.image, "i:\my.bmp"
解决方案 »
- VB窗体置顶问题
- 关于继承窗口的句柄问题(高手进来)
- 请问怎样删除注册表有键值的项.谢谢各位了
- 高难度算法征解,分不够再加
- 谁愿意教我学vb呀,我9月要考试, 现在基本什么都还是模糊的
- 请问谁了解Word中的Mail Merge 。。在VB程序中又如何调用Mail Merge文档呢??
- 超级难题!!!关于ActiveX Exe的Thread Model设置问题
- 关于appendchunk的问题!
- 请问vb高手
- Winsock.SendData发字节数组,如何不发末尾的0?
- 如何出现ADO的最新引用?急!!!
- ★★★☆☆☆高手请进:哪位大哥有锁死键盘鼠标(win2000系统)的控件或是有什么好的办法(锁不住ALT+CTRL+DEL也没有关系)??
不可能存在颜色的丢失呀,另外,SavePicture 好像应该这样的。我是这样实现的,SavePicture PicBox.Picture, bmpFileName