- 1、本文档共45页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
略79sstab控件
第7章 常用控件 7.1 常用控件分类 7.2 单选按钮和复选框 7.3 框架 7.4 列表框和组合框 7.5 滚动条和滑块控件 7.1 常用控件分类 1.标准控件 又称为内部控件,工具箱中提供了20个标准控件 2.ActiveX控件 VB系统以及第三方开发商提供的类似于工具箱标准控件的控件,用于开发更加复杂的应用程序 必须通过菜单命令先添加到工具箱中,才能像标准控件一样使用 3.可插入对象 Windows应用程序对象 如:Microsoft Excel 工作表、Microsoft PowerPoint 演示文稿等 7.2 单选按钮和复选框 单选按钮(OptionButton ) 以组的形式出现,允许用户选择其中的一项;每一项的对象名为Option1, Option2…… 复选框(CheckBox) 以组的形式出现,用户根据需要选择其中的一项或多项;每一项的对象名为Check1, Check2…… 重要属性 Caption属性:单选按钮和复选框上显示的文本 Alignment属性: 0:控件按钮在左边,文本在右边(缺省值) 1:控件按钮在右边,文本在左边 Value属性:单选按钮和复选框的状态 单选按钮: True:被选定 False:未被选定(缺省值) 复选框: 0:Unchecked,未被选定 1:Checked,被选定 2:Grayed,灰色禁用状态,不可使用 Style属性: 0:Standard,标准方式 1:Graphical,图形方式 DownPicture、Picture、DisabledPicture 常用事件和方法 单选按钮和复选框的常用事件是Click事件,当用户选择单选按钮或复选框时触发该事件。 单选按钮和复选框支持的方法较少,常用的主要有SetFocus和Move方法。 Private Sub Command1_Click() Text1.FontName = IIf(Option1, 宋体, 黑体) Text1.FontBold = IIf(Check1 = 1, True, False) Text1.FontItalic = IIf(Check2 = 1, True, False) Text1.FontStrikethru = IIf(Check3 = 1, True, False) Text1.FontUnderline = IIf(Check4 = 1, True, False) End Sub Private Sub Check1_Click() Text1.FontBold = Not Text1.FontBold End Sub Private Sub Check2_Click() Text1.FontItalic = Not Text1.FontItalic End Sub Private Sub Check3_Click() Text1.FontStrikethru = Not Text1.FontStrikethru End Sub Private Sub Check4_Click() Text1.FontUnderline = Not Text1.FontUnderline End Sub 7.3 框架(Frame) 创建框架 在窗体上创建框架及其内部控件时,必须先建立框架,然后将各控件放置其中。 创建控件时不能双击工具箱中的工具,必须单击后在适当位置自行拖拉。 若要将现有的控件分组,应先选定控件,剪切到框架中。 常用属性和事件 例7.1 利用框架、单选钮和复选框建立一个字体、字型和字号的对话框,根据不同的选择在文本框中显示不同的文字。 Private Sub Check1_Click(Index As Integer) Select Case Index Case 0 Text1.FontItalic = Not Text1.FontItalic Case 1 Text1.FontBold = Not Text1.FontBold Case 2 Text1.FontUnderline = Not Text1.FontUnderline End Select End Sub Private Sub Option1_Click(Index As Integer) Select Case Index Case 0 Text1.FontName = 黑体 Case 1 Text1.FontNam
您可能关注的文档
最近下载
- 第1部分 专题05:记叙文阅读之环境描写(练习)-中考语文复习 现代文阅读(全国版)(含答案及解析版).docx
- 人教版2019年初中物理 电能、电路、电功综合专题练习(含答案).doc
- 超星学习通 乡村振兴的实践探索(北京大学)章节测验答案尔雅网课答案.pdf VIP
- 2024年6月第英语六级真题(全3套)及答案解析.pdf
- (完整版)数量关系公式.pdf
- 山东省政府采购专家测评题库800-1000.docx VIP
- 新课标人教版高中英语教材词汇表 1-8册(1).doc
- GB/T 5686.7-2022锰铁、锰硅合金、氮化锰铁和金属锰 硫含量的测定 红外线吸收法和燃烧中和滴定法.pdf
- 河北省石家庄市2024年中考一模语文试卷(含答案).pdf VIP
- 全国卷书面表达说题比赛课件.pptx
文档评论(0)