如何用VB编写indows程序.ppt

5.9.8 对话框控件 CommonDialog 用来实现文件，字体，颜色，打印机设置等对话框 属性： Flag: 一些标志 FileName : 通过文件对话框获取的文件名 InitDir : 文件对话框的初始路径 Filter : 文件对话框的过滤器 FontName : 通过字体对话框获得的字体名字 FontBold : 字体是否粗体 FontItalic: FontUnderline: Color : 通过颜色对话框获得的颜色 方法：ShowOpen, ShowSave,ShowFont, ShowColor, ShowPrinter, ShowHelp 5.9.9 编辑框控件 TextBox 属性： Text : 文字 MultiLine : 是否多行 SelStart : 选中文字的开始点 Locked : 能否编辑 ScrollBars ： 是否要卷滚条 SelStart : 选取部分的起点 SelLength : 选取部分的长度 SelText : 选中部分的文本 Passwordchar : 输密码方式下的替代字符 方法： SetFocus : 设置输入焦点 事件： Change ：内容改变时发生，哪怕内容改变是被程序改变的，也会引发 5.9.10 列表框控件 ListBox 属性： Columns : 列数 List : 数组，存放列表框里面的内容 MultiSelect : 是否允许多选( 不能多选，简单多 选方式，扩展多选方式） Sorted : 是否排序 Style : 表项边上是否有检查框 ListIndex : 被选中项的索引(索引从0算起) ListCount : 总项目数 Selected : 某一项是否被选中 SelCount : 被选中的项目总数 ItemData : 每个项目都可以有一个任意的整数Id, 存放在 ItemData 数组里，也可以不管它 NewIndex :最后添加的表项索引 方法： AddItem : 添加一项 RemoveItem : 删除一项 Clear : 清空 添加表项及其ID: List1.AddItem Judy Phelps List1.ItemData(List1.NewIndex) = 42310 获取被选中表项的索引： dim n as long n = List1.ListIndex 输出被选中表项： Msgbox List1.List(list1.listIndex) 判断索引为 2 的表项是否被选中： if List1.Selected(2) then Endif 选中某项： List1.Selected(2) = true 5.9.10 列表框控件 ListBox 事件: Click ： 点击一项时发生。用程序选中一项，也会引发 DblClick Scroll : 拉动卷滚条时发生 ItemCheck : 选中一个表项的 checkbox 时产生，不论是用户选中还是用程序指令选中 5.9.11 下拉列表框控件 属性： Style : Drop Down Combo : 下拉，而且有编辑框 Simple Comobo: 有编辑框，但不能下拉 Drop down list : 没有上面的编辑框 ListIndex : 被选中的列表项 Text : 编辑框里的文字 Sorted : 是否排序 SelStart， SelLength, SelText … 关于编辑框里文字的属性 方法： AddItem ： 添加表项 事件： Click : 在列表中做选择时发生,程序改变被选中项时也会引发 Change : 编辑框内容改变时发生，即使是程序使之改变，也会发生 (前面提到的 编辑框控件的 Change 事件，也是一样的) 5.9.12 进度条控件 点 工程 | 部件 菜单后，选 Microsoft Common Controls 6.0 添加后，才有 属性： Max : 能表示的最大值 Min : 最小值 Value ： 值 Scrolling : 是连续显示还是分段显示 5.9.13 状态栏控件 点 工程 | 部件 菜单后，选 Microsoft Common Controls 6.0 添加后，才有 属性： Align : 对