1樓:橡皮樹的部落格
option explicit
private sub dir1_change()file1.path = dir1.pathend sub
private sub drive1_change()dir1.path = drive1.driveend sub
private sub file1_click()dim f as string
f = file1.path
if right(f, 1) <> "\" then f = f & "\"
f = f & file1.filenamelabel1 = f
picture1.picture = loadpicture(f)end sub
private sub form_load()drive1.drive = "d:\"
end sub
跪求高手幫忙解決VB問題,vb問題,高手幫忙!謝謝
哈哈哈,既然不可以用變數也不可以用第三個框,那就只可以用窗體來當中轉了哈 建一個command private sub command1 click set picture picture1.picturepicture1.picture picture2.picture picture2.pict...
求愛中遇到的問題,求高手解答小弟謝謝了
你喜歡她,她也喜歡你。首先,我不是高手。其次,我覺得任何問題都得問自己。假設你按照我們的方法做了?就是假設之後我先不說 他是你最初的想法嗎?我的建議就是,自己怎麼想的怎麼來 就ok了 基本的一些注意事項就是 必須尊重女方的想法 其次加油!首先她是喜歡你的。喜歡你,但不是說一個月的交往就答應做你的女朋...
VB求解啊 急,求用VB解答
dim p as integer 用 框控制元件陣列。private sub form load 給3個 框裝載影象。picture1 0 picture loadpicture c picture1 1 picture loadpicture c picture1 2 picture loadpi...