滚动条例题 建立一个水平滚动条( hscroll) 其max属性为1oo, min属性为o, smallchange属性为2, largechange属性为1o, value属性初始值为5o, 另有一个文本框(text它显示滑块当前位置所代表的值。 Sub hscroll changeo 滚动条 Text1.text=hscroll value End sub 速度
滚动条例题 建立一个水平滚动条(hscroll1)。 其max属性为100, min属性为0, smallchange属性为2, largechange属性为10, value属性初始值为50, 另有一个文本框(text1),它显示滑块当前位置所代表的值。 Sub hscroll1_change() Text1.text=hscroll1.value End sub
42时钟 时钟( (timer)): 可以有规律地隔一段时间触发一次Tmer(计时器)事件而执行相应的程序 代码。程序运行时,时钟控件并不显示在屏幕上时间显示在标签上。 *主要属性 nterval:时间间隔。表示两个计数器事件之间的时间间隔。单位为毫秒 (o.0015)。如 iNterval属性值为500,即每隔半秒产生一个计时器事件。 *事件 Timer:在一个时钟控件的预定的时间间隔过去之后发生。该间隔的频率储 存于该控件的 nterval属性中
4.2时钟 时钟(timer): 可以有规律地隔一段时间触发一次Timer(计时器)事件而执行相应的程序 代码。程序运行时,时钟控件并不显示在屏幕上,时间显示在标签上。 主要属性 Interval:时间间隔。表示两个计数器事件之间的时间间隔。单位为毫秒 (0.001S)。 如Interval属性值为500,即每隔半秒产生一个计时器事件。 事件 Timer:在一个时钟控件的预定的时间间隔过去之后发生。该间隔的频率储 存于该控件的Interval 属性中
例题:在窗体上显示当前系统时间 a Form1 21:27:34
例题:在窗体上显示当前系统时间
建立对象:在窗体上建立一个时钟控件和一个标签控件。 设置属性:时钟控件 Interval:1ooo 标签控件 Borderstyle:1 编写代码 Private Sub tmrclock Timer labell Caption= Times“time$为日期函数,返回值为系统时间。 End Sub D工 四回 LAbel
建立对象:在窗体上建立一个时钟控件和一个标签控件。 设置属性:时钟控件 Interval:1000 标签控件 Borderstyle:1 编写代码: Private Sub tmrclock_Timer() label1.Caption = Time$ ‘time$为日期函数,返回值为系统时间。 End Sub
43菜单设计 ◆莱单概述 绝大多数应用程序都提供菜单。通过菜单对各种命令按功能进行分组, 使用户能够更加方便、直观地访问这些命令。又分为弹出菜单和下拉菜单。 莱单标题热键 菜单 文件的编想 文件(f)「编辑(e) 「打开o) trite 复制(c) Ctrl+c 莱单项 保存(s) Ctrl+s 快捷键 粘贴) Ctrl+V 退出(x) 分割线
4.3 菜单设计 绝大多数应用程序都提供菜单。通过菜单对各种命令按功能进行分组, 使用户能够更加方便、直观地访问这些命令。又分为弹出菜单和下拉菜单。 ◆ 菜单概述 菜单标题 热键 菜单项 分割线 快捷键