单选题某人编写了下面的程序：
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=InputBox("请输入整数")
b=InputBox("请输入整数")
pro a
pro b
Call pro(a+b)
End Sub
Private Sub pro(n As Integer)
While(n＞0)
Print n Mod 10;
n=n/0
Wend
Print
End Sub
此程序功能是：输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之和的每一位数字。例如：若输入123和234，则应该输出：
3 2 1
4 3 2
7 5 3
但调试时发现只输出了前2行(即2个数的反序)，而未输出第3行(即2个数之和的反序)，程序需要修改。下面的修改方案中正确的是______。
单选题在窗体(Name属性为Forml)上面添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程：
Private Sub Commandl_Click()
a=Text1.Text+Text2.Text Printa End
Sub Private Sub Form_Load()
Text1.Text="" Text2.Text="" End Sub
程序运行后，在第1个文本框(Text1)和第2个文本框(Text2)中分别输入123和321，然后单击命令按钮，则输出结果为{{U}}
{{/U}}。
A.444
B.321123
C.123321
D.132231
单选题在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写如下事件过程：
Private Sub Command1_Click()
x=0
Do Wbile x＜50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为______。
单选题下面程序计算并输出的是( )。 Private Sub Command1_Click() Num=10 Sum=0 Do Sum=Sum+Num*Num*Num Num=Num-1 Loop Until Num＜=0 Print Sum End Sub A) 13+23+33+103的值 B) 10!+…+3!+2!+1!的值 C) (1+2+3+…+10)3的值 D) 10个103的和
单选题设有分段函数：以下表示上述分段函数的语句序列中错误的是______。
单选题要使文本框获得输入焦点，则应采用文本框控件的( )方法。
单选题设有如下过程： Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End SUb 若把窗体的KeyPreview属性设置为True，程序运行后，如果按“A”键，则输出结果为( )。
单选题表示窗体名称的属性是 ______。
单选题层次型、网状型和关系型数据的划分原则是______。
单选题在医院，每个医生只属于某一个诊疗科，医生同一天可为多位患者看病，而一名患者可在多个科室治疗。则实体医生和患者之间的联系是
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下： Private Sub Command1_Click( ) x = "VisuatBasicProgramming" a = Right(x, 11) b =Mid(x, 7, 5) c = MsgBox(a , , b) End Sub 运行程序后单击命令按钮。以下叙述中错误的是( )。 A) 信息框的标题是Basic B) 信息框中的提示信息是Programming C) c的值是函数的返回值 D) MsgBox的使用格式有错
单选题Visual Basic 规定工程文件的扩展名为______ 。
单选题下列程序段的执行结果为______。 x=6 For k=1 To 10 Step-2 x=x+k Next k Print k：x
单选题在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为
Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change事件过程中应使用的语句是：_______。
A. Dirve1．Drive=Dir1.Path
B. Dir1.Path=Drive1.Drive
C. Dir1.Path=File1.Path
D. File1.Path=Dir1.Path
单选题以下不是Visual Basic合法常量的是( )。
单选题使用目录列表框的 ______ 属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符。
单选题假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是______。
单选题设置复选框或单选按钮的标题对齐方式的属性是( )。 A) Aligh B) Style C) Alignment D) Sorted
单选题在Visual Basic中，表达式3*2/5 Mod3的值是______
A.1
B.0
C.3
D.出现错误提示
单选题设有语句：
Temp=MsgBox("继续执行吗",vbYesNo,"退出提示框")
程序运行时，在对话框的标题栏将显示
____
。