计算机专业第二次月考试题.docVIP

计算机专业第二次月考试卷 一、选择题（本大题共10小题，每小题2分，共20分） 1．在Visual Basic中，Print Int(35*Rnd)+n产生的随机数的范围是10至44（含10及44），则n是...............................................（　 　） A．10　 B. 20 C. 30 D. 35 2. 在Visual Basic中，下列可作为Visual Basic变量名的是............（　 　） A. Filename 　 B. Val　　 C. X%D 　　 D. Print 3. 在Visual Basic中，下列语句用来设置窗体中文本框（名称Text1）的属性，其中在运行时不能正确操作的语句是..................................（　 　） A. Text1.Text=Text Test B. Text1.Name=Text Test C. Text1.Enabled = False D. Text1.Visible = False 4. 在Visual Basic中,下列运算符优先级最高的是......................（　 　） A. + B. * C. D．And 5. 执行下面Visual Basic程序后，结果是哪个选项......................（　 　） For i = 1 To 6 If i Mod 2 = 0 Then Print #; Else Print *; End If Next i A．###### B．****** C．*#*#*# D．#*#*#* 6. 下面的Visual Basic程序是对数组a中的元素按升序排列，程序中空白位置应该填下列选项中的哪一个............................................（　 　） Option Base 1 Dim i As Integer Dim j As Integer a = Array(2, 4, 7, 9, 3, 6, 20, 11) For i = 1 To 7 For j = i + 1 To 8 If a(i) a(j) Then a(i) = a(i) + a(j) a(j) = a(i) - a(j) _____________ End If Next j Next i For i = 1 To 8 Print a(i); Next i A. a(i)=a(j) B. a(i) = a(i) - a(j) C. a(j)=a(i)-a(j) D. Exit For 7. 执行下面Visual Basic程序后，s=s+1语句被执行了多少次...........（　 　） Dim s As Integer s = 0 For i = 1 To 10 For j = 0 To i - 1 s = s + 1 Next j Next i A. 0 B. 10 C．55 D. 66 8. 执行下面Visual Basic程序，数组a中的数字50所在位置的下标是....（　 　） Option Base 1 Private Sub Command1_Click() Dim i As Integer Dim k As Integer Dim t As Integer Dim w As Integer Dim m As Integer a = Array(3, 56, 8, 10, 89, 94, 78, 82, 20, 50, 100) m = UBound(a) k = m / 2 For i = 1 To k w = a(i): a(i) = a(m - i + 1): a(m - i + 1) = w Next i End Sub A. 1 B. 2 C. 3 D. 5 9. 在Visual Basic中，关于控件及窗体说法不正确的是.