[单选题]

在窗体上画一个命令按钮,命名为CommandI。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程 F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。 能够正确实现上述功能的代码是

A.Privme Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

B.Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function

C.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function

D.Private Sub Command1_Click() x=InputBox(“请输入整数”) F1 (Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

参考答案与解析:

相关试题

在窗体上画一个命令按钮,命名为Command1。程序运行后,如果单击命令按钮,则

[单选题]在窗体上画一个命令按钮,命名为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则F1返回1,否则返回0。能够正确实现上述功能的代码是 。A.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As I

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则

    [单选题]在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述功能的代码是( )。A.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(byRef b As Integer

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则

    [单选题]在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。对下面程序说法正确的是()Private Sub Command1_Click()x=InputBox("请输入整数")a=F1(Val(x))Print aEnd SubFunction F1(ByRef b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd Fu

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下时间过程( )。 程序运行后,单击命令按钮,

    [单选题]在窗体上画一个命令按钮,然后编写如下时间过程( )。程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是A. 579B. 123C. 456D. 123456

  • 查看答案
  • 在窗体上画一个名为Commandl的命令按钮,编写如下程序: 程序运行后,单击命

    [单选题]在窗体上画一个名为Commandl的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是( )。A. 4B. 5C. 6D. 8

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ()

    [单选题]在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ( )。Private Sub Command4_Click()D.ima As Integer,bASIntegera=1b=2PrintN(a,b)E.nd SubF.unction N(X As Integer,yAsInteger)AsIntegerN=IIf(x>y,x,y)E.nd FuncfionA.B.C.D.

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出

    [单选题]在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是( )。Private Sub p1(n As Integer)F.or i=n To 1 Step-1x=String(i,"*")Print xNext iE.nd SubPrivate Sub Command1_Click()p1(3)E.nd SubA)*B)C)D)A.*** ** *B.* ** ****C.* * *D.******

  • 查看答案
  • 在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出

    [单选题]在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果为( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i,"*") Print x Next i End Sub Private Sub Command1_Click() p1(3) End SubA.*** ** *B.* ** ***C.* * *D.******

  • 查看答案
  • 在窗体上画一个命令按钮。然后编写如下事件过程:程序运行后,连续单击三次命令按钮,

    [单选题]在窗体上画一个命令按钮。然后编写如下事件过程:程序运行后,连续单击三次命令按钮,输出的结果是A.7 36B.15 72C.1 5 108D.72 256

  • 查看答案
  • (16)在窗体上画一个命令按钮,其名称为Commandl.程序运行后,单击命令按

    [单选题](16)在窗体上画一个命令按钮,其名称为Commandl.程序运行后,单击命令按钮,输出结果是 Private Sub p1(n As Integer) For i=n To 1 Step -1 x=String(i,"*") Print x Next i End Sub Private Sub Commandl_Click() P1(3) End SubA.*** ** *B.* ** ***C.* * *D.******

  • 查看答案