199.如果有一个过程在定义时，其首行为Sub M(ByVal ParamArray a())，则其中的ParamArray表示（）。 A.动态参数 B.可变参数 C.可选参数 D.静态参数
200.有以下过程
Public Sub F1（ByRef n as integer ） …
n=3*n+4 …
End Sub
若n、m都被定义成整形变量，并且分别赋值为3、4，那么正确的调用语句是（）。 A.F1（n+m） B.F1(m) C.F1(5) D.F1(m,n)
201.要想从子过程调用后返回两个结果，下面子过程语句说明合法的是（）。 A.Sub f2(ByVal n%, ByVal m%) B.Sub f1(ByRef n%, ByRef m%) C.Sub f1(n%, ByRef m%) D.Sub f1(ByVal n%, m%)
202.有以下过程,关于形参n的说法正确的是（）。 Public Sub F1（ByRef n as integer ） … …
End Sub
A.形参n的变化不影响实参
C.形参n的值就是过程F1的返回值
B.形参n的变化影响实参 D.n是静态变量
203.有如下程序代码：
Private Sub Button1_Click(…) Dim a As Integer a = 2 Sum = 0 For i = 1 To 3
Sum = Sum + f(a) Next i
Label1.text=Sum End Sub
Function f(m As Integer) As Integer Static b As Integer b = b + 1 f = m * b End Function
运行程序，单击窗体后，Label1上显示的是()。 A.12 B.3 C.6
D.9
204.编写如下程序：
Button1_Click(…)Handles Button.Click Dim k As Integer x = 1
For k = 1 To 3 x = x * fun(k) Next k
Label1.text=x End Sub
Function fun(x As Integer) As Integer Static a a = a + 1 fun = a * x End Function
程序运行后，单击命令按钮Button1，输出结果为()。 A.6 B.36 C.3
205.有过程：
Private Function Max(ByRef x As Integer, ByRef y As Integer) As Integer If x < y Then Max=y Else Max=x
End If End Function 如果：
Dim a, b, c As Integer a = 10 b = 23
c = Max（a,b）
则a,b,c的值依次是()。 A.23,10,23 B.10,23,23 C.23,23,10
206.有过程：
Private Function Max(ByRef x As Integer, ByRef y As Integer) As Integer If x < y Then Max=y Else Max=x
End If End Function
如果：
Dim a, b, c As Integer a = 18 b = 25
D.30 D.23,10,23
c = Max（a,b）
则a,b,c的值依次是()。 A.25,18,25 B.18,25,25
C.25,25,18 D.25,18,25
207. Sub过程与Function过程最根本的区别是()。 A.Function过程可以有形参，Sub过程不可以
B.Sub过程可以直接使用过程名调用，而Function过程不可以 C.Sub过程不能返回值，而Function过程能返回值 D.两种过程的参数传递方式不同
208.在VB.NET中，向调用者返回某值的过程称为（）过程。 A.Sub B.Function C.Property#
D.Main
209.以下关于函数过程的叙述中，错误的是()。
A.函数过程形参的类型与函数返回值的类型没有关系。 B.在函数过程中，过程的返回值可以有多个。
C.当数组作为函数过程的参数时，只能以传址方式传递。
D.如果不指明函数过程参数的类型，并不表示参数没有数据类型。
210.有一函数Function F(ByVal a As Integer, ByVal b As Integer) As Integer，（）在调用时将发生错误。
A.Call F(1, 2) B.Y = F(F(2, 3), 4) C.Z = F(2.3, 5) D.X = F(3)
211.用来比较两个字符串的函数是（）。 A.StrComp B.String
C.Split
D.IsStr
212. LCase(Chr(Asc(的结果是( )。 A.68 B.100
C.
D.
213.下面程序段运行的结果是（）。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i, n As Integer, c, a As String a = n = Len(a)
For i = 1 To Len(a) \ 2 c = Mid(a, i, 1)
Mid(a, i, 1) = Mid(a, n - i + 1, 1) Mid(a, n - i + 1, 1) = c Next i
Label1.Text = a End Sub
A.computer B.mput C.retupmoc D.tup
214.Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a, n As Integer, x As String n = 10 x =
Do While n <> 0 a = n Mod 2 n = n \ 2
x = Chr(Asc( Loop
MsgBox( End Sub
注：0～9的ASCII为48～57。 请写出程序运行后的结果（）。 A.x=1010 B.x=1111 C.x=0101 D.x=0000
215.计算字符串长度的函数是（）。 A.Length B.Len
C.Long
D.Lens
216.将数值数据转换为字符型数据的函数是（）。 A.Asc(x) B.Chr(x) C.CStr(x)
D.Val(x)
217.表达式Microsoft.VisualBasic.Left(的值是()。 A.Thi B.This is a C.This
D.s is
218.表达式Microsoft.VisualBasic.right(的值是()。 A.a B.is a book C.book
D.ook
219.可以同时删除字符串头部和尾部空白的函数是()。 A.Trim() B.Rtrim() C.Mid()
D.Ltrim()
220.函数Str(234.56) 的值是()。 A.234.56 B.23456
C.
D.
221.将数字字符串转换成数值，可用下列()函数。 A.Fix() B.Chr() C.Asc()
D.Val()
222.判断是否是数字字符串，可用下列()函数。 A.IsNumeric() B.IsDate() C.IsArray()
D.Val()
223.以下说法不正确的是()。
A.调用函数Left 时，函数名前无须加命名空间的限定“Microsoft.VisualBasic”
B.调用函数Right 时，函数名前要加命名空间的限定“Microsoft.VisualBasic” C.LTirm() 和Left() 函数都是字符串函数 D.Rnd() 函数不是一个字符串函数
224.用于从字符串左边截取字符的函数是( )。 A.Ltrim( ) B.Trim()
C.Left()
D.Instr()
225.表达式Len(程序设计ABC的值（）。 A.10 B.14
C.17
D.20
226.可以同时删除字符串前导和尾部空白的函数是( )。 A.Ltrim B.Rtrim C.Trim
D.Mid
227.将字符串“3.1415926”强制转换成Double类型，可使用下列（）类型转换函数。 A.CStr B.CDbl C.CLn D.CType
228.表达式CInt(True)的值为()。 A.False B.True
C.1
D.-1
229.运行语句Dim Str1 = New String(后，Str1的值是（）。 A.I B.love C.Visual D.Basic
230. Str1 = ：StrResult = Ucase(Strl)则StrResult的值是（）。 A.Visual Basic B.C.D.VISUAL BASIC 231. Arc(Ucase((Chr(97))）)的计算结果是（）。 A.97 B.C.65
D.
232. InStr( Basic的结果是（）。 A.7 B.8 C.9
D.1
233.使用Left函数获取字符串Str1左边4个字符的语句是（）。 A.Microsoft.VisualBasic.Left(Str1,4) B.VisualBasic.Left(Str1,4) C.Left(Str1,4) D.Windows.VisualBasic.Left(Str1,4)
234. Mid(的结果和（）相同。 A.Microsoft.VisualBasic.right(B.Microsoft.VisualBasic.left(C.D.
235. a=利用变量a,b，生成的语句是（）。
A.a&b B.a+str(b) C.a+b D.a&Trim(str(b))
236.表达式Abs(-7) + Len(的值是（）。 A.12 B.13
C.7eleven
D.-7eleven
237.已知A$=，则表达式Val(Mid(A, 1, 4) + Mid(A, 4, 2))的值为（）。