1樓：匿名使用者
1全部private sub dir1_change()file1.path = dir1.pathend sub
private sub drive1_change()dir1.path = drive1.driveend sub
private sub file1_click()image1.picture = loadpicture(dir1.path & "\" & file1.
filename, 0, 0)
end sub
private sub dir1_change()file1.path = dir1.pathend sub
private sub drive1_change()dir1.path = drive1.driveend sub
private sub file1_click()image1.picture = loadpicture(dir1.path & "\" & file1.
filename, 0, 0)
end sub望採納
2樓：愛問西瓜愛答樹
用commondialog這個控制元件會好點。。
在選單欄的工程的部件中選擇。。這個控制元件就是開啟一個檔案，並返回路徑的，不需要用drive.dir.file..這些控制元件。這些控制元件是做遍歷才有用的。。
求用VB做記事本的簡單程式，求用VB做一個記事本的簡單程式
private sub cmd open click dim filen freef t cmd dlg.filter 文字 抄檔案 txt txt cmd dlg.cancelerror trueon error goto endsub cmd dlg.showopen freef freefil...
新手學C語言，求高手指點此程式執行過程，mainint iInt a 101,1For i 2 i10 ia
main a 0 1,a 1 1for i 2 i 10 i 每一項是前兩項之和 a 2 a 1 a 0 a 3 a 2 a 1 a 4 a 3 a 2 a 9 a 8 a 7 a i a i 1 a i 2 for i 0 i 10 i 輸出前十項,懂了嗎 這是求斐波那契數列的前十個數字 1 1 ...
蘇教版五年級上冊語文練習冊有一題不會做，求學霸們看看
挑的我頭昏眼花。寬的一輛汽車都能過去。五年級下冊蘇教版語文練習冊答案 蘇教版五年級上冊的語文練習冊第六單元的全部答案 考慮考慮柯俊 胡老師，打擾一下。我今天的語文家作沒有看，請您能不能發條簡訊寫一下？ 自己做不能告訴你抱歉 誰知道五年級。上冊。蘇教版的默寫能手。練習冊中的練習五，答案是什麼？250 ...