在窗体中添加一命令按钮,并在命令按钮中编写如下代码: Private Sub Commandl_C1ick() Dim a As Single a=-1.234567 b=Int(A)c=Sgn(A)d=Abs(A)e=Fix(A)If a<b Then Print b: If a<c ThenPrint c; H a<d ThenPrint d; H a<e Then Print e; Print End sub 运行后输出结果是 ( )A.-2 -1 1.234 567 -1B.-2 1.234 567C.-1 1.234 567 -1D.-1 -1.234 567 -1
在窗体中添加一命令按钮,并在命令按钮中编写如下代码: Private Sub Commandl_C1ick() Dim a As Single a=-1.234567 b=Int(A)c=Sgn(A)d=Abs(A)e=Fix(A)If a<b Then Print b: If a<c ThenPrint c; H a<d ThenPrint d; H a<e Then Print e; Print End sub 运行后输出结果是 ( )
A.-2 -1 1.234 567 -1
B.-2 1.234 567
C.-1 1.234 567 -1
D.-1 -1.234 567 -1
相关考题:
在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10
在窗体上添加一个命令按钮(名为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
在窗体上添加一个命令按钮和一个文本框,并在命令按钮中编写如下代码:PrivateSubCommand1_Click()a=1.2c=Len(Str( )+Space(10))Text1.Text=cEndSub程序运行后,单击命令按钮,在文本框中显示( )A.3B.8C.14D.10
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10
在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),并在命令按钮中编写如下事件代码:PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10
( 32 ) 在窗体上添加一个命令按钮 ( 名为 Command1 ) 和一个文本框 ( 名为 Text1 ) , 并在命令按钮中编写如下事件代码:Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后,单击命令按钮,在文本框中显示A ) 5B ) 8C ) 9D ) 10