Ⅰ 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, 很多帐号, )
.计次循环尾 ()