单项选择题

执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1 Click() Dim a a= Array("a", "b", "C", "d", "e", "f", "g") Print a(1); a(3); a(5) End Sub

A.ab;
B.bdf
C.ace
D.出错
<上一题 目录 下一题>
热门 试题

单项选择题
函数过程F1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。以下能正确实现上述功能的代码是
A.Function F1(b As Intege If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
B.Function F1(b As Intege If b Mod 2=0 Then F1=0 Else F1=1 End If End Function
C.Function F1(b As Intege If b Mod 2=0 Then F1=1 Else F1=0 End If End Function
D.Function F1(b As Intege If b Mod 2<>0 Then Return 0 Else Return 1 End If End Function
相关试题
  • 在窗体上绘制一个文本框和一个计时器控件,...
  • 有如下程序: Private Sub Form Click...
  • 有如下程序: Option Base 1 Private...
  • 在窗体上画一个名称为Command1的命令按钮...
  • 在窗体上画一个名称为Text1的文本框和一个...