原创力文档- 1、本文档共4页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2011秋学期期末考试vb部分试题
一、选择题
1.与语句Dim abc%作用相同的语句是___A____。
A. Dim abc As Integer B. Dim abc As Long C. Dim abc As String D. Dim abc As Date
2.定义数组A(1 to 5,5)后，下列哪一个数组元素不存在___C____。
A. A(1,1) B. A(1,5)
C. A(0,1) D. A(5,5)
3.在Visual Basic应用程序中，以下描述正确的是___B____。
A. 过程的定义可以嵌套，但过程的调用不能嵌套
B. 过程的定义不可以嵌套，但过程的调用可以嵌套
C. 过程的定义和过程的调用均可以嵌套
D. 过程的定义和过程的调用均不可以嵌套
4.在在窗体上添加一个命令按钮Command1和一个文本框Text1，然后编写如下事件过程：
Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)
c = a + b
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
x = 5
y = 7
z = 0
Call p1(x, y, z)
Text1.Text = Str(z)
End Sub
程序运行后，单击命令按钮得到的结果是___B____。
A. 0 B. 12 C. Str(z) D. 没有显示
5.假定有如下的Sub过程：
Sub swapp(x As Single, y As Single)
t = x
x = t / y
y = t Mod y
End Sub
在窗体上添加一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a = 5: b = 4
swapp a, b
Print a, b
End Sub
程序运行时，单击命令按钮得到的结果是___D__。
A. 5 4 B. 1 1
C. 1.25 4 D. 1.25 1
6.运行下列程序，单击命令按钮后的结果是___C____。
Function fun(a As Integer)
b = 0
Static c
b = b + 1
c = c + 1
fun = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 2
For i = 1 To 3
Sum = Sum + fun(a)
Next i
Print Sum
End Sub
A. 24 B. 12 C. 15 D. 32
7.阅读程序：
Sub subp(b() As Integer)
For i = 1 To 4
b(i) = 2 * i
Next i
End Sub
Private Sub Command1_Click()
Dim a(1 To 4) As Integer
a(1) = 5: a(2) = 6: a(3) = 7: a(4) = 8
subp a
For i = 1 To 4
Print a(i);
Next i
End Sub
程序运行时，单击命令按钮得到的结果是___A____。
A. 2 4 6 8 B. 5 6 7 8
C. 10 12 14 16 D. 出错
8.假定有以下函数过程：
Function func(a As Integer, b As Integer) As Integer
func = a + b
End Function
在窗体上添加一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
p = func(10,20)
Print p;
End Sub
程序运行时，单击命令按钮得到的结果是___C_
文档评论（0）