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)。
用Java編寫程式,設計模擬電梯執行的類
趣事情 最佳答案 如下 public class elevatormodel implenent elevatormodellistener public abstract class location public class floor extends location public class...
vb 編寫編寫程式,輸出由1,2,3,4,5,6這數字組
dim a dim temp as string dim n as integer dim i,j,k,t,y,u as integera split 1,2,3,4,5,6 temp n ubound a dim cou as integer 0if trim a ubound a then n ...
VB程式設計好學嗎,電腦程式設計好學嗎?
程式設計好學,就是要多練習,抱書本不行。主要是就是邏輯,你的邏輯思維很嚴謹,發散型思維很強,就能編出好東西,數學基礎好對程式設計有很大幫助。至於哪門語言,這要看你打算開發哪種型別的。無論開發哪方面,要有很好的程式設計思想。至於用什麼語言來編,拿本書看看再練練就會了。不用把主要精力放到學習具體的某個語...