作者capslook1218 (努力向上..封棋..)
看板Visual_Basic
标题[VB6 ] 开启图片档案
时间Wed Mar 21 12:46:44 2007
我要做开启图片档案
可是不知道为啥做不出来
是因为我的语法错了吗??
还是说要改成open的方式来开启...
试过了但是一样没办法开
以下附上我的source code
先谢谢大家的回答噜
感谢
Private Sub Command2_Click()
CommonDialog1.FileName = "chocolate"
CommonDialog1.InitDir = App.Path
CommonDialog1.Filter = "图片档(*.jpg)|*.jpg|所有档案(*.)|*."
CommonDialog1.ShowOpen
If CommonDialog1.FileName = "chocolate" Then
Exit Sub
Else
Picture1.picture = CommonDialog1.FileName
End If
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.136.150.91
1F：→ tpjobp:Picture1.picture =LoadPicture(CommonDialog1.FileName) 03/21 13:28
2F：→ capslook1218:okok....谢啦... 03/21 13:58