第五章vb6-0基本控件的使用.docxVIP

  1. 1、本文档共40页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第五章??基本控件的使用5.1 标签控件在Windows应用程序的各种对话框中,都显示有一些文本提示信息,在VB中可以使用标签控件来实现在窗体中显示这些文本提示信息。表5.1中列出了标签控件的一些主要属性。 既可以在程序设计阶段通过【属性】窗口设置标签的属性,也可以在程序运行阶段在代码中设置窗体的属性。如将标签(名称为Labell)显示的文本设置为欢迎的语句如下: Labell.Caption=欢迎 实例5.1标签的使用 在该程序中,窗体上显示一行提示用户执行操作的文本,当用户单击或双击窗体时,窗体上还会显示出用户所执行的操作。 在窗体上放置两个标签控件,它们的属性设置如表5.2所示。打开【代码】窗口,将下列代码添加到Form_Click事件过程中:?Private Sub Form_Click() Labl.Borderstyle=0 Labl.Caption=“您单击了窗体!”End Sub 当单击窗体时,则触发Form_Click事件,该事件中的第一行语句是设置标签无边框(BorderStyle属性的值为0),第二行语句是设置标签上显示的文本。 与此类似,将下列代码添加到Form_DblClick事件过程中:?Private Sub Form_Click() Labl.Borderstyle=1 Labl.Caption=“您单击了窗体!”End Sub 运行该程序,单击窗体,则窗体上显示您单击了窗体!,如图5.2所示。双击窗体,则窗体上显示您双击了窗体!,并且文本有一个边框,如图5.3所示:5.2 按钮控件在应用程序中,按钮控件常常被用来启动、中断或结束一个进程,用户可以通过简单的单击按钮来执行操作。只要用户单击按钮,就会触发它的Click事件过程,通过编写按钮的Click事件过程,就可以指定它的功能了。 按钮控件的常用属性如表5.3所示。5.2.1按钮的有效性在某些应用程序界面中,按钮会根据用户的操作情况呈现两种不同的状态,一种是有效,一种是无效.在无效状态时,按钮通常以浅灰色显示,不能响应用户的任何操作。Windows系统自带的录音机程序界面,其中的【停止】与【后退】按钮无效(以浅灰色显示).按下【播放】按钮后,【播放】按钮变为无效,而【停止】按钮变为有效。按下【停止】按钮后,【停止】按钮变为无效,【播放】按钮恢复有效。 通过按钮的有效性可以看出当前程序的状态,从而避免一些不需要的或重复的操作。如在录音机处于停止状态时(【停止】按钮无效),用户就不需要再去单击【停止】按钮来停止播放了。这里给出一个实例,来模拟录音机的停止与播放按钮。 实例5.2按钮的有效性 在窗体中放置一个标签控件和两个按钮控件,如图5.5所示,其中各控件的属性设置如表5.4所示。 注意:按钮控件添加到窗体上后,在默认情况下,它们的Enabled属性为Ture,在运行程序前,请在【属性】窗口中确认两个按钮的Enabled属性均为Ture,以防止用户在操作中谋改变了这个属性。双击第一个按钮,打开【代码】窗口,将下列代码添加到ComPlay_Click事件过程中: Private Sub ComPlay_Click() Labell.Caption=正在播放歌曲 Complay.Enabled=False ComStop.Enabled=Ture End Sub 当用户单击【播放】按钮时,触发ComPlay_Click事件,该事件过程中的第一行代码是在标签中显示文本,第二行代码是将【播放】按钮变为无效,第三行代码是将【停止】按钮变为有效。 与此类似,将下列代码添加到Comstop_Click事件过程中: Private Sub Comstop_Click() Labell.Caption=歌曲播放停止 ComPlay.Enabled=Fasle ComPlay.Enabled=Ture End Sub 运行该程序,单击【播放】按钮,则在标签中显示正在播放歌曲,并且【播放】按钮变为无效,如图5.6所示。单击【停止】按钮,则在标签中显示歌曲播放停止,【停止】按钮变为无效,同时,【播放】按钮又恢复有效,如图。5.7所示。5.2.2 多功能按钮通常,每个按钮都有一个固定的标题(Caption)和一个特定的功能,用户也可以设计出多功能按钮。单击这样的按钮,按钮的名称会发生变化,并且会执行与按钮标题相应的操作。 实例5.3多功能按钮。 在该程序中,窗体上只有一个按钮,单击该按钮,按钮的标题会在显示日期与显示时间间切换,并且在窗体中将显示出与当前按钮标题相应的内容。 在窗体上放置一个标签控件和一个按钮控件,其中各对象的属性设置如表5.5所示。双击【显示日期】按钮,打开【代码】窗口,将下列代码添加到Commandl_Click事件过程中:?Private Sub Co

文档评论(0)

jdy261842 + 关注
实名认证
文档贡献者

分享好文档!

1亿VIP精品文档

相关文档