Visual Basic 60程序设计.ppt
《Visual Basic 60程序设计.ppt》由会员分享,可在线阅读,更多相关《Visual Basic 60程序设计.ppt(46页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、第四章 常用控件与窗体,4.1 选择性控件4.2 时钟4.3 菜单设计4.4 多重窗体,单选钮(optionbutton): 必须成组出现,用户在一组单选钮中必须选择也只能选择一项。检查框 (checkbox): 用户根据需要选定其中的一项或多项。,属性: caption: 设置文本注释内容,即单选钮或检查框边上的文本注释。 Alignment:设置一个值,决定单选钮或检查框控件中的文本的对齐方式。 Value :表示单选钮或检查框的状态。为默认属性。,4.1 选择性控件,框架(Frame): 可以用来对其他控件进行分组,以便于用户识别。使用框架控件可以将一个窗体中的各种功能进一步进行分类,让
2、他们的操作互不影响。 列表框 (listbox):列表框是显示项目列表的控件,从中可以选择一项或多项。列表框的内容可以选择,但不能修改。属性: list, listindex ,listcount, selected, sorted, text, multselect.方法: additem ,removeitem,clear,组合框(Combo Box):是一种同时具有文本框和列表框特性的控件。它可以像列表框一样,让用户通过鼠标选择所需要的项目,也可以像文本框那样,用键入方式输入项目。属性 因为组合框是文本框和列表框的组合,所以它的大多数属性都和这两个控件相同。它有一个特殊属性Style,用
3、以确定组合框的形式。 Style:整型。这是组合框的一个重要属性,设置值可为0,1或2,决定组合框的三种形式:即下拉式组合框,简单组合框和下拉式列表框。,滚动条(scrollbar):用来观察数据或确定位置,也可以来做数据的输入工具。主要属性: Max:当滑块处于滚动条最大位置时所代表的值。 Min:当滑块处于滚动条最小位置时所代表的值。SmallChange:当用户单击箭头时,滑块移动的增值量。LargeChange:当用户单击滚动条的空白处时,滑块移动的增值量。 Value:表示滚动条内滑块所处位置所代表的值。重要事件 Scroll滚动事件:在拖动滚动条上的滑块时触发。在单击滚动箭头时不发
4、生。 Change改变事件:在滚动条内滑块的位置改变时发生。,滚动条例题,建立一个水平滚动条(hscroll1)。其max属性为100, min属性为0, smallchange属性为2, largechange属性为10, value属性初始值为50,另有一个文本框(text1),它显示滑块当前位置所代表的值。Sub hscroll1_change()Text1.text=hscroll1.valueEnd sub,4.2时钟,时钟(timer):可以有规律地隔一段时间触发一次Timer(计时器)事件而执行相应的程序代码。程序运行时,时钟控件并不显示在屏幕上,时间显示在标签上。主要属性Int
5、erval:时间间隔。表示两个计数器事件之间的时间间隔。单位为毫秒(0.001S)。 如Interval属性值为500,即每隔半秒产生一个计时器事件。事件Timer:在一个时钟控件的预定的时间间隔过去之后发生。该间隔的频率储存于该控件的 Interval 属性中。,例题:在窗体上显示当前系统时间,建立对象:在窗体上建立一个时钟控件和一个标签控件。设置属性:时钟控件 Interval:1000 标签控件 Borderstyle:1 编写代码: Private Sub tmrclock_Timer() label1.Caption = Time$ time$为日期函数,返回值为系统时间。 End
6、Sub,4.3 菜单设计,绝大多数应用程序都提供菜单。通过菜单对各种命令按功能进行分组,使用户能够更加方便、直观地访问这些命令。又分为弹出菜单和下拉菜单。,菜单概述,菜单编辑器,启动方法: “工具”菜单-菜单编辑器 单击工具栏菜单图标 窗体上单击右键 在快捷菜单- 菜单编辑器,菜单编辑器的使用,1. 标题(Caption):2. 名称(Name):3. 快捷键(Shortcut):4. 下一个(Next):5. 和按钮6. 插入(Insert)按钮:7. 删除(Delete)按钮:8 和按钮:9. 复选(Checked)检查框:10. 有效(Enabled)检查框:11.可见 (visible
7、)检查框:,菜单设计例题1,菜单设计例题2,窗口中第一个菜单标题“计算1”有“加法”和“减法”两个命令。第二个菜单标题“计算2”有三个命令“乘法”,“除法”,“清除”三个命令。“操作数1”和“操作数2”下面的两个文本框用来输入两个数据。“计算结果”下面的标签用来显示两个操作数的计算结果。,解题步骤,建立控件:6个控件属性设置:,设计菜单:打开菜单编辑器,按下表对每个菜单项作设置。,编写事件过程代码:,Dim x As SinglePrivate Sub add_Click( ) 加法x = Val(Txtno1.Text) + Val(Txtno2.Text) 加法lblresult.Capt
8、ion = Str$(x) 数值转换成字符赋给标签End SubPrivate Sub sub_Click( ) 减法x = Val(Txtno1.Text) - Val(Txtno2.Text)lblresult.Caption = Str$(x)End Sub,Private Sub div_Click() 乘法x = Val(Txtno1.Text) * Val(Txtno2.Text)lblresult.Caption = Str$(x)End SubPrivate Sub mul_Click() 除法x = Val(Txtno1.Text) / Val(Txtno2.Text)lbl
9、result.Caption = Str$(x)End SubPrivate Sub clean_Click() 清除Txtno1.Text = Txtno2.Text = lblresult.Caption = Txtno1.SetFocusEnd Sub,运行结果,实际应用中,任何一个大型应用程序都不可能只有一个界面,VB提供了多重窗体程序设计,在多重窗体程序设计中,每个窗体可以有自己的界面和程序代码,完成不同的功能.,4.4多重窗体,添加窗体工程-添加窗体工具条上添加窗体按钮 设置启动对象 在多窗体的程序中,要有一个开始窗体,系统默认缺省窗体名为form1的窗体为启动窗体.如想设置其他窗
10、体为启动窗体,应在工程菜单中的属性中设置.工程-属性-(通用)启动对象,有关窗体的语句和方法,当一个窗体要显示在屏幕上之前,该窗体必须先“建立”,接着被装入内存(load),最后显示(show)在屏幕上.同样,当窗体暂时不需要时,可以从屏幕上隐藏(hide),直至内存中删除(unload).语句 load语句把一个窗体装入内存.执行load语句后,可以引用窗体中的控件及各种属性.但此时窗体并不显示出来. 形式: load 窗体名称 unload语句从内存中删除指定窗体.形式: unload 窗体名称常见用法是unload me ,意义是关闭窗体自己.,方法 show方法显示一个窗体,它兼有加载
11、和显示窗体两种功能.即如窗体不在内存中,则show自动把窗体装入内存,然后再显示出来. 形式: 窗体名称.show模式 其中:窗体名称缺省为当前窗体. 模式有1,0两个值:为1,只能对当前窗体操作,不能对其他窗口操作. 为0(缺省),也可以对其他窗口操作. hide方法将窗体暂时隐藏起来,并没有从内存中删除. 形式: 窗体名称. Hide 其中:窗体名称缺省为当前窗体.,多重窗体例题: 输入和计算一个学生的学习成绩,解题步骤:在工程中添加三个窗体和一个模块在菜单栏点工程添加窗体窗体打开(以上步骤重复两次)在菜单栏点工程添加模块模块打开设置各窗体的属性主窗体属性设置: 名称为frmmain.由一
12、个标签,三个命令按钮组成.,输入窗体属性设置: 名称为frminput.由五个标签,五个文本框,一个命令按钮组成.,输出窗体属性设置: 名称为frmoutput.由二个标签,二个文本框,一个命令按钮组成.,编写程序代码: 定义一个标准模块mult1.bas对全局变量进行声明。,主窗体编写三段事件过程代码Private Sub Cmdinput_Click() 单击输入成绩按钮的代码Frmmain.Hide 隐含主窗体Frminput.Show 显示输入成绩窗体End SubPrivate Sub Cmdoutput_Click() 单击计算成绩按钮的代码Frmmain.Hide 隐含主窗体Fr
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- visual basic 60 程序设计
限制150内