单选题要在文本框获得焦点时操作文本框中的内容，应该在( )事件过程中编写程序。
单选题设x=4，y=8，z=7，以下表达式的值是（ ）。
x＜y And (Not y＞z) Or z＜x
单选题设有语句：
open"c:/Test.Dat"For Output As#1
则以下叙述中错误的是
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：Private Sub Command1_ Click() Dim x. y, z As Integer x= 5 y= 7 z= 0 Text1.Text =" " Call P1(x, y, z) Text1.Text = Str(z)End SubSub P1 (ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+ bEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是______。
单选题下面程序段的运行结果是 a=1 b=1 Do a=a+1 b=b+1 Loop Until b＞5 Print"k="; a; Spc(4) ; "b="; b + a
单选题下列关于顺序文件的描述中，正确的是
单选题滚动条可以响应的事件是
单选题设x为一整型变量，且语句的开始为：Select Case x，则不符合语法规则的Case子句是
单选题窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现如此功能： PrivateSubCommandlClick() Dimn％，k％ n=Len(Text1．Text) Fork=0ToList1．ListCount-1 IfLeft(List1．List(k)，n)=Text1．TextThen List1．Removeltemk EndIf Nextk EndSub 在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”，则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把Fork=0ToList1．ListCount-1改为()。
单选题下面的语句用Array函数为数组a的各元素赋整数值： a＝Array(1,2,3,4,5,6,7,8,9) 对数组变量a的正确定义是
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写．如下事件过程： Private Sub Command1_Click() Dim array1(10，10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i+j Next j Next i Text1.Text=array1(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
单选题设已经在菜单编辑器中设计了窗体的快捷菜单，某顶级菜单为a1，且取消其“可见”属性。运行时，以下( )事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。
单选题窗体上有一个名称为Text1的文本框，要求在获得焦点时选中文本框中所有内容，以下能实现该功能的事件过程是
单选题软件工程上常用的表达工具有______。 A) 图形工具 B) 表格工具 C) 语言工具 D) 以上全是
单选题以下程序的功能是：把父目录下顺序文件smtext1．txt的内容读入内存，并在文本框Text3中显示出来。请选择适合横线处的语句( )。Private Sub Command1_Click()Dim inData As StringText3．Text=" "Open"．．＼smtext1．txt"______________As#1Do While______________Input#1，inDataText3．Text=Text3．Text&inDataLoopClose#1End Sub
单选题在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是( )。
单选题窗体上有一个名称为Command1的命令按钮。要求编写程序，把文件f1．txt的内容写到文件f2．txt中，然后将f1．txt删除。命令按钮的单击事件过程如下： Private Sub Commandl_Click() Open”c：/f1．txt”For Input As#1 Open”c：＼f2．txt”For Output As#2 Do While Not EOF(2) Line Input#1．str1 Print #2，str1 Loop Close Kill”c：＼f1．txt”End Sub 该程序运行时发生错误，应该进行的修改是
单选题运行下面的程序，单击命令按钮，输出结果为( )。 Function F(a As Integer) b=0 Static c b=b+1 c=c+1 F=a+b+c End Function Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print F(
单选题在窗体画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在下划线处应填入的内容为______。
单选题下面列表框属性中，是数组的是