1樓:匿名使用者
如果你是在程式執行的時候儲存就簡單.
只要你把該視窗關閉時不是"關閉",而是"隱藏"就行了.
private sub form_queryunload(cancel as integer, unloadmode as integer)
cancel = 1
me.visible = false
end sub
當需要顯示時
要顯示的窗體名.visible=true
就行了.
窗體上的東西就不會丟了.
2樓:李龍華空間
1.我認為樓上的說得不對。
2。這是可以的,不過你要加幾行**的。
3。在check裡有預設值的設定啊,value吧
vb中option和check控制元件怎麼讓她的選中選項出現在msgbox彈出的視窗中,
3樓:匿名使用者
private sub command_click()if check1.value=1 then 'check控制元件選中打勾為男,不選中為女
msgbox "您的性別是男"
else
msgbox "您的性別是女"
end if
end sub
4樓:匿名使用者
新增兩個option,其中 option1為男,option2為女,在command的click過程中新增如下**:
if option1.value = true thenmsgbox "您的性別是男"
else
msgbox "您的性別是女"
end if
5樓:匿名使用者
最簡**
private sub command1_click() 'option1為男
msgbox iif(option1.value, "您的性別是男", "您的性別是女")
end sub
vb中有個選項是check1.value=true(核取方塊)是錯誤的,請問錯在哪?
6樓:飄葉雜談
核取方塊的value的值是 0未選 1已選 2變灰
沒有true這個選項 true轉換成數字就是-1
7樓:笑年
check1控制元件的value屬性沒有true與false,只有0(無選中)與1(選中)
vb程式設計 check選擇設計
8樓:匿名使用者
private sub command1_click()dim s as string
if check1.value = vbchecked thens = check1.caption
end if
if check2.value = vbchecked thens = s & " " & check2.captionend if
if check3.value = vbchecked thens = s & " " & check3.captionend if
if check4.value = vbchecked thens = s & " " & check4.captionend if
label1.caption = "你的興趣愛好是" & vbcrlf & trim(s)
end sub
private sub form_load()check1.caption = "唱歌"
check2.caption = "跳舞"
check3.caption = "朗誦"
check4.caption = "手工"
label1.caption = "你的興趣愛好是"
command1.caption = "確" & vbcrlf & "定"
end sub
9樓:匿名使用者
雙擊確定按鈕,將下面**放入按鈕事件中。
label1="你的興趣愛好是:" & iif(check1,check1.caption,"") & iif(check2,check2.
caption,"") & iif(check3,check3.caption,"")
10樓:十年故事
推薦你到飯客網路去學習
vb中string和string的區別
好幾碗粥 string 也可以 dim readers1 as string 300 是預先給readers1分配300個字元的記憶體空間,超出部分就自動截了. string是c 中的類,string是.net framework的類 在c ide中不會顯示藍色 c string對映為.net fr...
關於VB中CLS和CLEAR的問題
cls一般是清除容器物件上,通過print方法,或繪圖語句等輸出的圖形 clear一般是清除一些物件的列表,比如列表框 組合框等所以,對於列表框及組合框中,列表項的清除,應該使用clear方法即 list1.clear combo1.clear cls方法一般都用在窗體上 clear 用於列表框和組...
vb中inputbox的功能和使用方法,要詳細的解釋哦
ly辰 inputbox是visualbasic和vbs中的一個函式,功能是彈出一個對話方塊,在對話方塊中可以顯示提示,等待使用者輸入文字按下按鈕,然後返回使用者輸入的文字。用法 inputbox prompt,title default xpos ypos helpfile context 引數 ...