VBA80集第57集：列表框和组合框

兰色幻想 · 发表于 2012-3-15 09:13

本帖最后由兰色幻想于 2012-3-26 15:43 编辑

      本集介绍列表框和组合框的使用。本集的两个控件也是最常用的控件，相应的知识点也有很多。
   Option Explicit
'组合框
'一显示
  '1 显示多列内容
'ColumnCount属性可以设置显示的列数
'TextColumn选取多列时显示N列的内容
'BoundColumn属性可以指定返回第N列的值
'注:Columnheads只在引用工作表数据源时才有效，而且数据源不能包括标题行

'2、获得焦点自动打开下拉列表
   Private Sub 商品_Enter()
      商品.DropDown
   End Sub
'3 列表显示最大条目个数
   'Listrows属性后设置

'4 组合框下拉按钮的图标
   'DropButtonStyle 属性设置不同的类型
   'ShowDropButtonWhen 属性可以设置是否显示下拉按钮图标
'5 设置列宽
以磅为单位
'以厘米为单位 '
'以英寸为单位
、'二功能
'1 向组合框内添加内容
、    'A 使用additem方法添加
、    'B 使用常量数组添加
   、 'C 使用VBA数组添加
'          'D 创建和单元格链接
'2 删除指定行
'3 提取选取的多列内容
'4 是否可以输入列表内容以外的内容
视频下载：

VBA80集第57集_列表和组合框.rar (5.79 MB, 下载次数: 2721, 售价: 68 个金币)

windimi007 · 发表于 2012-3-15 09:30

兰版辛苦了~~~~~~~{:3512:}

skyline_zwl · 发表于 2012-3-15 09:32

兰版给力。沙发是我的。{:912:}

WANGSHANGKUN · 发表于 2012-3-15 10:08

兰版辛苦了~~~~~~~

hshmichael · 发表于 2012-3-15 16:41

谢谢兰校长，辛苦了。

liziyuliziyu3 · 发表于 2012-3-15 21:45

校长辛苦了！！！！！！！！！！！！！！！

yang2099 · 发表于 2012-3-16 08:05

兰版辛苦，但我的金币更苦，快破产了，兰版，便宜点，有木有？

chenzining · 发表于 2012-3-16 09:39

我的金币呀刷刷的
坚持每天登录

yeshuangyong · 发表于 2012-3-16 09:41

thank{:011:}{:011:}

mqr66 · 发表于 2012-3-16 10:29

{:211:}thank{:021:}

		自动登录	找回密码
密码			注册

VBA80集第57集：列表框和组合框

评分