admin 管理员组文章数量: 1086019
2024年3月27日发(作者：慕课网网址是什么)
VB程序设计复习模拟试题一及答案
一、选择题
(1)执行语句 Dim X,Y As Integer 后,（ ）
A)X和Y均被定义为整型变量 B)X和Y均被定义为变体类型变量
C)X被定义为整型变量,Y被定义为变体变量 D)X被定义为变体类型变量,Y被定义为整型变量
(2)以下关系表达式中，其值为True的是
A)"XYZ">"XYz" B)"VisualBasic"<>"visualbasic"
C)"the"="there" D)"Integer"<"Int"
(3)执行以下程序段
a$="Visual Basic Programming"
b$="C++"
C$=UCase(Left$(a$,7)) & b$ & Right$(a$,12)后,变量C$的值为
A)Visual BASIC Programming B)VISUAL C++ Programming
C)Visual C++ Programming D)VISUAL BASIC Programming
(4)下列叙述中正确的是
A)MsgBox语句的返回值是一个整数
B)执行MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作
C)MsgBox语句的第一个参数不能省略
D)如果省略MsgBox语句的第三个参数(Title),则信息框的标题为空
(5)在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入
一个字符，都会立即在标签中显示文本框中字符的个数,以下可以实现上述操作的事件过程是
A)Private Sub Text1_Change()
n=str(Len())
End Sub
B)Private Sub Text1_Click()
n=str(Len())
End Sub
C)Private Sub Text1_Change()
n=
End Sub
D)Private Sub Label1_Change()
n=str(Len())
End Sub
(6)在窗体上画两个单选按钮(名称分别为Option1,Option2,标题分别为"宋体"和"黑体"),1个复选框
(名称为Check1,标题为粗体)和1个文本框(名称为Text1,Text属性为"改变文字字体")，窗体外观如
图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句
序列是
A)=False
=True
B)=True
=0
C)=False
=2
D)=True
=1
(7)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:
Private Sub Command1_Click()
c=1234
c1=Trim(Str(c))
For i=1 To 4
Print ____
Next
End Sub
程序运行后,单击命令按钮，要求在窗体上显示如下内容：
1
12
123
1234
则在横线处应填入的内容为
A)Right(c1,i) B)Left(c1,i) C)Mid(c1,i,1) D)Mid(c1,i,1)
(8)假定有一下程序段
For i=1 To 3
For j=5 To 1 Step -1
Print i*j
Next j
Next i
则语句Print i*j 的执行次数是
A)15 B)16 C)17 D)18
(9)在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Command1），
然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do While x<50
x=(x+2)*(x+3)
n=n+1
Loop
=Str(n)
=Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为
A)1和0 B)2和72 C)3和50 D)4和168
(10)阅读程序：
Private Sub Command1_Click()
a=0
For j=1 To 15
a=a+j Mod 3
Next j
Print a
End Sub
程序运行后，单击窗体，输出结果是
A)105 B)1 C)120 D)15
(11)以下说法中正确的是
A)当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程
B)因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程
C)若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中 的KeyCode参
数的值也相同
D)在KeyPress事件过程中，KeyAscii参数可以省略
(12)语句Dim a(-3 To 4,3 To 6) As Integer 定义的数组的元素个数是
A)18 B)28 C)21 D)32
(13)在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a = Array(1, 2, 3, 4)
j = 1
For i = 4 To 1 Step -1
s = s + a(i) * j
j = j * 10
Next i
Print s
End Sub
程序运行后，单击命令按钮，其输出结果是
A)4321 B)1234 C)34 D)12
(14)假定通过复制，粘贴操作建立了一个命令按钮数组Command1，以下说法中错误的是（ ）
A)数组中每个命令按钮的名称(Name属性)均为Command1
B)若未做修改,数组中每个命令按钮的大小都一样
C)数组中各个命令按钮使用同一个Click事件过程
D)数组中每个命令按钮的Index属性值都相同
(15)在窗体上画一个命令按钮，名称为Command1,然后编写如下代码：
Option Base 0
Private Sub Command1_Click()
Dim A1(4) As Integer, A2(4) As Integer
For k = 0 To 2
A1(k + 1) = InputBox("请输入一个整数")
A2(3 - k) = A1(k + 1)
Next k
Print A2(k)
End Sub
程序运行后,单击命令按钮，在输入对话框中依次输入2、4、6则输出结果为
A)0 B)1 C)2 D)3
(16)以下关于函数过程的叙述中，正确的是（ ）
A)函数过程形参的类型与函数返回值的类型没有关系
B)在函数过程中，过程的返回值可以有多个
C)当数组作为函数过程的参数是，既能以传值方式传递，也能以传址方式传递
D)如果不指明函数过程参数的类型，则该参数没有数据类型
(17)在窗体上画两个标签按钮和一个命令按钮，其名称分别为Label1、Label2和Command1，然后
编写如下程序：
Private Sub func(L As Label)
n = "1234"
End Sub
Private Sub Form_Load()
n = "ABCDE"
n = 10
End Sub
Private Sub Command1_Click()
a = Val(n)
Call func(Label1)
n = a
End Sub
程序运行后，单击命令按钮，则在两个标签中显示的内容分别为
A)ABCD和10 B)1234和100 C)ABCD和100 D)1234和10
(18)在窗体上画一个命令按钮(名称为Command1)，并编写如下代码:
Function fun1(ByVal a As Integer, b As Integer) As Integer
Dim t As Integer
t = a - b
b = t + a
fun1 = t + b
End Function
Private Sub Command1_Click()
Dim x As Integer
x = 10
Print fun1(fun1(x, (fun1(x, x - 1))), x - 1)
End Sub
程序运行后，单击命令按钮，输出结果是
A)10 B)0 C)11 D)21
(19)以下关于过程及过程参数的描述中，错误的是
A)过程的参数可以是控件名称
B)调用过程时使用的实参的个数应与过程形参的个数相同
C)只有函数过程能够将过程中处理的信息返回到调用程序中
D)窗体可以作为过程的参数
(20)设有如下通用过程
Public Function Fun(xStr As String) As String
Dim tStr As String, strL As Integer
tStr = ""
strL = Len(xStr)
i = strL / 2
Do While i <= strL
tStr = tStr & Mid(xStr, i + 1, 1)
i = i + 1
Loop
Fun = tStr & tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下事件过
程（ ）
Private Sub Command1_Click()
Dim S1 As String
S1 = "ABCDEF"
= LCase(Fun(S1))
版权声明：本文标题：VB程序设计复习模拟试题一及答案 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/p/1711486331a596494.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论