单选题设在工程中有一个标准模块，其中定义了如下类型：
Type stutype
ino As Integer
strname As String*20
strsex As String*1
smark As Single
End Type
在窗体上画一个名为Connnand1的命令按钮，要求当执行事件过程Command1_Click时，在c:/的随机文件student..dat写入一条记录。下列能够完成该操作的事件过程是
____
。
单选题以下程序段的作用是（ ）
Private Sub Picture1_Click( )
Dim asci As Integer, i As Integer
i = 0
For asci = 32 To 126
Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;
i = i + 1
If i = 7 Then i = 0: Picture1.Print
Next asci
单选题下列选项中不属于结构化程序设计方法的是
单选题如果Tab函数的参数小于1，则打印位置所在的列是
单选题设工程中有Form1、Form2两个窗体，要求单击Form2上的Command1命令按钮，Form2就可以从屏幕上消失，下面的事件过程中不能实现此功能的是( )。
单选题在窗体上画一个名为Command1的命令按钮，其Command1_Click事件过程如下：
Sub Command1_Click()
Dim student As studtype
Dim record no As Integer
record no=1
With student
.ino=12
.strname="smith"
.strsex="男"
.smark=89
End With
______
Put #1,record_no,sludent
Close #1
End Sub
要求在C:/的随机文件student.dat写入一条记录。应在程序中空行处填入______，使该功能完整。
单选题假定Picture1和Text1分别为图片框和文本框的名称，则下列错误的语句是
单选题下列不是Visual Basic合法常量的是( )。
单选题设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是______。 A) Private Sub Timer1_Timer() Label1.Caption=True End Sub B) Private Sub Timer1_Timer() For k=1 To Timer1.Interval Label1.Caption=Timer Next k End Sub C) Private Sub Timer1_Timer() Label1.Caption=Timer1.Interval End Sub D) Private Sub Timer1_Timer() Label1.Caption=Time $ End Sub
单选题一个工作人员可使用多台计算机，而一台计算机可被多个人使用，则实体工作人员与实体计算机之间的联系是______。
单选题设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是______。 A) Private Sub Form1_Click() Print List1.Text End Sub B) Private Sub Forml_Click() List1.Print List1.Text End Sub C) Private Sub List1_Click() Print List1.Text End Sub D) Private Sub List1_Click() Print Form1.Text End Sub
单选题窗体上有一个如图所示的图形控件，控件中显示了如图所示的文字，可以判断这个图形的控件______。
单选题设有如下声明语句 Option Base 1 Dim arr(2，-1 To 5)As Integer 则数组arr中数组元素的个数是
单选题能够用于标识对象名称的属性是
单选题在关系数据库中，对一个关系做投影操作后，新关系的元组个数将 A) 等于原来关系中的元组个数 B) 大于原来关系中的元组个数 C) 小于原来关系中的元组个数 D) 不能确定元组个数
单选题如果过程的首行是：Private Sub proc(x As Control)，则调用此过程时使用的实际参数应该是______。
单选题在文件列表框中，要使它能够显示隐藏文件，应使它的( )属性为True。
单选题下列不能打开菜单编辑器的操作是( )。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer,j As Integer Dim a(10, 10) As Integer For i=1 To 3 For j=1 To 3 a(i，j)=(i-1)*3+j Print a(i,j)； Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是______。 A) 1 2 3 2 4 6 3 6 9 B) 1 2 3 3 4 5 4 5 6 C) 1 2 3 2 5 8 3 6 9 D) 1 2 3 4 5 6 7 8 9
单选题在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim a(5,5) For i=1 To 3 Forj=1 To 4 a(i,j))=i*j Next Next For n=1 To 2 For m=1 To 3 Print a(m,n); Next Next End Sub 程序运行后，单击命令按钮，输出结果是( )。 A) 246123 B) 123246 C) 123456 D) 654321