操作题(答案).doc

第一题： 在VB集成环境下,按照以下要求编写程序,存盘并运行。 (1)在工程中添加一个窗体Form1并设置为启动窗体,在名称为Form1的窗体(菜单：工程—添加窗体)上画一个命令按钮，其名称为Cmd1,caption为“移动”; (2)编写适当的事件过程。程序运行后，如果单击命令按钮Cmd1，则可使该 按钮移到窗体的左上角； 要求：不得使用任何变量。（只允许通过属性的方式实现） Private Sub cmd1_Click() cmd1.Top = 0 cmd1.Left = 0 End Sub * 注意：存盘时必须存放在考生文件夹下，工程文件名为oper1.vbp， 窗体文件名为oper1.frm。 提醒考生：务必要按要求保存！ Cmd1.visible=false 第二题： 在VB集成环境下,按照以下要求编写程序,并运行。 (1)在工程中添加一个名称为Form1的窗体,并将其设置为启动窗体,在Form1上 画一个命令按钮，其名称为Cmd1,caption为Cmd1; (2)编写适当的事件过程。程序运行后，如果单击命令按钮Cmd1，则可使该按 钮不可见； 要求：不得使用任何变量。（只允许通过属性的方式实现） Private Sub Cmd1_Click() Comd1.Visible = False End Sub 第三题： 在VB集成环境下,按照以下要求和顺序编写程序,存盘并运行。 在工程中添加一个名称为Form1的窗体并设为启动窗体，在窗体上画一个水平 滚动条，其名称为HScroll1，然后通过属性窗口设置窗体和滚动条的属性， 实现如下功能： 1）窗体标题为设置滚动条属性 2）滚动条所能代表的最小值和最大值分别为0和200（max=200,min=0） 3）程序运行后，单击滚动条两端的箭头时，滚动框移动的增量为2(Smallchange) 4）程序运行后，单击滚动框前面或后面的部位时，滚动框移动的增量值为10(Largechange) 5）滚动框的初始位置为100(Value) . 第四题： 在VB集成环境下,按照以下的顺序和要求设计Visual Basic应用程序,存盘并运行。 在工程中添加一个名称为Form1的窗体上,并设置为启动窗体,在窗体上画三个 单选按钮，其名称分别为Option1、Option2和Option3，然后通过属性窗口设 置窗体和单选按钮的属性，实现如下功能： 1）窗体标题为设置单选按钮属性 2）三个单选按钮的标题分别为按钮1、按钮2和按钮3(Caption) 3）初始状态为，第一个选项按钮为选中(Value--True) 4）程序运行后，第二个选项按钮不可用(Enable--False) 5）程序运行后，第三个选项按钮不可见(Visible--False) 第五题： 在VB集成环境下,按照以下顺序和要求编写程序,存盘并运行。 1）在工程中添加一个名称为Form1的窗体并设为启动窗体； 2）在窗体上画一个文本框，其名称为Text1，字体为黑体，字号为12,(Font ) 文本框中的初始内容为程序设计(Text)； 3）在窗体上添加一个命令按钮，名称为C1，标题为改变字体(Caption)。 请编写适当事件过程，使得在运行时，单击命令按钮，则把文本框中的文字 的字体改为隶书。程序中不得使用任何变量。 Text1.Font.Name = 隶书 第六题： 在VB集成环境下,按照以下顺序和要求编写程序,存盘并运行。 1）在工程中添加一个名称为Fom1的窗体上并设为启动窗体； 2）建立一个二级菜单，第一组含2个菜单项，标题分别为编辑、帮助， 名称分别为edit、help。其中编辑菜单含有子菜单，子菜单有3个菜单 项，其标题依次为剪切、复制、粘贴，名称分别为cut、copy、 paste。 (p193，Ctrl+E，先在完成一级菜单，然后选中编辑，单击右箭头，产生一级子菜单 ) * 注意：存盘时必须存放在考生文件夹下，工程文件名为oper1.vbp， 窗体文件名为oper1.frm。 提醒考生：务必要按要求保存！ 第七题： 在VB集成环境下,按照以下顺序和要求编写程序,存盘并运行。 1）在工程中添加一个名称为Form1的窗体，并设为启动窗体； 2）在窗体上添加一个垂直滚动条，名称为VScroll1；添加一个标签，名称为Label1。 3）则按如下要的要求，设置垂直滚动条的属性： Max = 3000 Min = 0 LargeChange = 50 SmallChange = 10 4）编写适当的事件过程，当程序运行后，如果移动垂直滚动条的滚动块，则在标签中显示滚动块的位置。 Private S