单选题下列程序段的执行结果为
Dim A(3，3)
For M=1 To 3
For N=1 To 3
If N=M Or N=3-M+1 Then
A(M,N) =1
Else
A(M,N) =0
End If
Next N
Next M
For M=1 To 3
For N=1 To 3
Print A(M,N)
Next N
Print
Next M
Ａ) 1 0 0
0 1 0
0 0 0
Ｂ) 1 1 1
1 1 1
1 1 1
Ｃ) 0 0 0
0 0 0
0 0 0
Ｄ) 1 0 1
0 1 0
1 0 1
单选题Visual Basic中的数值可以用十六进制或八进制表示，十六进制数的开头符是&H，八进制数的开头符号是
单选题在窗体中画一个命令按钮，然后编写以下事件过程：
Private Sub Command1_Click()
For j=1 To 3
Print Tab(3(j)；11((2(j-1)；
Next j
Print
End Sub
程序的执行结果为
单选题在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码： Prinvate Sub M1_Click(Index As Integer) Form1.Caption="myform2" End Sub 运行时，单击按钮数组中的第1个按钮，窗体标题为
单选题有一程序段，其功能是：当x＞0时，y=x；当-2=＜x＜=0时，y=-x，当x＜=2时，产生一个“输入错误”信息框。则下列程序空白处应为______。
Private Sub Form_Click()
x % =InputBox("请输入x的值:")
If x＞0 Then
y=x
______
y=-x
Else
NsgBox"输入错误"
End If
Print y
End Sub
单选题以下关于单选按钮和复选框的叙述中，正确的是
单选题下列叙述中，正确的是 ______。 A) 用E-R图能够表示实体集之间一对一的联系、一对多的联系、多对多的联系 B) 用E-R图只能表示实体集之间一对一的联系 C) 用E-R图只能表示实体集之间一对多的联系 D) 用E-R图表示的概念数据模型只能转换为关系数据模型
单选题为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a%=10:b%=20 Call swap(a,B) Print a,b End Sub Private Sub swap(ByVal a As Integer,ByVal b As Integer) c=a:a=b:b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是( )。
单选题把窗体的KeyPreview属性设置为Tree，然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后，按键盘上的“A”键，则在窗体上显示的内容是______。
单选题下列能将输入焦点置于名称为txtAdd文本框中的语句是______。
单选题下列成员中不属于主窗口的是( )。 A．最大化按钮 B．状态栏 C．系统菜单 D．工具栏
单选题当发生窗体的单击事件时，输出的第二行为( )。 Private Sub Form_click() Dim N1 As Integer,N2 As Integer,N3 As Integer N1=1:N2=1 Print N1;N2 Do N3=N1+N2 Print N3； N1=N2:N2=N3 Loop Until N3＞=5 End Sub A) 1 1 1 B) 2 3 5 C) 2 5 7 D) 2 3 4
单选题能够用于标识对象名称的属性是______。
A.Name
B.Caption
C.Value
D.Text
单选题以下描述正确的是{{U}} {{/U}}。
A.过程的定义可以嵌套，但过程的调用不能嵌套
B.过程的定义不可以嵌套，但过程的调用可以嵌套
C.过程的定义和过程的调用均可以嵌套
D.过程的定义和过程的调用均不能嵌套
单选题在用通用对话框控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框中所列出的是文本文件类型，则正确的描述格式是
单选题有下面程序代码：
Private Sub Command1_Click()i=1
Do While i＜5
j=1
Do j=j+1
Print "*";
Loop Until i+j＞10
Print i=i+2
Loop
End Sub
程序运行时输出字符“*”的个数是
单选题有如下一个函数过程：
Function fn(ByVal num As Long)
Dim k As Long
k=1
num=Abs(hum)
do while num
k=k*(num Mod 10)
num=num/10
Loop
fn=k
End Function
以下是一个调用该函数的事件过程，在运行该程序后，在输入对话框输入数字“123”，该过程的运行结果是______。
Private Sub Command1_Click()
Dim n As Long
Dim r As Long
n=InputBox("请输入一个数值")
n=CLng(n)
r=fn(n)
Print r
End Sub
单选题下列关于测试的叙述，错误的是( )。
单选题窗体的( )方法可把窗体隐藏起来，但不从内存中卸载。
单选题下列叙述中正确的是( ) A．数据的逻辑结构与存储结构必定是一一对应的 B．由于计算机存储空间是矢量式的存储结构，因此，数据的存储结构一定是线性结构 C．程序设计语言中的数组一般是顺序存储结构，因此，利用数组只能处理线性结构 D．以上三种说法都不对