[单项选择题] 在窗体上画一个命令按钮，然后写出如下事件过程：　　Private Sub Command1 _ Click( )　　　　S=1　　　　Do　　　　　　S=(S + 1) ^(S + 2

[单项选择题] 在窗体上画一个命令按钮，然后写出如下事件过程：　　Private Sub Command1 _ Click( )　　　　S=1　　　　Do　　　　　　S=(S + 1) ^(S + 2)　　　　　　Number=Number+1　　　　Loop Until S＞=6　　　　Print Number，S　　End Sub　　程序运行后，输出的结果是()。

A． Function CT(ByVal a As Integer)　　　　If a Mod 2=0 Then　　　　　Return 0　　　　ElSe　　　　　Return 1　　　　End if　　End Function
B． Function CT(ByVal a As Integer)　　　If a Mod 2=0 Then　　　　CT=0　　　Else　　　　CT=1　　　End if　　End Function
C． Function CT(ByVal a As Integer)　　　If a Mod 2=0 Then　　　　　CT=1　　　Else　　　　　CT=0　　　End if　　End Function
D． Function CT(ByVal a As Integer)　　　If a Mod 2=0 Then　　　　　Return 1　　　Else　　　　　Return 0　　　End if　　End Function

参考答案：

B

问题解析:

字符型数据的定界符为半角单引号、双引号或方括号。但是，如果某种定界符本身也为字符串内容，则需要用另一种定界符为该字符串定界。