strTemp="C:\My Documents\My Pictures\a" & a & ".jpg"
Picture1.Picture = LoadPicture(strTemp)
Picture1.Picture = LoadPicture(strTemp)
解决方案 »
- 高分急求图片放大拖动的解决方案
- 使用API函数将TreeView控件背景颜色改变后, 当节点展开时,左边的颜色还为白色, 请高手帮忙?????
- 有谁知道为什么我用DEPHI写的COM,在ASP中一调用就好像被锁住了?????
- 在线等待解决:如何处理没安装控件错误???
- 一个串口通信的问题
- 如何使一个窗体全屏幕显示????(和屏幕一样大)
- 请教VBA中treeview的用法
- VB、VC、Delphi什么才是我的选择??
- 请成都的vb朋友编一公司用的进帐,出帐系统
- 求教各位大佬VB,三个整数从大到小排序,哪有问题啊?(系统说是没给变量)
- 关于MSDN帮助问题
- 如何禁止底部任务栏最小化窗口中使用右键。
Case 1
a=""
Case 2
a="1"
Case 3
a="2"
Case 4
a="3"
End Select
strTemp="C:\My Documents\My Pictures\a" & a & ".jpg"
Picture1.Picture = LoadPicture(strTemp)