课件编号10660706

内蒙古自治区巴彦淖尔市临河区第三高级中学2022届高三上学期期中考试(计算机班)VB试卷(Word版含答案)

日期:2024-05-21 科目:信息技术 类型:高中试卷 查看:16次 大小:57344Byte 来源:二一课件通
预览图 1/5
学期,版含,Word,试卷,VB,计算机
  • cover
临河三中2021-2022学年第一学期 高三计算机类Visual Basic程序设计期中考试试卷 一、单项选择题(每小题2分,共40分,从下列每小题给出的四个选项中选出一个正确答案,用铅笔把答题卡上对应题目的答案标号涂黑,如需改动,用橡皮擦干净后,再选涂其他答案) 1. 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是_____。 A. Form1.Name ="VisualBasic窗体" B. Form1.Title="VisualBasic窗体" C. Form1.Caption="VisualBasic窗体" D. Form1.Text="VisualBasic窗体” 2.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Move 500,500 End Sub 程序运行后,单击命令按钮,执行的操作为_____。 A.命令按钮移动到距窗体左边界、上边界各500的位置 B.窗体移动到距屏幕左边界、上边界各 500的位置 C. 命令按钮向左、上方向各移动500 D. 窗体向左、上方向各移动500 3.在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是_____。 A. TabStop B. Enabled C. Visible D. Tabindex 4.在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为_____。 A. For i=0 To List1.ListCount-1 ..... Next B. For i=0 To ListCount-1 ..... Next C. For i=1 To List1.listCount ..... Next D. For i=1 To ListCount ..... Next 5.以下Case语句中错误的是_____ A. Case 0 To10 B.Case is>10 C. Case is>10 And is<50 D. Case 3,5, is>10 6. 以下关于图片框控件的说法中,错误的是_____ A. 可以通过Print方法在图片框中输出文本 B. 清空图片框控件中图形的方法之一是加载一个空图形 C. 图片框控件可以作为容器使用 D.用Stretch属性可以自动调整图片框中图形的大小 7.执行语句s=Len(Mid("VisualBasic",1,6,)后,s的值是____。 A. Visual B. Basic C. 6 D.11 8.当一个复选框被选中时,它的Value属性的值是_____ A.3 B. 2 C.1 D.0 9.以下关于函数过程的叙述中,正确的是_____ A.函数过程形参的类型与函数返回值的类型没有关系 B.在函数过程中,过程的返回值可以有多个 C.当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递 D.如果不指明函数过程参数的类型,则该参数没有数据类型 10.确定一个控件在窗体上的位置的属性是_____ A.Width和Height B. Width 或Height C.Top和Left D. Top或Left 11.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程 Private Sub Command1 _Click() Text1.Text = "Visual" Me.Text1= "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是_____ A. Visual B. Basic C. Program D.出错 12.以下关系表达式中,其值为False 的是_____ A. "ABC">"AbC" B. "the"<>"they" C. "VISUAL"=UCase("Visual") D. "Integer">"Int" 13.语句Print 5/4*6\5 Mod 2的输出结果是_____ A. 0 B. 1 C.2 D. 3 14.在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程: Private SubCommand1_ Click( ) strText = InputBox("请输入") Text1.Text = strText End Sub Private Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是_____ A.空 B. abedef C.abc D. def 15.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_ Click() x=-5 If Sgn(x) Then y= Sgn(x^2) Else y= Sgn(x) End If Print y End Sub 程序运行后,单击命 ... ...

~~ 您好,已阅读到文档的结尾了 ~~