Y=b+b End sub 程序运行后,单击命令按钮,则两个标签中显示的内容分别是()。 A)25和3 B)5和3 C)25和6 D)5和6 (26)在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为 Command1的命令 按钮。运行后的窗体外观如图所示 设有如下的类型和变量声明 Private Type Person 姓名红 name As String*8 专业 机科学与技才 保存 major As String *20 End Type Dim p As Person 设文本框中的数据已正确地赋值给 Person类型的变量p,当单击“保存”按钮时,能 够正确地把变量中的数据写入随机文件 Test2. dat中的程序段是()。 A) Open"c: \Test2. dat"For Output As #1 Put #1, 1, p Close #1 B)Open"c: \Test2. dat"For Random As #1 Get #1, 1, p C)Open"c: \Test2. dat"For Random As #I Len=Len(p) Close D)Open"c: \Test2.dat"For Random As#1 Len=Len(p) et#1,1,p lose #1 (27)在窗体上画一个名称为Text的文本框和一个名称为 Command1的命令按钮,然后编 写如下事件过程: Private Sub Commandl Click() Dim iAs Integer, n For i=0 To 50 n=n+1 If i>10 Then exit fe TextIText=Str(n) End sub 程序运行后,单击命令按钮,在文本框中显示的值是()。 A)2 B)3 C)4 (28)假定有以下循环结构 Do Until条件表达式 循环体 则以下正确的描述是()。 二级Ⅴ isual basic语言程序设计试卷第4页(共10页)二级 Visual Basic 语言程序设计试卷 第 4 页（共 10 页） Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是（ ）。 A）25 和 3 B）5 和 3 C）25 和 6 D）5 和 6 （26）在窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1 的命令 按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明： Private Type Person name As String*8 major As String*20 End Type Dim p As Person 设文本框中的数据已正确地赋值给 Person 类型的变量 p，当单击“保存”按钮时，能 够正确地把变量中的数据写入随机文件 Test2.dat 中的程序段是（ ）。 A）Open "c:\Test2.dat" For Output As #1 Put #1, 1, p Close #1 B）Open "c:\Test2.dat" For Random As #1 Get #1, 1, p Close #1 C）Open "c:\Test2.dat" For Random As #1 Len=Len(p) Put #1, 1, p Close #1 D）Open "c:\Test2.dat" For Random As #1 Len=Len(p) Get #1, 1, p Close #1 （27）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编 写如下事件过程： Private Sub Command1_Click( ) Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（ ）。 A）2 B）3 C）4 D）5 （28）假定有以下循环结构 Do Until 条件表达式 循环体 Loop 则以下正确的描述是（ ）