单项选择题 下面程序运行后的输出结果是（）Dim x%（10）For a=1To 5x（a）=（a-1）*3Next aFor a=3To 4Print x（a）；Next a

单项选择题 下列程序段的执行结果为（）a=1If a<=1 Then b=aIf a<=2 Then b=2*aIf a<=4 Then b=4*aPrint b

单项选择题 在窗体中添加一个命令按钮Command1，并编写如下程序：Private Sub Command1_Click（）Dim x As Integerx=Val（InputBox（"请输入一个数"））If x^2=9Then y=xIf x^29Then y=x^2+1Print yEnd Sub程序运行后，在InputBox中输入3，单击命令按钮，程序的运行结果是（）。