導航:首頁 > 使用方法 > 組合框的使用方法

組合框的使用方法

發布時間:2022-04-19 17:12:32

Ⅰ Vb組合框怎麼用啊,想做一個下拉選項

使用ComboBox控制項,組合框控制項將文本框和列表框的功能結合在一起。有了這個控制項,用戶可通過在組合框中輸入文本來選定項目,也可從列表中選定項目。

OptionExplicit

PrivateSubCombo1_Click()
Text1=Combo1
EndSub

PrivateSubForm_load()
DimEntry,I'聲明變數。
ForI=1To100'計數值從1到100。
Entry="Entry"&I'創建輸入項。
Combo1.AddItemEntry'添加該輸入項。
NextI
EndSub

Ⅱ 易語言中組合框如何使用

你圖片右邊那張是菜單編輯器的,是用在添加窗口標題下面的菜單。如:IE下面的那個:文件(F) 編輯(E) 查看(V)...
至於組合框的內容,可以選定組合框,左側窗口屬性(如圖),項目(後面的...),進行添加。這個是本就添加好的。如果想運行軟體時添加,就寫代碼:

子程序 _組合框1_將彈出列表

組合框1.加入項目 (「A」, )
...
...

依次添加就可以了。

祝你成功~~!

Ⅲ 易語言組合框怎麼用

解決這個問題的方法如下:

1、首先在新建窗口程序上畫上需要使用的組件,三個編輯框,一個組合框、一個標簽和一個按鈕。

Ⅳ wps控制項組合框如何使用當插入組合框如何填寫數據

wps使用列表框控制項的操作步驟

1、打開wps,在表格中創建一個簡單的表格,在單元格中的輸入數據,比如分類表,

Ⅳ Excel EXCEL數據選項下的組合怎麼使用

1、啟動Excel並打開工作表,將B1:G1單元格區域中的內容復制到B8:G8單元格區域中。在A9單元格中輸入公式"=OFFSET($A$1,$A$8,COLUMN(A$1)-1)",將該公式向右填充到G9單元格中,如圖1所示。

Ⅵ vb中組合框的用法

代碼如下,你需要自己定義好單價 Private Sub Command1_Click()
Select Case Combo1.Text
Case "煙"
Label1.Caption = 8 * Val(Text1.Text)
Case "酒"
Label1.Caption = 15 * Val(Text1.Text)
Case "茶"
Label1.Caption = 12 * Val(Text1.Text)
Case "糖"
Label1.Caption = 7 * Val(Text1.Text)
End Select
End SubPrivate Sub Form_Load()
Combo1.AddItem "煙"
Combo1.AddItem "酒"
Combo1.AddItem "茶"
Combo1.AddItem "糖"
Combo1.ListIndex = 0
End Sub

Ⅶ Excel組合框使用技巧

添加組合框,在其中添加各表名稱:
Sub addsheetname()
ComboBox1.Clear
For Each s In Sheets
ComboBox1.AddItem s.Name
Next s
End Sub
執行以後就在組合框中添加了各表的名稱。
跳轉代碼:
Private Sub ComboBox1_Click()
Sheets(ComboBox1.Text).Activate
End Sub

Ⅷ Excel VBA 窗體組合框用法

第一種使用AddItem,代碼:
Private Sub UserForm_Initialize()
ComboBox1.AddItem "A"
ComboBox1.AddItem "B"
ComboBox1.AddItem "C"
End Sub

上面的代碼一次向組合框中添加一個項目,共添加了三條項目。

第二種方法使用數組,代碼:
Private Sub UserForm_Initialize()
ComboBox1.List = Array("A", "B", "C")
End Sub

事先將要添加的項目放到一個數組中,然後使用組合框的List屬性。
第三種方法使用工作表區域,事先將要添加的項目放到工作表中,例如F1到F3分別寫入A、B、C,然後運行下面的代碼:
Private Sub UserForm_Initialize()
ComboBox1.RowSource = "Sheet1!F1:F3"
End Sub

