第07章 常用控件

第07章 常用控件

ID:21931825

大小:347.00 KB

页数:38页

时间:2018-10-25

第07章 常用控件_第1页
第07章 常用控件_第2页
第07章 常用控件_第3页
第07章 常用控件_第4页
第07章 常用控件_第5页
资源描述:

《第07章 常用控件》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第7章常用标准控件7.1定时器型7.2单选按钮和复选框7.3框架7.4列表框和组合框7.5滚动条7.6焦点和Tab顺序6/30/20211成都中医药大学【目的要求】1.掌握定时器的应用2.掌握单选按钮和复选框的属性和应用3.了解框架的应用4.掌握列表框和组合框的应用5.了解滚动条6.了解焦点和Tab顺序【重点】定时器、单选按钮和复选框、列表框和组合框【难点】各控件的应用6/30/20212成都中医药大学7.1定时器7.1.1定时器的属性和事件1.常用属性(1)Interval属性返回或设置定时器控件计时的时间间隔(单位:毫秒)。其有效范围为0~65535。默认值为0,此时定时器无效。(2

2、)Enabled属性定时器是否被激活,它有True或False两种属性值。当其设为True时,定时器被激活。2.常用事件定时器控件最常用的事件就是Timer事件。每经过一个由Interval属性的时间间隔,便会产生一个Timer事件。6/30/20213成都中医药大学7.1.2定时器的应用举例【例7.1】建立一个实时时钟。程序界面设计如图7-2所示,程序运行结果如图7-2所示。在VB中可以用Time函数获取系统的时间。图7-16/30/20214成都中医药大学在命令按钮【开始】事件过程Command1_Click()中添加如下代码:PrivateSubCommand1_Click()Ti

3、mer1.Enabled=TrueEndSub在命令按钮【停止】事件过程Command1_Click()中添加如下代码:PrivateSubCommand2_Click()Timer1.Enabled=FalseEndSub在时钟控件的触发事件过程中添加如下代码:PrivateSubTimer1_Timer()Label1.Caption=TimeEndSub6/30/20215成都中医药大学【例7.2】建立一个文字移动的动画程序。程序运行结果如图7-3所示。分析:文字移动可以利用标签的move属性。如果每隔一段时间就让标签移动一次就能产生动画的效果,用时钟控件的timer事件正好可以实

4、现每隔一段时间执行一次事件过程。用移动量的正负可以实现左右移动。把标签移动的代码写在timer事件过程中就可以实现文字移动的动画效果。图7-36/30/20216成都中医药大学编写程序代码DimcxAsInteger'定义一个移动增量PrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubCommand2_Click()Timer1.Enabled=FalseEndSubPrivateSubForm_Load()Timer1.Enabled=Falsecx=50EndSubPrivateSubTimer1_Timer()L

5、abel1.MoveLabel1.Left+cx'标签移动IfLabel1.Left+Label1.Width>ScaleWidthThencx=-50'移到右边时开始向左移动IfLabel1.Left<=0Thencx=50'移到左边时开始向右移动EndSub6/30/20217成都中医药大学7.2.1单选按钮单选按钮控件(OptionBotton)通常成组出现,主要用于处理“多选一”的问题。1.常用属性(1)Value属性用于设置单选按钮状态。True表示选定;False表示未选定。(2)Caption属性显示出现在单选按钮旁边的文本。(3)Alignment属性用于设置单选按钮旁边

6、的文本在圆圈的左边或者右边。其值为0或1。值为0时表示控件钮在左边,标题显示在右边;值为1时,反之。(4)Style属性用于设置单选按钮外观。其值为0或1。值为0时为标准样式;值为1时外观类似于命令按钮。7.2单选按钮和复选框6/30/20218成都中医药大学2.常用事件单选按钮控件(OptionBotton)常用事件是Click事件。【例7.3】设计一个程序,界面由一个文本框和两个单选按钮组成,用户单击不同的按钮,文本框中显示相应的结果。程序界面设计如图7-4所示。图7-56/30/20219成都中医药大学【例】设计如下图所示的界面;当单击某个单选钮,在标签中显示相应的字体。运行结果如

7、图所示。事件过程代码如下:PrivateSubst_Click()Label1.FontName=“宋体"EndSubPrivateSubhwcy_Click()Label1.FontName=“华文彩云”EndSubPrivateSubyy_Click()Label1.FontName=“幼圆"EndSub6/30/202110成都中医药大学7.2.2复选框复选框(CheckBox)也称检查框,主要功能是从用户处获取“是”或“否”

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。