admin 管理员组文章数量: 1184232
2024年3月9日发(作者：gets is deprecated)
一、选择题
1.
2. 中，取字符串”this is a test”的第一个字符，并将其赋值给字符变量ch。下列代码哪组正确？（假
设已经定义变量ch） B
A. ch = Char(Mid(“this is a test”,0,1))
B. ch = CChar(Mid(“this is a test”,0,1))
C. ch = Char(Mid(“this is a test”,1,1))
D. ch = CChar(Mid(“this is a test”,1,1))
3. Textbox控件限制用户输入字符长度的属性为:C
A. CharacterCasing B. Length C. MaxLength D. AutoSize
4. 过程changeName中执行下列代码后，字符串firstName的值是什么？ A
Dim firstName as String = “Tom”
Dim secondName as String = firstName
secondName &= “Jerry”
A. Tom B. Jerry C. Tom Jerry D. Tom & Jerry
5. 执行下列语句后，控制台输出什么结果A
Dim res as Integer = CType(“123.45”,Integer)
n(res)
A. 123 B. 12345 C. 0 D. res
6. 在中，无返回值的过程称为____A____过程
A. Sub B. Function C. Property D. Main
7. 在模块MyModule中定义的过程ShowHelpInfo（如下），其访问权限为_____C____。
Public Module MyModule
……
Sub ShowHelpInfo(String info)
(info)
End Sub
……
End Module
A. 仅在MyModule中可以使用 B. 在本项目中可以使用
C. 在本解决方案中可以使用 D. 在派生模块中可以使用
8. 下列程序在控制台上的输出结果为_____B____。
Public Function MyFunc(i as Integer)
If i > 0 Then
Return 100
Else
Return "hello"
1
End If
End Function
Public Shared Sub Main()
Dim x As Employee
ine(TypeName((-1)) & "," & TypeName((1)))
End Sub
A. Integer,String B. String,Integer C. Object,Object D. String,String
9. 下列主过程Main中执行完语句(i)后，局部变量i的值为____C____。
Class test
Public Sub MyFunc(ByVal i As Integer)
i = i * 2
End Sub
End Class
Sub Main()
Dim x As new test
Dim i As Integer = 100
(i)
End Sub
A. 0
B. 2
C. 100
D. 200
10. 在调试中，可以使用Visual 的下列哪种窗口查看和修改位于当前文本中的所有变
量？比如过程的所有局部变量。B
A．局部变量窗口 B.监视窗口 C.快速监视窗口 D.自动窗口
11. 已知数组arr进行以下定义： Dim arr() as Integer = {1,1,1,1,1}
过程MySub定义如下：
Sub MySub(ByVal ar() As Integer, ByRef x As Integer)
Dim i As Integer
For i = 0 To UBound(ar) ' 注：UBound(ar)求数组ar的下标上限
ar(i) = x
Next
x = 0
End Sub
则执行下列语句后，数组arr和变量data中的内容是什么？ C
Dim data As Integer = 2
MySub(arr, data)
A. arr={2,2,2,2,2} data=2 B. arr={1,1,1,1,1} data=2
C. arr={2,2,2,2,2} data=0 D. arr={1,1,1,1,1} data=0
12. 表达式CInt(True)的值为
2
版权声明：本文标题：vb习题及参考答案 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1709980728a552123.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论