1樓:匿名使用者
checkbox 控制元件
組中可以使用 checkbox 控制元件顯示多項選擇,從而可選擇其中的一項或多項。也可以通過對 value 屬性程式設計設定
checkbox 的值。
在一個窗體中可以同時選擇任意數量的 checkbox 控制元件。
以下**會告訴checkbox 控制元件單選或多選的狀態
option explicit
private sub check1_click()
debug.print check1.value; check2.value; check3.value
end sub
private sub check2_click()
debug.print check1.value; check2.value; check3.value
end sub
private sub check3_click()
debug.print check1.value; check2.value; check3.value
end sub
2樓:
假設核取方塊名為xx,用if語句程式設計
if xx.value=ture then'寫選中的**
else
'寫未選中**
endif
3樓:匿名使用者
新增一個核取方塊
if check1.value=1 then'核取方塊選中,進行如下操作
else
'核取方塊未選中,進行如下操作
endif
4樓:
無text屬性,有caption屬性
value可以是:vbunchecked or vbchecked or vbgrayed
5樓:匿名使用者
沒有明白你的意思,我看懂的就是這些了,不好意思:
dim a as long
private sub command1_click()a = check1.value
select case a
case 1
text1.text = check1.captioncase 0
text1.text = ""
end select
end sub
沒有像你說的那樣取消不了
6樓:匿名使用者
dim 判斷1 as boolean, 判斷2 as boolean, 判斷3 as boolean
private sub check1_click()
if check1.value = 1 then 判斷1 = true
end sub
private sub check2_click()
if check2.value = 1 then 判斷2 = true
end sub
private sub check3_click()
if check3.value = 1 then 判斷3 = true
end sub
private sub command1_click()
if 判斷1 = true then text1.text = text1.text & check1.caption
if 判斷2 = true then text1.text = text1.text & check2.caption
if 判斷3 = true then text1.text = text1.text & check3.caption
end sub
private sub form_load()
判斷1 = fasle
判斷2 = fasle
判斷3 = fasle
end sub
VB中如何讓選擇的多個核取方塊在文字框中分行顯示
不好意思,樓上 沒有問題,可是功能不能按提問者實現。這個題的考點在 所選的每一個核取方塊的caption屬性佔一行 所以,首先需將文字框的multiline屬性設為true,如果需加滾動條,可以設定文框的scrollbars屬性,之後再建立核取方塊陣列,最後 private sub check1 c...
excel中核取方塊怎麼用,EXCEL中核取方塊怎麼用
方法如下 軟體版本 office2007 1 開發工具,插入,核取方塊 3 還可以進一步更改核取方塊後的文字內容 擴充套件資料1 選擇框 a 單個核取方塊可被選擇 b 單個核取方塊可被取消選擇 c 並存的全部核取方塊可被選擇 d 並存的全部核取方塊可被取消選擇 e 並存的全部核取方塊可被部分選擇 f...
vb 核取方塊value屬性的預設值是什麼意思
核取方塊的value屬性表示核取方塊是否被選中,有兩個值false 0 表示未選中,true 1 表示選中狀態。而核取方塊預設情況下是不選中的。所以預設值為false,即0.驗證 你可以在窗體上隨便畫一個checkbox,比如名稱為check1,然後利用command1 click事件彈出其預設值 ...