1樓：
假設你的**路徑為d:\fafa.gif,**如下：
private sub form_click()picture1.picture = iif(picture1.picture = loadpicture(""), loadpicture("d:
\fafa.gif"), loadpicture(""))
end sub
這樣就可以單擊切換**了，對了，你要加一個**框控制元件，再寫入**
2樓：
首先新增一個窗體，在這個窗體上加一個文字框的控制元件，在這個文字框的單擊事件中寫如下的程式：
'新增image1、file1、list1控制元件各一個
vb編寫程式：設計一個程式，當單擊窗體時，在窗體上顯示任意一幅**。
3樓：
假設你的**路徑為d:\fafa.gif,**如下：
private sub form_click()picture1.picture = iif(picture1.picture = loadpicture(""), loadpicture("d:
\fafa.gif"), loadpicture(""))
end sub
這樣就可以單擊切換**了，對了，你要加一個**框控制元件，再寫入**
4樓：麥兜
'新增image1、file1、list1控制元件各一個
5樓：手機使用者
.com
壓縮包中有4個目錄
1中是 前兩個sya_1,sya_3
2中是 後面接著的三個sya_1,sya_2,sya_3三角形 就是判斷三角形的
隨機數 就是生成隨機數並判斷的。
請給分，謝謝！！
編寫一窗體程式，在窗體上顯示一段文字“歡迎學習vb程式設計！”。當單擊窗體時，
6樓：匿名使用者
private sub form_click()label1.font = "黑體"
label1.fontsize = "22"
label1.forecolor = vbredlabel1.left = 0.
5 * form1.widthlabel1.top = 0.
5 * form1.heightend sub
private sub form_load()label1.caption = "歡迎學習vb程式設計內"
end sub
private sub form_dblclick()label1.font = "隸書
容"label1.fontsize = "22"
label1.forecolor = vbbluelabel1.left = 0
label1.top = 0
end sub
vb,執行下面程式，當單擊窗體時，窗體上顯示的內容的第一行是( )，第二行是 ( )。
7樓：匿名使用者
單擊窗體後，呼叫子程式test 並給以引數2即此時x=2
執行x=x*2+1後x的值變為5
執行判斷語句，由於x<6執行call test(x)語句，即子再次呼叫自己（遞迴過程）此時傳給的引數為5
執行x=x*2+1後x的值變為11,
執行判斷語句，由於x>0，不再執行call test(x)語句，而執行end if 後的語句，即x=x*2+1,x的值變為23，接著執行form1.print x語句，在窗體上輸出x，即23（所以第一行顯示23）
第二次呼叫的子過程結束，回到第一次呼叫的子程式，繼續執行end if 後的語句，即x=x*2+1,x的值變為47，接著執行form1.print x語句，在窗體上輸出x，即47（所以第二行顯示47）
第一次呼叫的子程式結束
8樓：匿名使用者
窗體上顯示的內容的第一行是(23)，第二行是 (47)。
編寫程式當單擊窗體時用輸入框（inputbox函式）輸入自然數，判斷是否“正數”“負數”或“0”，並
private sub command1 click a inputbox 輸入號碼 if a 0 then msgbox 正數 elseif a 0 then msgbox 負數 elseif a 0 then msgbox 0 end if end sub 就這麼簡單 純手打 a inputbo...
用VB編寫程序，用VB編寫程式
首先，用vb畫出介面圖，那些按鈕控制項，每個按鈕空間都要實現什麼功能，這個你自己心裡要有數，然後給按鈕編 你要具體點，別人才好回答你！我也是用這個,很好用的,目前沒發現病毒 vb程式編寫 用vb編寫程式 怎樣用vb編寫程式從鍵盤上輸入10個數求平均值 怎麼用vb編寫乙個exe檔案？1 執行vb6.0...
使用者用vb編寫程式 輸入年份和月份，程式能夠判斷其是否是閏年，那個季節，這個月多少天
將以下內容復到記事本中 然後 儲存為 form1.frm version 5.00 begin vb.form form1 caption form1 clientheight 4830 clientleft 60 clienttop 450 clientwidth 8325 linktopic f...