单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程： 　　Private Sub Command_Click( ) 　　　　S=0 　　　　Do 　　　　　　s=(s + 1) * (s +2) 　　　　　　Number=Number+1 　　　　Loop Until S＞=30 　　　　Print Number，S 　　End Sub 　　程序运行后，输出的结果是( )。

A．SELECT
B．CREATE
C．ALTER
D．DROP
<上一题 目录 下一题>
热门 试题

单项选择题
单击命令按钮时，下列程序的执行结果为（ ）。Private Sub Command1_Click()Dim x As Integer，y As Integerx=50：y=78Call PPP(x，y)Print x；yEnd SubPublic Sub PPP(ByVal n As Integer，ByValm As Integer)n=n 10m=m 10End Sub
A．0 8
B．50 78
C．4 50
D．78 50
单项选择题
下面4个CT函数中是用来判断用户输入的数是否为奇数的，是奇数的返回1，否则返回0，其中正确的是（ ）。
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
相关试题