单选题下列说法正确的是：
为了保存一个Visual Basic应用程序，应当______。
单选题现有如下程序： Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer) If x>=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是( )。
单选题窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程：Private Sub Command1_Click()For i=0 To List1．ListCotmt-1If List1．Selected(i)=True ThenList2．AddItem TextEnd IfNextEnd Sub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是
单选题在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() a=4:b=5:c:6 Print a=b+c End Sub 程序运行后，单击命令按钮，其结果为
单选题下列定义语句中不能定义为字符型数据的是( )。 A) Defstrc B) c C) Static c As String D) Dim c As Si
单选题在设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框：PrivateSubCommand1_Click()CD1.DialogTitle="打开文件"CD1.InitDir="C:"CD1.Filter="所有文件|*.*|Word文档|*.doc|文本文件|*.txt"CD1.FileName=""CD1.Action=1IfCD1.FileName=""ThenPrint"未打开文件"ElsePrint"要打开文件"&CD1.Fi1eNameEndIEndSub但实际显示的对话框中列出了C:/下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是______。
单选题使用语句Dim A As Integer声明数组A之后，以下说法正确的是( )。
单选题如果进栈序列为A，B，C，D，则可能的出栈序列是( )。
单选题以下关于图片框控件的说法中，错误的是
单选题下列有关文件的叙述中，正确的是( )。
单选题窗体上有一个列表框和一个文本框，编写如下两个事件过程：
Private Sub Form_Load()
List1.Addltem"Beijing"
List1.Addltem"Tianjin"
List1.Addltem"Shanghai"，
Text1.Text="
End Sub
Private Sub Listl_Dbl Click()
x=Listl.Text
Printx+Textl.Text
End Sub
程序运行后，在文本框中输入"China"，然后双击列表框中的"Shanghai"，则输出结果为
____
。
单选题如果将PasswordChar属性设置为一个字符，如星号(*)，运行时，在文本框中输入的字符仍然会显示出来，而不显示星号，原因可能是
单选题在窗体上画一个水平滚动条，其属性值Min满足
单选题以下能够触发文本框Change事件的操作是( )。
单选题执行以下语句时，会出现错误提示的是__________。
单选题设有如下程序： Dim a()As Integer Private Sub Command1_Click() n=-5:m=6 ReDim a(n To m) For i=LBound(a，1)To UBound(a，1) a(i)=i Next i Print a(LBound(a，1))；a(UBound(a，1)) End Sub 程序运行后，单击命令按钮，则输出结果是 ______。
单选题公司中有多个部分和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员，从职员到部门的联系类型是
A. 多对多
B. 一对一
C. 多对一
D. 一对多
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim x As Integer
x = -10 Mod -4
If x ＜ = -1 Then Print -1;
If x ＜ = -2 Then Print -2;
If x ＜ = -3 Then Print -3;
Print
End Sub
程序运行时，单击Command1，则在窗体上输出的结果是______。
单选题某人编写了下面的程序，希望能把Text1文本框中的内容写到out．txt文件中： Private Sub Command1_Click() Open"out．txt"For Output As #2 Print"Text1" Close #2 End Sub 调试时发现没有达到目的，为实现上述目的，应做的修改是( )。
单选题在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为