单选题设窗体上有2个文本框Text1和Text2，并有下面的事件过程：Dim nPrivate Sub Text1_KeyPress(KeyAscii As Integer) If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z"Then n=n+1 End If If KeyAscii：1 3 Then Text2．Text=nEnd Sub程序运行时，在文本框Textl中输入“Visual Basic 6．0”并按回车键后，在文本框Text2中显不的是
单选题软件测试用例包括( )。
单选题以下描述中，不是线性表顺序存储结构特征的是( )。
单选题执行下列程序段后，输出的结果是 For k1 = 0 To 4 y =20 For k2 = 0 To 3 y=10 For 16 = 0 To 2 y=y+10 Next Next Next Print y
单选题设窗体上有3个图像框：Image1、Image2、Image3，并有下面的程序代码：Private Sub Form_Load() Image1.Picture = LoadPicture("LEAF.bmp") Image2.Picture = LoadPicture("OPEN.bmp") Image3.Visible = FalseEnd SubPrivate Sub Image1_Click() Image2.Picture = Image1.PictureEnd SubPrivate Sub Image2_Click() Image3.Picture = Image2.Picture Image2.Picture = Image1.Picture Image1.Picture = Image3.PictureEnd Sub在程序运行期间单击Image2，则在窗体上看到的结果是
单选题在窗体上画一个Timer1计时器控件和一个Shapel形状控件，并编写如下程序( )。Private Sub Form—Load()Timer1．Interval=1000Timer1．Enabled=TrueEnd SubPrivate Sub Timer1_Timer()If Shapel．Shape=1 ThenShapel．Shape=3ElseShapel．Shape=1End IfEnd Sub运行程序，则看到的结果是( )。
单选题以下关于窗体的叙述中，错误的是( )。 A) Hide方法能隐藏窗体，但窗体仍在内存中 B) 使用Show方法显示窗体时，一定触发Load事件 C) 移动或放大窗体时，会触发Paint事件 D) 双击窗体时，会触发DblClick事件
单选题下面程序段执行结果为x=Iht(Rnd()+4)Select Case x Case 5 Print"excellent" Case 4 Print"good" Case 3 Print"paSS" Case Else Print "fail"End Select
单选题下列程序执行后，输出结果是( )。 For n=3 To 1 Step-1 x$=String$(n，"#") Print x$ Next n
单选题将数据项“Student”添加到名称为List1的列表框中，并使其成为列表框第一项的语句为( )。
单选题设窗体、框架、图片框（PictureBox）、图像框（Image）的名称分别是Form1、Frame1、Picture1、Image1，有下面4条语句：① Form1.Print "VB"② Frame1.Print "VB"③ Picture1.Print "VB"④ Image1.Print "VB"其中正确的是
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Crick() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是( )。
单选题语句Print "5*20"输出的结果是__________。
单选题默认属性是某种控件最常用或最重要的属性，在Visual Basic中设置这样的属性时，不必给出属性名。下列中默认属性不是Value的控件是
单选题以下关于图片框、图像框的叙述中，正确的是
单选题如果在立即窗口中执行以下操作 m=123:n=145
p=Len(Str$(m)+Str$(n)) Print p
则输出的结果是__________。
A.2
B.4
C.5
D.8
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后输写如下程序：
Private Sub Command1_Click()
Dim x，y，z As Integer
x=5
y=7
z=0
Text1.Text=""
Call Fun1(x，y，z)
Text1.Text=Str(z)
End Sub
Sub Fun1(ByVal a As Integer，ByVal b As Integer，c As Integer)
c=a+b
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示的内容是
单选题编写如下程序：Private Sub Commandl—Click()Dim a As Integer，b As Integera=3b=2If a*b＜10 Then b=b+1 Else b=b—lPrint b—a＞0End Sub程序运行后，单击命令按钮Command1，输出结果为( )。
单选题在设计阶段，假定在图片框Picturel中装入了一个图形，为了删除该图片框控件，应采用的正确操作是
单选题下列程序的执行结果是( )。 Private Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa score AS Variant score(1)=50:score(2)=14:score(3)=36 total=0:i=0 For Each aa score In score i=i+1 tota1=tota1+aa_score Print i,aa_score,tota1 Next End Sub