1、vb6.0 实验六习题与答案实验六专业_1、认识常用控件:单选按钮、复选框、框架、列表框、组合框、滚动条、滑动器(slider)、时钟、图形控件; 2.学习在表单中创建常用控件2、学习在属性窗口和在程序代码中设置属性 3、学习调用控件的方法4.学习编写每个控件、鼠标和键盘的事件过程。二、实验内容1、单选按钮、复选框、框架1) 将表格F1 的标题设置为“复选框、框架和单选按钮”;将表格中复选框ch1、ch2ch1 和 CH2 的高度和宽度分别设置为 360 和 1000;程序运行时,check2 处于非零状态。FR1 帧包含单选按钮OP1 和 op2。2) 设计窗体,要求标题为“设置字体”; 带
2、边框的标签控件Label1 以表格形式设置,高度和宽度分别为 450 和 3800,标题为“欢迎VB”,字体大小为“4”,并显示在中间;标题为“字体”框架包含两个标题分别为“楷体_gb2312”和“华文新魏”的单选按钮 op1 和 op2; 标题为“Italic”的框架包含两个标题为“是”和“否”的单选按钮。 编写相应控件的事件进程,使程序运行时,点击“Kaiti_gb2312”,标签控件的字体为Kaiti_gb2312,点击“Chinese New Wei”,标签控件的字体为Chinese New Wei;单击Yes,label 控件的字体将为斜体。单击“否”取消标签控件字体的斜体化。pri
3、vatesuboption1_click()标签 1。fontname=option1。说明文字endsubprivatesuboption2_uu 单 击 () label1.fontname=option2.caption endsubprivatesuboption3_click()label1.fontitalic=true endsub privatesuboption4_click()label1.fontitalic=false endsub3) 在窗体是设置设置框text1,其中文字为:黑体、四号、居中;设置单选按钮option1 和 option2,标题分别为“福州大学”和“
4、阳光学院”,编写行当的事件过程, 使得程序时,单击“福州大学”或“阳光学院”,在文本框中显示“福州大学”或“阳光 学院”。文本文本=选项 1。说明文字text1.text=option2.caption4) 在表单上设置一个标题为“效果”的框架,并在框架中设置四个标题为“上标”、“下标”、“阳文本”和“阴文本”的复选框。其中:“上标”被选中,“阴影”被禁用, 另外两个未被选中。设置value2.列表框、组合框1)按图设计,在窗体中设置两个标签l1 和l2、两个列表框mylist1 和 mylist2: 其中:标签标题分别为“账户名称”和“主要”;两个列表框的列表项如图所示;并且mylist1
5、允许仅用鼠标进行多项选( 多 选 =1) (style=1-checkbox)要求: 简单组合框的左边距为 1000,上边距为 500;在组合框中添加“土木工程”、“计算机”、“会计”和“工商管理”。设置编写适当的事件过程,使得程序运行时,在组合框的文本框中输入项目,单击“添加按钮,将其添加到组合框中;在组合框中选定一个项目,单击“删除”按钮,则删 除除该项目。3) 如图所示设计表单:要求:编写适当的事件过程,实现endsubmsgbox你选了&x&个项目,0,选定项统计endsub 4) 如图所示设计表单:要求: 编写一个合适的事件流程来实现:当在组合框或列表框中单击一个项目时,字体和字体大
6、小将根据label1 中的选项进行设置。privatesublist1_click()label1.fontsize=list1.textendsub3、滚动条、1) 如图所示设计表单:要求: 这两个标签控件可以随内容自动更改大小。label1 的文本在中心对齐,并在垂直方向上更改,以适应内容。文字字体为“隶书”,字体大小为“四”。宽度水平滚动条hs1 取值范围从 3002500,单击滚动条箭头,改变值为 50;单击滚动条空白处,改变值为 100; 编写一个合适的事件流程来实现:根据滚动条的当前值更改标签的宽度,并在文本中显示滚动条的当前值框中。PrivateShull1_uuChange()
7、标签 1。宽度=hscroll1。valuetext1。text=hscroll1。值 SUB4。时钟1)按图示设计窗体: 要求:标签label2 为有边框,其标题文字加粗、字号为“四号”文本框text1 的文字加粗、字号为“四号” 编写一个适当的事件处理程序,在单击“开始”按钮时动态显示当前时间,并每1 秒向文本框中添加 1。单击“退出”退出应用程序。dimsasintegerprivatesubtimer1_timer()s=s+1标签 1。caption=timetext1。text=sendsub 5、图像框与图片框 1)按图示设计窗体: 要求:图像框带有边框、加载图像能自动改变大小适应图像框。 编写一个合适的事件流程,实现:点击“show image”命令按钮或单选按钮加载图像“setop.BMP”。 编写适当的事件流程,实现:点击“隐藏图像”命令按钮或单选按钮删除图像框中的图像