浙江省余姚市第四职业技术学校2022年高一上VB程序设计模拟三

浙江省余姚市第四职业技术学校2022年VB程序设计模拟3 第一题(30分) 设计一个VB程序，如图1所示，要求：单击单选按钮或复选框后，文本框的文字作相应的变化。 口修改文字风格 回X VB程序设计 字体 字形 个宋体华文新魏 倾斜 下暖 1.(2分)创建一个“标准EXE”工程，将其窗体文件和工程文件分别以“tes1.fm”、“test1.bp” 为文件名保存到“D:八考试结果\程序设计\试题一”文件夹下。 2.(10分)完成界面设计：按表添加相关对象并设置相关的属性： 属性设置 对象名 属性 属性值 对象名 属性 属性值 Forml caption 修改文字风格 Optionl(1) caption 华文新魏 Framel caption 字体 Check1(01) Styl 1 Frame2 caption 字形 Check1(0) caption 倾斜 Textl text VB程序设计 Checkl(1) caption 下划线 Optionl(0) caption 宋体 3.(16分)单击单选按钮或复选框后，文本框的文字作相应的变化，在相应的事件中完成相应代 码。（执行test1.exe文件，单击字体和字形选项给出正确结果各8分） 4.(2分)保存窗体文件和工程文件，生成可执行文件test1.exe保存到试题目录下的“D:八考试 结果\程序设计\试题一”文件夹。 代码区： 第二题(20分) 修改VB程序，使其具有下列功能：(1)单击“开始”按钮后，标签从右往左水平移动，每次移 动200缇。(2)单击“停止”按钮后，标签停止移动。(3)标签往左移动时，如果整个标签都移到 窗体外面了，则让标签从窗体最右边重新开始往左移动。(4)定时器的间隔时间由滚动条的(5)定 时器初始间隔时间是500 移的 打开“D:八考试结果\程序设计\试题二”文件夹中的工程文件“test2.vbp”,完成下列操作： 1.(3分)把D:八考试结果\程序设计\试题二”文件夹下code.t中的代码复制到定时器的相应事件 过程中 2.(15分，每个3分)分别在代码中的“(1)”、“(2)”、“(3)”、“(4)”、“(5)”处填写代码（填写完 成后，删除标号“(1)”、“(2)”、“(3)”、“(4)”、“(5)”)，以让程序正确执行。调试并运行程序。 3.(2分)保存窗体和工程文件，生成可执行程序“test2.exe”并保存到“D:\考试结果\程序设计 试题二”文件夹下 代码区： Private Sub Command1 Click() End Sub Private Sub Command2 Click() Timer1.Enabled False End Sub Private Sub HScroll1_Change() Timer1.Interval End Sub Private Sub HScroll1_Scroll() End Sub Private Sub Timer1_Timer() If Label1.Left < Then Label1.Left Form1.Width End If Label1.Left End Sub 试题三(25分) 修改VB程序，实现以下功能：(1)程序开始运行时，“输出”按钮不可用。单击“开始”按钮， 在标签数组中分别以0.1秒速度随机产生0,9七个数字，并不断滚动变化，同时“开始”按钮变成“结 束”。(2)单击“结束”按钮，标签数组中的数字停止变化，此时的七个数就是幸运数字，同时“输 出”按钮可用(3)单击“输出”按钮，对标签按钮中的奇数按反序输出在文本框中。 回 健机抽即7位凌运拉 反序等士出棋中的奇数 393 打开“D:\考试结果\程序设计\试题二”文件夹中的工程文件“test3.vbp”,完成下列操作： 1.(24分，每个4分)分别在代码中的“(1)”、“(2)”、“(3)”、“(4)”、“(5)”“(6)”处填写代码 (填写完成后，删除标号“(1)”、“(2)”、“(3)”、“(4)”、“(5)”“(6)”)，以让程序正确执行。调试 并运行程序。 2.(1分)保存窗体和工程文件，生成可执行程序“test3.exe”并保存到“D:\考试结果程序设计\ 试题三”文件夹下。 代码区： Dim a%(6) Private Sub Command1_Click() If Command1.Caption="开始"Then Timer1.Enabled Command1.Caption="结束 Else Timer1.Enabled False Command1.Caption= Command2.Enabled True End If End Sub Private Sub Command2 Click