1、vbVisual Basic语言程序设计笔试样卷 (考试时间90分钟,满分100分)一、选择题(1)(35)题每题2分,共70分。下列各题A)、B)、C)、D)四个先项中,只有一个选择是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。(1) 下列不能打开属性窗口的操作是 c 。A) 执行“视图”菜单中的“属性窗口”命令B) 按F4键C) 按Ctrl+TD) 单击工具栏上的“属性窗口”按钮 。(2) 下列可以打开立即窗口的操作是 d 。A) Ctrl+D B) Ctrl+E C) Ctrl+F D) Ctrl+G(3) inputBox函数反回值的类型为 d 。A) 数值 B) 字
2、符串C) 变体 D) 数值或字符串(视输入的数据而定)(4) 可以同时删除字符串前导和尾部空白的函数是是 A) Ltrim B) Rtrim C) Trim D) Mid(5) 表达式4+5 6 * 7 / 8 Mod 9 的值是A) 4 B) 5 C) 6 D) 7(6) 如果在立即窗口中执行以下操作:a=8 (是回车键,下同)b=9 print ab 则输出结果是 。A) -1 B) 0 C) False D) True(7) 以下语句的输出结果是 。Print Format $(32548.5,“000,000.00”)A) 32548.5 B) 32,548.5 C) 032,548.
3、50 D) 32,548.50(8) 执行以下程序段后,变量c$的值为a$=“Visual Basic Programing”b$=“Quick”c$=b$ & UCase(Mid$(a$,7,6) & Right $ (a$,11)A) Visual BASIC ProgramingB) Quick Basic ProgramingC) QUICK Basic ProgramingD) Quick BASIC Programing(9) 为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是 。A) Value B) Default C) Canc
4、el D) Enabled(10) 为了把焦点移到某个指定的控件,所使用的方法是A) SetFocus B) Visible C) Refresh D) GetFocus(11) 设a=6,则执行 x=IIf(a5,-1,0)后,x 的值为 。A) 5 B) 6 C) 0 D) -1(12) 执行下面的程序段后,x 的值为 。x=5For i=1 To 20 Step 2x=x+i5Next iA) 21 B) 22 C) 23 D) 24(13) 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()For i=1 To 4x=4For j =
5、1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后,单击命令按钮,输出结果是 。A) 7 B) 15 C) 157 D) 538(14) 在窗体上画一个命令按钮,然后编写如下事件过程:Prevate Sub Command1_Click()x=0Do Until x=-1a = InputBox(“请输入A的值”)a = Val(a)b = InputBox(“请输入B的值”)b = Val(b)x = InputBox(“请输入x的值”)x = Val(x)a = a+b+xLoopPrint aEnd Sub程序运
6、行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为 。A) 2 B) 3 C) 14 D) 15(15) 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name 属性为Command1),然后编写如下两个事件过程:Private Sub Command1_Click()a=Text1.Text+Text2.TextPrint aEnd Sub Private Sub Formm_Load()Text1 Text=Text2 Text=End sub程序运行后,在第一个文本框(Text1)和第二个文本框
7、(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为 。A) 444 B) 321123 C) 123321 D) 132231(16) 阅读下面的程序段:For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的三重循环后,a 的值为 。A) 3 B) 9 C) 14 D) 21(17) 在窗体上画一个文本框(其中Name属性为Text1),然后编写如下事件过程:Private Sub Form_Load()Ttext1.Text=Text1.SetFocusFor i=1 To 10Sum=Sum+iN
8、ext iText1.Text=SumEnd Sub上述程序的运行结果是 。A) 在文本框Text1中输出55B) 在文本框Text1中输出0C) 出错D) 在文本框Text1中输出不定值(18) 在窗体上画两个文本框(其Name 属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:Private Sub Command1_Click()x=0Do While xml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后,按回车键,输出结果为A) 48 B) 237
9、 C) 498 D) 4984 1 5 4二、填空题(每空分,共30分)请将每空的正确答案写在答题卡115序号的横线上,答在试卷上不得分。(1)设有如下的Visual Basic表达式:5 * x2 3 * x 2 * Sin(a)/3它相当于代数式【1】 。(2)执行下面的程序段后,s的值为 【2】 。s = 5For i = 2.6 To 4.9 Step 0.6s = s+1Next i(3)表达式Fix(-32.68)+Int(-23.02)的值为 【3】 。(4)为了在运行时把图形文件picfile. jpg装入图片框Picture1,所使用的语句为【4】 。(5)在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a = InputBox(请输入一个整数)b = InputBox(请输入一个整数)Print a + bEnd Sub程序运行后,单击命令按钮,在输入对话框中分别输入321和456,输出结果为 【5】。(6) 执行下面的程序段后,b的值为【6】 。a=300b=20a=a+bb=a-ba=a-b(7) 以下程序段的输出结果是【7】 。num=0While num=(10) 12 24(11) 13 -(12) 14 Unload15 Show
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1