更多"假定在窗体(名称为Form1)的代码窗口中定义如下记录类型： Pri"的相关试题:
[单项选择]假定在窗体（名称为Form1）的代码窗口中定义如下记录类型： Private Type animal animalName As String*20 aColor As String*10 End Type 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click（ ） 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:/vbTesdat不存在，则Open命令执行失败
C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D. 语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
[单项选择]假定在窗体（名称为Form1）的代码窗口中定义如下记录类型：
Private Type animal
animalName As String*20
aColor As String*10
End Type
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:
Private Sub Command1_Click（ ）
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 #1, , rec”将animal类型的两个数据元素写到文件中
[单项选择]假定窗体的名称为fmTest，则把窗体的标题设置为“Access Test”的语句是( )。
A. Me="Access Test"
B. Me.Caption="Access Test"，
C. Me.text="Access Test"
D. Me.Name="Access Test/
[填空题]假定窗体的名称为fm Test，则把窗体的标题设置为“计算机等级考试”的语句是 【12】 。
[单项选择]假字在窗体(名称为Forml)的代码窗口中定义如下记录类型:
Private Type animal
Anima1Name As String * 20
aColor As String * 10
End Type
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim rec As animal
Open"c: /vbTest.dat"For Random As#1 Len = Len(rec)
rec.animalName = "Cat"
rec.aColor = "White"
Pat#1 , rec
Close#1
End Sub
则以下叙述中正确的是
A. 记录类型animal不能在Form1中定义,必须在标准模块中定义
B. 如果文件c：/vbTest.dat不存在，则Open命令执行失败
C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D. 语句"Put#1，rec"将animal类型的两个数据元素写到文件中
[填空题]假定窗体的名称为Form1，则把窗体的标题设置为“Access模拟”的语句是______。
[填空题]在代码窗口对窗体的BorderStyle、MaxButton属性进行了设置，但运行后没有效果的原因是这些属性______。
[填空题]在代码窗口对窗体的BorderStyle、MaxBuaon属性进行了设置，但运行后没有效果的原因是这些属性______。
[单项选择]假定窗体的名称(Name属性)为Form1，则将窗体的标题设置为“等级考试”的语句为
A. Form1="等级考试"
B. Caption="等级考试"
C. Form1．Text="等级考试"
D. Form1．Name="等级考试"
[单项选择]假定窗体的名称(Narne属性)为Forml，则把窗体的标题设置为"VBTest"的语句为( )。
A. Form1="VBTest"
B. Caption="VBTest"
C. Form1.Text="VBTest"
D. Form1.Narne="VBTest/
[单项选择]假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“等级考试”的语句为______。
A. Form1="等级考试"
B. Caption="等级考试"
C. Form1.Text="等级考试"
D. Form1.Name="等级考试/
[单项选择]一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程，其定义格式为：
Form1中定义的过程：
Private Sub frmFunctionl（ ）
...
End Sub
Form2中定义的过程：
Public Sub frmFunction2（ ）
...
End Sub
md1Func中定义的过程：
Public Sub mdlFunction（ ）
...
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFune的标准模块。假定在 Forml、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：
Forml中定义的过程：
Privme Sub frmFunction1( )
……
End Sub
Form2中定义的过程：
Public Sub frmFunction2( )
End Sub
mdlFunc 中定义的过程：
PubHc Sub mdl Function( )
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程，其定义格式为：
Form1中定义的过程：
Private Sub Fun1（ ）
......
End Sub
Func中定义的过程：
Public Sub Fun2（ ）
......
End Sub
若要在窗体For2g调用Porm1和Func中分别建立的自定义过程，则调用格式正确的是 ( )
A. Call Form1. Funl()
B. Call Form1. Fun1()
C. Form1. Fun1()
D. Fun1()
[单项选择]假定在窗体上建立了一个通用对话框，其名称为Cd1，用下面的语句可以建立一个对话框：
Cdl. ShowPrinter
与该语句等价的语句是 ( )
A. Cd1. Action=2
B. Cd1. Action＝3
C. Cd1 Action=4
D. Cd1. Action＝5
[单项选择]假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为( )
A. Label1.BackStyle=0
B. Label1.BackStyle=1
C. Label1.BackStyle=True
D. Label1.BackStyle=False
[单项选择]假定窗体上有一个文本框，名为txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为
A. Txt1.MultiLine=True Txt1.ScrollBars=0
B. Txt1.MuhiLine=True Txt1.ScrollBars=2
C. Txt1.MuhiLine=False Txt1.ScrollBars=0
D. Txt1.MuhiLine=False Txt1.ScrollBars=3
