VB期末试卷(二)带答案演示教学

1、资料收集于网络，如有侵权请联系网站删除一、选择题（每题2 分，计 30 分）1、下列可以打开立即窗口的操作是（）A.Ctrl + DB.Ctrl + EC.Ctrl + FD.Ctrl + G2、如果在立即窗口中执行以下操作（<CR>是回车键）：A=8<CR>B=9CR>Printa > b<CR>则输出结果是（）A.-1B.0C.falseD.true3、当一个工程含有多个窗体时，其中的启动窗体是（）A. 启动 visual basic 时建立的窗体B. 第一个添加的窗体C.最后一个添加的窗体D. 在“工程属性”对话框中指定的窗体4、决定一个窗

2、体有无控制菜单的属性是（）A.minbuttonB.captionC.maxbuttonD.controlbox5、下列可以作为visual basic 变量名的是（）A.A#AB.4AC.?XYD.constA6、执行如下语句：A = inputbox( “ today”, ” tomorrow”, “yesterday ”, “day beforeyesterday”, 5 )将显示一个对话框，在对话框的输入区中显示的信息是（）A.TodayB.tomorrowC.yesterdayD.day before yesterday7、决定控件上文字的字体、字形、大小、效果的属性是（）A.tex

3、tB.captionC.nameD.font8、下列程序段的显示结果是（）X = 0Printx 1X = 3A.-1B.3C.2D.09、设 a = “12345678”，则表达式val（ left（ a , 4） + mid（ a , 4 , 2）的值为（）A.123456B.123445C.8D.610、在窗体上画一个名称为 list1 的列表框， 一个名称为 label1 的标签。 列表框中显示若干城市的名称。 当单击列表框中的某个城市名称时， 在标签中显示选中城市的名称。下列能正确实现上述功能的程序是（）A.privatesublist1_click()Label1 . captio

4、n = list1 . listindexEndsubB.privatesublist1_click()Label1 . name = list1 . listindexEndsubC.privatesublist1_click()Label1 . name = list1 . textEndsubD.privatesublist1_click()Label1 . caption = list1 . textEndsub11、在程序代码中将图片文件mypic . jpg 装入图片框picture1 的语句是（）A. picture1 . picture = “mypic . jpg ”B. p

5、icture1 . image = “mypic . jpg ”C. picture1 . picture =loadpicture( “mypic . jpg ”)D. loadpicture( “mypic . jpg ”)12、在列表框中当前被选中的列表项的序号是由下列哪一个属性表示（）A.listB.indexC.listindexD.tabindex13、在窗体上面画一个名称为TxtA 的文本框，然后编写如下的事件过程：PrivatesubTxtA_keypress(keyasciiasinteger)Endsub若焦点位于文本框中，则能够触发keypress 事件的操作是（）A.

6、单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键14、下列程序段的执行结果为（）K = 0Fori = 1to 3A = i i kPrinta ;NextiA.111B.149C.000D.12315、下列程序段的执行结果为（）X = 2word 可编辑资料收集于网络，如有侵权请联系网站删除Y = 1Ifx * y < 1theny = y 1elsey = -1Printy x > 0A.trueB.falseC.-1D.1二、填空题（每题2 分，计 20 分）1、VB 中系统运行的基本实体是（）2、在 VB 中，常量“ 987654.987654#”的数据类型是

7、 （）3、双击窗体中的对象后，VB 将显示的窗口是()4、在 VB 中，可以改变控件大小的快捷操作是（）5、触发文本框的Change 事件的条件是（）6、计时器控件能有规律地以一定时间间隔触发（）事件，并执行该事件过程中的程序代码7、为了使标签能自动调整大小以显示全部文本内容，应把标签的（）属性设置为true8、在 3 种不同类型的组合框中，只能选择而不能输入数据的组合框是（）9、全局变量必须在（）模块中定义10、为了把一个visual basic 应用程序装入内存，只要装入 （）文件即可三、判断题（每题1 分，计 10 分）1、VB 对象的 name 属性和 caption 属性作用完全相同

8、。 （）2、DblClick事件是对象被鼠标双击时触发的事件。（）3、VB 表达式 3 3 * 3 / 3 mod 3 的值是 1。（）4、在 VB 中标签框可以获得焦点。（）5、块 if 结构必须有endif 语句。（）6、循环语句fori = 1to1nexti , 不能执行循环体。 （）7、图片框比图象框功能更强，它不仅可以显示图，还可以用print 方法显示文本。（）8、组合框的style 属性决定了组合框的风格。（）9、在 VB 中 load 方法和 show 方法相同。（）10、工程文件的扩展名为 frm 。（）四、程序填空题（每空2 分，计 10 分）1、在窗体上画一个文本框和一

9、个图片框，然后编写如下两个事件过程：Privatesubform_load （）Text1 . text = “计算机”EndsubPrivatesubtext1_change()Picture1 . print“等级考试”Endsub程序运行后，在文本框中显示的内容是（），而在图片框中显示的内容是（）。2、输入一个0 99999 之间的整数，判断输入的是几位数。在窗体上有一个名为 command1 的命令按钮控件。 运行程序时， 单击 command1 命令按钮， 要求输入一个 099999 之间的整数。输入整数后，程序给出计算结果。请将程序补充完整：Privatesubcommand1_c

10、lick （）DimxaslongX = val （ inputbox （“请输入一个099999 之间的整数” ，“输入”）Ifx 10 = 0thenPrintx ；“是 1 位数”Elseif（）thenPrintx ；“是 2 位数”Elseif（）thenPrintx ；“是 3 位数”Elseif（）thenPrintx ；“是 4 位数”elsePrintx ；“是 5 位数”EndifEndsub五、程序输出结果题（每题5 分，计 20 分）1、下列程序段的执行结果为：Forx = 5to1step-1Fory = 1to6 xPrinttab( y + 5 ) ; “* ”;

11、NextyPrintNextx2、单击命令按钮时，下列程序代码的执行结果为：Public Sub proc1(n As Integer, ByVal m As Integer)n = n Mod 10m = m / 10End SubPrivate Sub Command1_Click()Dim x As Integer, y As Integerx = 12y = 34Call proc1(x, y)word 可编辑资料收集于网络，如有侵权请联系网站删除Print x; yEnd Sub3、以下程序段的输出结果是：Num = 0Dowhilenum <= 5Num = num + 1L

12、oopPrintnum4、下列程序段的执行结果为：Dima（ 10）， b（ 5）Fori = 1to10A （ i） = iNextiForj = 1to5B（ j） = j * 20NextjA （ 5） =b （2）Print“A（5）=”；A（5）六、编程题（每题10 分，计 10 分）由键盘给定一个两位整数，要求交换个位和十位的位置，把处理结果显示在窗体上（可以设计单击窗体事件，也可以设计单击按钮事件）？白山职业技术学校20122013 学年度第二学期期末试卷答案word 可编辑资料收集于网络，如有侵权请联系网站删除一、选择题9、×1、 D2、 C10、×3、 D四、程序填空题4、 D5、 D1、计算机6、 C2、等级考试7、 D8、 A3、 x 100 = 09、 B10、 D4、 x 1000 = 011、C12、 C5、 x 10000 = 013、 D14、 C15、 B五、程序输出结果题二、填空题1、 *1、对象*2、双精度（ double）3、代码窗口4、 shift+ 上下左右键*5、文本框内容发生改变*6、 timer7、 autosize*8、下拉式组合框2、 2349、标准10、工程3、 6三、判断题1、×2、