窗体中有命令按钮Commandl和文本框Text1,事件过程如下: Function result (By x As Integer)As Boolean If x Mod 2=0 Then result=True else result=False End if End Function PrivateSub Commandl_Click( ) x=Val(InputBox(”请输入一个整数”)) If __________Then Text1=Str(x)”是偶数.” Else Text1=Str(x)”是奇数.” End If End Sub 运行程序,单击命令按钮,输入19,在Text1中会显示“19是奇数”。那么以上程序的空白处应填写( )。A.result(x)=“偶数”B.result(x)C.result(x)=“奇数”D.NOT result(x)
窗体中有命令按钮Commandl和文本框Text1,事件过程如下: Function result (By x As Integer)As Boolean If x Mod 2=0 Then result=True else result=False End if End Function PrivateSub Commandl_Click( ) x=Val(InputBox(”请输入一个整数”)) If __________Then Text1=Str(x)&”是偶数.” Else Text1=Str(x)&”是奇数.” End If End Sub 运行程序,单击命令按钮,输入19,在Text1中会显示“19是奇数”。那么以上程序的空白处应填写( )。
A.result(x)=“偶数”
B.result(x)
C.result(x)=“奇数”
D.NOT result(x)
相关考题:
窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:For i=1T04X==3For i=1t03For k=1T02x=x+3Next kNext jNext iText1.Value=Str(x)End Sub运行以上事件过程,文本框中的输出是( )。A.6B.12C.18D.21
在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事件代码: Private Sub Commandl_click() m=2.17 n=Len(Str$(m) +Space(5) ) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Text1),然后编写如下事件过程:Private Sub Command1_Click()Dim x As Integer,y As Integer,z As Integerx=5:y=7:z=0Me!Text1=””Call p1(x,y,z)Me!Text1=zEnd SubSub p1(a As Integer,b As Integer,c As Integer)c=a+bEnd Sub打开窗体运行后,单击命令按钮,文本框中,显示的内容是【 】。
窗体中有命令按钮Command1和文本框Text1,事件过程如下:Function result(ByVal x As Integer)As BooleanIf x Mod 2=0 Thenresult=Trueelseresult=FalseEnd IfEnd FunctionPrivate Sub Command1_Click()x=Val(InputBox(“请输入一个整数”))If______ ThenTextl=Str(x)“是偶数.”ElseTextl=Str(x)“是奇数.”End IfEnd Sub运行程序,单击命令按钮,输入19,在Textl中会显示“19是奇数”。那以在程序的空白处应填写( )。A.result(x)=“偶数”B.result(x)C.result(x)=“奇数”D.NOT result(x)
窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:Private Sub Commandl Click( ) For i=1T04X==3 For i=1t03 For k=1T02 x=x+3 Next k Next j Next i Text1.Value=Str(x) End Sub 运行以上事件过程,文本框中的输出是( )。A.6B.12C.18D.21
在窗体中有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private Sub Commandl—Click( ) For i=1 T04 X=3 For j=1 T03 For k=1 T02 x=x+3 Next k Next jNext iText1.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框Text1中输出的结果是( )。A.6B.12C.18D.21
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),然后编写如下事件过程: