单项选择题

下列程序段的执行结果为( )。
a=1
b=0
Select Case a
　Case 1
　　Select Case b
　　　Case 0
　　　　Print"**1**"
　　　Case 1
　　　　Print"**1**"
　　End Select
　Case 2
　　Print"**2**"
End Select

A．**0**
B．**1**
C．**2**
D．0
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为( )。 Prinvate Sub Comand1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+5 Next k Next j Next i Print x End Sub
A．13
B．26
C．30
D．40
单项选择题
假定在窗体(名称为Form1)的代码窗口中定义如下记录类型： Private Type animal animalName As String*20 a Color As String*10 End Type 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Crick() Dim rec As animal Open c: vbTest.dat For Random As #1 Len=Len(rec) rec.animalName= Cat rec.aColor= White Put #1,,rec Close #1 End Sub 则以下叙述中正确的是( )。
A．记录类型animal不能在Form1中定义，必须在标准模块中定义
B．如果文件c:\vbTest.dat不存在，则Open命令执行失败
C．由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D．语句“Put#l,,rec”将animal类型的两个数据元素写到文件中
相关试题