- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第6章 常用标准控件 主要内容 1 文本控件 2 图形控件 3 按钮控件 4 选择控件 5 滚动条 6 计时器 7 其他 6.1 文本控件 标签中只能显示文本;文本框中既可显示文本,又可输入文本。 6.1.1 标签 用来显示文本信息,显示的信息通过Caption属性设置。 标签的部分属性与窗体及其他控件相同,包括:FontName、 FontSize 、FontUnderline 、Height、 Left 、Name 、Top 、Visible、 Width。 主要属性: 1 Alignment:标题放置方式 0 靠左显示(默认) 1 靠右显示 2 居中显示 2 Autosize:标题是否自动调整大小 True/False 6.1 文本控件 3 BorderStyle :设置标签的边框 0 无边框(默认) 1 有边框 4 Caption :设置标签显示的内容 5 Enable:设置控件是否对用户产生的事件作出反应。 True:作出反应(默认) False:不作出反应(对象变为灰色) 6 Backstyle:标签是否覆盖背景 0 标签透明 1 覆盖背景(默认) 主要事件: Click、 DblClick 6.1 文本控件 6.1.2 文本框 文本框是一个文本编辑区域,在设计阶段或运行期间可以在这个区域中输入、编辑和显示文本,类似于一个简单的文本编辑器。 主要属性: 1 Maxlength:设置允许在文本框中输入的最大字符数,默认值为0,文本中输入字符不能超过32K 2 Multiline True:多行文本 False:单行文本 3 PassWordChar 默认状态下,用户键入字符都显示;设置一个字符(如*) ,则在文本框输入字符时不显示键入字符,而显示为该字符“*” 6.1 文本控件 4 ScrollBars :确定文本框有没有滚动条 0:文本框没有滚动条 1:只有水平滚动条 2 :只有垂直滚动条 3 :同时具有水平和垂直滚动条 注意: Multiline设置为True时,才用该属性设置滚动条 5 SelLength:定义当前选中的字符数 6 SelStart: 定义当前选择的文本起始位置,0表示开始位置第一个字符,1表示第二个字符 7 SelText:定义当前选择的文本字符串 8 Text:设置文本框显示的内容 例如:Text1.Text = Visual Basic 在文本框中显示Visual Basic 6.1 文本控件 主要事件: 支持Click、 DblClick ,还有其他事件 1 Change:改变Text属性时触发。程序运行后,每输入一个字符触发一次Change事件。 2 GotFocus:当文本框被激活且可见性为True时,就接收焦点,输入文本在文本框中显示出来。 3 LostFocus :光标离开文本框时,即焦点离开文本框时触发。 4 SetFocus:焦点移到文本框 [对象.] SetFocus 6.1 文本控件 例:在窗体上建立3个文本框和一个命令按钮。程序运行后,单击命令按钮,在Text2、Text3中分别用小写字母和大写字母显示Text1中的内容。 Private Sub Command1_Click() Text1.Text = Microsoft Visual Basic6.0 End Sub Private Sub Text1_Change() Text2.Text = LCase(Text1.Text) Text3.Text = UCase(Text1.Text) End Sub 6.1 文本控件 例:设置密码。要求无论输入什么字符,文本框显示“*” 设置界面: 6.1 文本控件 事件过程: Private Sub Command1_Click() If Text1.T
您可能关注的文档
最近下载
- 质量、环境、职业健康安全管理体系内审员培训-试卷.doc VIP
- 5G网络切片计费策略-深度研究.pptx
- 《慢性肾脏病相关心肌病综合管理中国专家共识(2024版)》解读.pptx VIP
- 标准课程HSK4第十三课教案.docx VIP
- GB4789-3-2016大肠菌群计数培养基原理解析.docx VIP
- 心理健康症状自评量表SCL(完整版).pdf VIP
- 22S804 矩形钢筋混凝土蓄水池.pdf
- 木工课程教学课件.ppt VIP
- 一文读懂《公平竞争审查条例》PPT课件.pptx VIP
- 2025年山东省网络安全工程专业职称考试(网络生态建设与治理·中级)历年参考题库含答案详解(5卷).docx VIP
文档评论(0)