单选题如果文本框的Enabled属性被设置为False，则运行时
单选题假定有如下程序：Private Sub Form_Click() Dim a(4)As Integer,b(4)As Integer For k=0 To 2 a(k+1)=Val(InputBox("请输入一个整数：")) b(3-k)=a(k+1) Next k Print b(k)End Sub运行程序，单击窗体，依次输入3、6、9，输出结果为
单选题从键盘上输入一个实数nu，利用字符串函数对该数进行处理，如果输出的内容不是字符End，则程序输出的内容是 nu = InputBox("nu = ") n$ = Str$ (nu) p=InStr(n$，".") if p＞0 Then Print Mid$(n$.p) Else Print "END" End If
单选题设有如下事件过程： Private Sub Form_Click() Sum=0 For k=1 To 3 Ifk<=1 Then x=1 ElseIfk<=2 Then x=2 Elselfk<=3 Then x=3 Else x=4 End If Sum=Sum+x Next k Print SumEnd Sub 程序运行后，单击窗体，输出结果是
单选题计时器文件设置时间间隔的属性是( )。 A) Enabled B) Index C) Tag D) InCerval
单选题Visual Basic窗体设计器的主要功能是 ______。
A. 建立用户界面
B. 编写源程序代码
C. 画图
D. 显示文字
单选题下列说法正确的是( )。 A) 在Visual Basic中的对话框分为两种类型：预定义对话框和自定义对话框 B) 自定义对话框是由用户根据自己需要定义的 C) 预定义对话框是用户在设置程序代码后定义的 D) MsgBox函数是用户的自定义对话框的函数
单选题在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(SmEng)。则在下列横线处
合适的语句是
____
。
Private Sub Form_Click()
Open"C：/SDat.txt"For Output AS 1
For i=1 To 5
SmNo=InputBox("请输入学号")
StuName=InputBox("请输入姓名")
StuEndg=Val(InputBox("请输入英语成绩"))
______
Next i
Close #1
End Sub
单选题有如下的程序段：
Dim a(4)As Integer
Dim b(4)As Integer
For k=0 To 2
a(k+1)=Val(InputBox("Enter data:"))
b(3-k)=a(k+1)
Next k
Print b(k)
程序运行后，依次输入1、3、5，输出的结果是______。
单选题在窗体上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下事件过程：Private Sub Command1_Click()x=0do While x＜50x=(x+2)*(X+3)：n=n+1LoopText1．Text=Str(n)：Text2．Text=Str(x)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为( )。
单选题设a＝2，b＝3，c＝4，d＝5，下列表达式的值是( )。 3＞2*b Or a＝c And b＜＞c Or b＜＞a＋c
单选题下列程序运行后，单击窗体，在窗体上显示： 1，1＋2，1＋2＋3，1＋2＋3＋4，1＋2＋3＋4＋5的和。 在横线处应填写( )。 Private Sub Form_Click() Dim i As Integer,tt As Integer For i＝1 To 5 tt＝Sum(i)：Print"tt＝"；tt， Next i End Sub Privte Function Sum(_______) ____________ j＝j＋n：Sum＝j End Function
单选题在文本框控件中，将Text的内容全部显示为用户所定义的字符的属性是( )。
单选题阅读程序： Sub Form_Click{{U}} {{/U}}
a=10:b=15:c=20:d=25 Print a；Spc(5)；b；Spc(7)；c
Print a；Space(8)；b；Space(5)；c Print
c；Spc(1)；"+"；Spc(1)；d； Print Spc(1)；"="；Spc(1)；c+d
End Sub 运行上面的程序，单击窗体后，第三行输出结果是______。
A. 20+25=45
B. 20+25=45
C. 10 15 20
D. 20 25 45
单选题默认情况下，下面声明的数组的元素个数是Dim a(5，－2 To 2)
单选题如果要在菜单中添加一个分隔线，则应将其Caption属性设置为
单选题以下关于过程及过程参数的描述中，错误的是( )。
单选题设在工程中有一个标准模块，其中定义了如下记录类型 Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。 A) Private Sub Command1_Click() Dim B As Books Open"c:/Person.txt"For Input As#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print#1.Name.TeINum Close#1 End Sub B) Private Sub Command1_Click() Dim B As Books Open"c:/Person.txt"For Output As#1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1,B Close#1 End Sub C) Private Sub Command1_Click() Dim B As Books Open"c:/Person.txt"For Output As#1 B.Name=InputBox("输入姓名") B.TelNum=InputBox("输入电话号码") Write #1,B.Name,B.TelNum Close#1 End Sub D) Private Sub Command1_Click() Dim B As Books Open"c:/Person.txt"For Input As#1 B.Name=InputBox("输入姓名") B.TeINum=InputBox("输入电话号码") Print #1,B.Name,B.TelNum Close#1 End Sub
单选题在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序{{U}}
{{/U}}。 Private Type student StuName As
String*10 StuGrade As string*10
StuAgc As Integer End Type Private Sub
Form_Click() Dim s As student Open
"c:/student.txt" For Random As #1 Len=Len(s) For
i=1 To 1
s.StuName=InputBox("请输入姓名")
s.StuGrade=Input. Box("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄")) Next i
Close #1 End Sub
A. Print #1,s
B. Print#1,i
C. Put#1,,s
D. Put#1,,i
单选题要使标签所在处透明显示背景，应把其BackStyle属性设置为______。