问题
单项选择题
在窗体上画一个命令按钮，然后写出如下事件过程： 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
解析：字符型数据的定界符为半角单引号、双引号或方括号。但是，如果某种定界符本身也为字符串内容，则需要用另一种定界符为该字符串定界。