更多"下面程序运行时，若输入395，则输出结果是( )。 Private"的相关试题:
[单项选择]下面的程序运行时，若输入395，则输出结果是
Private Sub Command1_Click（ ）
Dim x%
x=InputBox("请输入一个3位整数")
Print x Mod 10, x/100, (x Mod 100)/10
End Sub
A. 3 9 5
B. 5 3 9
C. 5 9 3
D. 3 5 9
[单项选择]
下面程序运行时，若输入395，则输出结果是（）
Private sub command1_Click（ ）
Dim x%
x=InputBox("请输入一个3位整数")
Print x Mod 10，x＼100，(x Mod 100)＼10
End Sub
A. 3 9 5
B. 5 3 9
C. 5 9 3
D. 3 5 9
[单项选择]下列程序运行时输出的结果是
Private Sub Form_Click（ ）
Dim x
x=Array("天天向上"，"清华大学"，"天上人间"，"程序设计")
For i=LBound(a,1)to UBound(a,1)
If Left(a(i),1)="天"Then Print a(i)；
Next
End Sub
A. 天天向上
B. 天天向上天上人间
C. 出错信息
D. 天天向上清华大学天上人间程序设计
[单项选择]下列程序运行时输出的结果是( )。
Option Base 1
Private Sub Form_Click（ ）
Dimx(10)
ForI=1 to 10
x(i)=10-I+1
Next I
ForI=10 to 1 step-2
Printx(i)；
NextI
End Sub
A. 1 3579
B. 975 3 1
C. 1234567 89 10
D. 1098765432 1
[单项选择]下列程序在运行时输出的结果是( )。
Option Base 1
Private Sub Form_Click（ ）
Dim x(10)
For i=1 To 10
x(i)=10-i+1
Next i
For i=10 To 1 Step-2
Print x(i)
Next i
End Sub
A. 1 3 5 7 9
B. 9 7 5 3 1
C. 1 2 3 4 5 6 7 8 9 10
D. 10 9 8 7 6 5 4 3 2 1
[单项选择]下列程序运行时输出的结果是( )。
Private Sub Form_Click（ ）
Dima
a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计")
forI=Lbound(a，1) to Ubound(a，1)
ifleft(a(i)，1)="天"then print a(i)；
nextI
End Sub
A. 天天向上
B. 天天向上天上人间
C. 出错信息
D. 天天向上清华大学天上人间程序设计
[单项选择]以下程序运行时，输入3和4后输出的结果是______。
Private Sub Command1_Click（ ）
a=InputBox(“请输入a的值”)
b=InputBox(“请输入b的值”)
Print a+b
End Sub
A. 3+4
B. 7
C. 34
D. 12
[单项选择]下列程序运行时，两次单击窗体后，显示的结果是( )。
Private Sub Form_Click（ ）
Dim b As Integer
Static c As Integer
b=b+2
c=c+2
Print "b="；b;"c=";c
End Sub
A. b=2 c=2
B. b=2 c=2
C. b=2 c=2
D. b=2 c=2
[单项选择]若看到程序中有以下事件过程，则可以肯定的是，当程序运行时( )。
Private Sub Click_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print "Visual Basic Program"
End Sub
A. 用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程
B. 用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C. 用鼠标右键单击名称为“MouseDown”的控件时，执行此过程
D. 用鼠标左键或右键单击名称为“Click”的控件时，执行此过程
[单项选择]下面程序运行后的输出结果是
Private Sub Command1_Click（ ）
For j=1 To 10
If j Mod 3＜＞0 Then a=a+j/3
Next
Print a
End Sub
A. 20
B. 10
C. 3
D. 9
[单项选择]下面程序运行后，单击命令按钮，输出的结果是
Pivate Sub Cornmand1_Click（ ）
Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2#
For i=1 To 4
a(i)=i
Next
For i=2 To 6
b(i)=i
Next
str1=YAG(
[单项选择]下面程序执行时，输出的结果是( )。
Private Sub Form_Click（ ）
Dim i As Integer,j As Integer
i=10
Do
i=i+j
For j=10 To i Step-3
i=i+j
Next j
Loop While i＜50
Print i;j
End Sub
A. 50 10
B. 50 9
C. 57 10
D. 57 9
[单项选择]下面程序的输出结果是( )。
#include"stdio.h"
int sub(int m)
static a=4;
a+=m;
return a;
void main（ ）
int i=2,j=1,k;
k=sub(i);
k=sub(j);
printf("%d",k);
A. 6
B. 7
C. 8
D. 9
