单选题在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序：
Dim S1 As String, S2 As String
Private Sub Form_Load()
Text1.Text=""
Text2.Text=""
End Sub
Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer)
S2=s2&Chr(KeyCode)
End Sub
Private Sub Text1_KeyPress(Keynscii As Integer)
S1=S1&chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Text1.Text=S2
Text2.Text=S1
S1=""
S2=""
End Sub
程序运行后，在Text1中输入“abc”，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为______。
单选题单击一次命令按钮之后，窗体中的输出结果为______ 。 Private Sub Command1_ Click() For i = 1 To 4 x = fun(i) Print x; Next i End Sub Function (n) x = n * n FF = x End Sub
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1 Click() Dim i As Integer,j As Integer Dim a(10,10)As Integer For i=1 To 3 For j＝1 To 3 a(i,j)＝(i-1)*3+j Print a(i,j)； Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是______。
单选题在窗体上画四个文本框(如下图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程 Private Sub Commandl_Click() For Each TextBoxinTextl Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为( )。
单选题下列关于标签的描述中，错误的是
单选题若在某窗体模块中有如下事件过程： Privam Sub Command1_Click(Index As Integer) ...... End Sub 则以下叙述中正确的是______。
单选题设有如下程序：
Private Sub Command1_Click()
Dim c As Integer,d As Integer
c=4
d=InputBox("请输入一个整数")
Do While d＞0
If d＞c Then
c=c+1
End If
d=InputBox("请输入一个整数")
Loop
Print c+d
End Sub
程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是______。
单选题Visual Basic的每种工具栏都有固定和浮动两种形式，把浮动工具栏变为固定工具栏的操作方法是( )
单选题下列程序段的执行结果是______ 。 k=0 For j=1 To
2 For i=1 To 3 k =
i+ 1 Next i For i=1 To
7 k= k + 1 Next
i Next j Print k
A. 11
B. 10
C. 9
D. 8
单选题使列表框List1在填加项目的时候能够自动按字母排序，并且能够连续多选和不连续多选，需执行下面的( )语句。
单选题如果把程序的启动对象设置为：Sub Main，则Sub Main过程
单选题目录列表框中的
____
属性用来设置和返回目录列表框中当前选中的目录。
单选题下列打开“代码窗口”的操作中错误的是______。
A.按F4键
B.单击“工程资源管理器”窗口中的“查看代码”按钮
C.双击已建立好的控件
D.执行“视图”菜单中的“代码窗口”命令
单选题数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是( )。
单选题要使文本框可输入多行文字，要更改的默认选项是
A. SorollBoars和MultiLine
B. Visible
C. ScrillBoars
D. 以上都不是
单选题( )控件可以使图形根据控件大小而改变大小。
单选题已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：Option Base 1Private Sub Command1_Click() Dim sum As Integer sum＝0 For i＝1 To 4 For j＝1 To 3 sum＝sum＋score(i， j) Next j Print "第" & i & "个学生的总分是："； sum Next iEnd Sub运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是( )。
单选题当文本框中的内容发生改变时所触发的事件是( )。
单选题在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：PrivateSubCommand1_Click() CD1.DialogTitle＝"打开文件" CD1.InitDir＝"C：" CD1.Filter＝"所有文件|*.*|Word文档|*.doc|文本文件|*.txt" CD1.FileName＝"" CD1.Action＝1 IfCD1.FileName＝""Then Print"未打开文件" Else Print"要打开文件"&CD1.FileName EndIfEndSub但实际显示的对话框中列出了C：/下的所有文件和文件夹，"文件类型"一栏中显示的是"所有文件"。下面的修改方案中正确的是( )。
单选题下列对于线性链表的叙述中正确的是