VB第2章用户界面(6)(阅读)课件.pptxVIP

  • 1
  • 0
  • 约1.03万字
  • 约 81页
  • 2023-10-27 发布于江苏
  • 举报
;1 控件的公共属性 1. Name属性 运行时是只读的 缺省名称 以字母开始,最长40个字符,可包括字母、数字和下划线,不能包括标点符号或空格(允许汉字) 控件数组的名称: Name(Index) 2. Caption属性 加访问键: 字母 Label控件标题大小没有限制。其他有标题的控件,标题大小限制为255个字符。 注意与Name属性、Text属性的区别;Enabled属性 决定控件是否能够对用户产生的事件作出响应 Visible属性 注意: 如果在属性窗口中将控件的Visible属性设置为False,则控件在设计窗体上仍是可见的,仅在 运行时才不可见。 【例1】Visible属性和Enabled属性的比较;“显示图像”按钮Command1的Click事件过程如下: Private Sub Command1_Click() Image1.Visible = True Command1.Enabled = False Command2.Enabled = True End Sub “隐藏图像”按钮Command2的Click事件过程如下: Private Sub Command2_Click() Image1.Visible = False Command1.Enabled = True Command2.Enabled = False End Sub;5. Left、Top、Height、Width属性 对于窗体,这些属性总是以缇为单位表示;对于控件,它们的度量单位取决于其容器的坐标系统;8. Font对象属性;2 框架(Frame);3 图片框(PictureBox);4 图像框(Image);5 选项按钮(OptionButton) 作用: 多选一(放在窗体上、或放在其他容器中) 属性 Value: True—选中 False—未选中 Alignment属性: 决定文本的对齐方式 Style—控制外观 事件 Click事件—使选项按钮从未选择变成选择状态时 (单击鼠标改变、代码改变 );Option1;Private Sub Option1_Click() Text1.ForeColor = vbBlack End Sub Private Sub Option2_Click();6 复选框(CheckBox) 作用 多选一或多选多(放在窗体上或其他容器中) 属性 Value 0—未选中 1—选中 2—灰度状态(常用于表示不确定或部分选中) Alignment属性: 决定文本的对齐方式 Style: 控制外观 事件 Click事件;【例3】设计界面如下图所示,用复选框设置文本框的文字样式与效果。;Private Sub Check1_Click() Text1.FontBold = Check1.Value End Sub Private Sub Check2_Click() Text1.FontItalic = Check2.Value End Sub Private Sub Check3_Click() Text1.FontStrikethru = Check3.Value End Sub Private Sub Check4_Click() Text1.FontUnderline = Check4.Value End Sub;7 列表框(ListBox) 作用:提供选项列表、内容多时自动出现滚动条 属性 Style—外形(常规形式、复选??形式) List—列表内容。 设计时: 用Ctrl+?换行; 运行时: List(i)表示第i项 Columns—列表形式 0:垂直单列、1:水平单列、1:水平多列 Text—只读、运行期用,获取当前选择项目的值 ListIndex—运行期用,当前选定项目的索引(0…) 如果未选定项目,则 ListIndex 值为 -1 ListCount—列表部分项目的个数 Sorted—元素是否自动按字母顺序排序 Selected—运行期用,用于选择某项 如List1.Selected(3)=True 选择第4项;MultiSelect: 0—缺省值,不允许复选。 1—鼠标单击、按空格键在列表中选择或取消选择 2 —按下 Shift并单击鼠标或按下 Shift 以及一个箭头键将在以前选中项的基础上扩展选择到当前选中项。按下 Ctrl 并单击鼠标在列表中选中或取消选中项。 3. 方法 AddItem—向列表框中添加新的项目 对象名.AddItem 项目[,索引] RemoveItem—从列表框中移除项目 对象名.RemoveItem 索引;【例4】设计如下图所示的界面,左列表框列出了某数据表格的各列(字段)名称。;(1) 将左列表框中选择的字段移动到右列表框中 Private Sub C

您可能关注的文档

文档评论(0)

1亿VIP精品文档

相关文档