上面的代碼用的是ComboBox的RowSource屬性,值是相應的單元格區域。
下面再來看怎樣向組合框中加入多列項目,這里只介紹RowSource方法,仍舊是事先將我們要加入的項目放到工作表的相應區域,然後執行下面的代碼:
Private Sub UserForm_Initialize()
ComboBox1.RowSource = "Sheet1!A2:C4"
ComboBox1.ColumnCount = 3 '設置顯示的列數
ComboBox1.ColumnHeads = True '是否包括頭部
ComboBox1.TextColumn = 2'設置顯示值的列號
ComboBox1.BoundColumn = 3'設置默認值的列號
End Sub
Sheet1的A2:C4是我們的數據區域,ColumnCount屬性表示要顯示幾列,這里設置成3列,ColumnHeads表示是否包括頭部,True代表包括頭部(注意這里A2:C4的范圍並沒有把頭部包括進去),可以自己看下效果。我們這里有3列,但是組合框中只能顯示一個值,那顯示哪個值呢?用TextColumn屬性來表示,2表示在組合框中顯示的是第2列的值,例如你選擇的是第一行數據,那在組合框中顯示的值就是12。組合框ComboBox還有一個Value屬性,同樣的,如果是多列Value到底是指哪一列的值呢?這個就得用到BoundColumn屬性了,3就表示ComboBox1.value就是第三列的值。那問題又來了,如果我們想要調用第一列或第二列的值怎麼辦?有辦法,看下面的代碼:
Private Sub CommandButton2_Click()
MsgBox ComboBox1.List(ComboBox1.ListIndex, 0)
End Sub

ComboBox1.List(ComboBox1.ListIndex, 0)就表示第1列的值,將0換成1就表示第2列的值,換成2就表示第3列的值,看出來了吧,列標是從0開始而不是從1開始的。

Ⅸ 易語言組合框的使用

.版本 2
.程序集 窗口程序集1
.子程序 _單選框1_被單擊
.判斷開始 (選擇框1.選中) 組合框1.插入項目 (1, 「項目1」, ).判斷 (選擇框2.選中) 組合框1.插入項目 (2, 「項目2」, ).判斷 (選擇框3.選中) 組合框1.插入項目 (3, 「項目3」, ).判斷 (選擇框4.選中) 組合框1.插入項目 (4, 「項目4」, ).判斷 (選擇框5.選中) 組合框1.插入項目 (5, 「項目5」, ).判斷 (選擇框6.選中) 組合框1.插入項目 (6, 「項目6」, ).默認
.判斷結束

.子程序 _單選框2_被單擊
.判斷開始 (選擇框1.選中) 組合框1.刪除項目 (1).判斷 (選擇框2.選中) 組合框1.刪除項目 (2).判斷 (選擇框3.選中) 組合框1.刪除項目 (3).判斷 (選擇框4.選中) 組合框1.刪除項目 (4).判斷 (選擇框5.選中) 組合框1.刪除項目 (5).判斷 (選擇框6.選中) 組合框1.刪除項目 (6).默認

Ⅹ 易語言組合框的用法

組合框啊,其實用途就是一個取現行選中項所對應的文本,如果你需要刻意添加內容到組合框也可以

舉輸入一些帳號為例(已經在未編譯時填好了組合框的選項文本內容)
組合框1.內容=「123456」
組合框也可以當作一個編輯框使用

組合框1的帳號保存事例:

.版本 2
.子程序 _按鈕保存_被單擊
.局部變數 i, 整數型
.局部變數 很多帳號, 文本型, , "0"
.計次循環首 (組合框1.取項目數 (), i)
很多帳號 = 很多帳號 + 組合框1.取項目文本 (i - 1) + #換行符
.計次循環尾 ()
寫到文件 (「配置.ini」, 到位元組集 (很多帳號))
.子程序 _按鈕讀取_被單擊
.局部變數 很多帳號, 文本型
.局部變數 i, 整數型
很多帳號 = 分割文本 (到文本 (讀入文件 (「配置.ini」)), #換行符, )
.計次循環首 (取數組成員數 (很多帳號), i)
組合框1.插入項目 (i - 1, 很多帳號, )
.計次循環尾 ()

閱讀全文

與組合框的使用方法相關的資料

熱點內容
瑞典輕症治療方法 瀏覽:616
原始股退出計算方法 瀏覽:409
水泵間隙的測量方法 瀏覽:520
材料分析方法視頻 瀏覽:332
杜蘭特真正的訓練方法 瀏覽:318
網上買床安裝方法 瀏覽:782
奶奶教裁剪方法簡單好用 瀏覽:449
老人機簡訊中心在哪裡設置方法 瀏覽:856
化肥中氮的含量檢測方法視頻 瀏覽:77
照片如何加水印方法 瀏覽:534
有點打呼嚕有什麼好方法 瀏覽:406
如何賞析詩句方法公式 瀏覽:726
快速融化冰塊的方法 瀏覽:131
手臂痛怎麼治療方法 瀏覽:487
days360函數的使用方法 瀏覽:635
治療濕尤有效方法 瀏覽:913
小米的快捷鍵設置在哪裡設置方法 瀏覽:773
用底線思維方法解決問題 瀏覽:282
檢測方法elisa法 瀏覽:196
遠離口臭的最佳治療方法 瀏覽:688