填空题
有如下程序:
Private Sub command1_Click()
a=1:b=1
Print"a=";a;",b=";b
Call mult((a),b)
Print"a=";a;";b=";b 语句
End Sub
Sub mult(x,y)
x=2*k
y=3*k
Print"x=";x;",y=";y
End Sub
运行后,标有“语句”的Print语句的输出结果是______。
【参考答案】
a=1,b=3
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
font
点击查看答案&解析
填空题
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。 Private Sub Command1_Click() Dim x As Single x=InputBox( 请输入x的值! ) Select Case x Case Is<50 y=0.8*x Case 50 To 100 y=0.7*x ______ Print 输入的数据出界! End Select Print x,y End Sub
点击查看答案&解析
相关试题
a(k,j)