更多"假定窗体的名称为Form 1，则把窗体的标题设置为“Access模拟”"的相关试题:
[填空题]假定窗体的名称为Form 1，则把窗体的标题设置为“Access模拟”的语句是______。
[单项选择]假定窗体的名称为fTest，将窗体的标题设置为“Sample”的语句是（）。
A. Me="Sample"
B. Me.Caption="Sample"
C. Me.Text="Sample"
D. Me.Name="Sample/
[单项选择]假定窗体的名称(Name属性)为Form1，则将窗体的标题设置为“等级考试”的语句为
A. Form1="等级考试"
B. Caption="等级考试"
C. Form1．Text="等级考试"
D. Form1．Name="等级考试"
[单项选择]假定窗体上有－个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（）。
A. Label1．BackStyle=0
B. Label1．BackStyle=1
C. Label1．BackStyle—True
D. Label1．BackStyle=False
[单项选择]假定在窗体(名称为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
End Sub
则以下叙述中正确的是______。
A. 记录类型animal不能在Form1中定义，必须在标准模块中定义
B. 如果文件"c:/vbTest. dat"不存在，则Open命令执行失败
C. 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D. 语句“Put #1, , rec”将animal类型的两个数据元素写到文件中
[单项选择]假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：
Private Type animal
animal Name As String * 20
aColor As String * 10
End Type
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1 Click（ ）
Dim rec As animal
Open "c：/vb Test.dat"For Random As # 1 Len=Len(reC)
rec.animalName="cat"
rec.aColor="White"
Put # 1，，rec
Close # 1
End Sub
则以下叙述中正确的是 ______。
A) 记录类型animal不能在Form1中定义，必须在标准模块中定义
D) 如果文件c:/vbTest.dat不存在，则Open命令执行失败
C) 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾
D) 语句"Put # 1，，rec"将animal类型的两个数据元素写到文件中
[简答题]在名称为Form1的窗体上建立一个名称为Command1，标题为“输出”的命令按钮，再建立一个名称为Text1的文本框，字体为四号常规黑体，编写适当的事件过程，要求程序运行后，如果单击“输出”命令按钮，则在文本框在上显示“模拟考试”，如下图左图所示。程序中不能使用任何变量，直接显示字符串。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。
[单项选择]一个工程中包含两个名称分别为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的窗体，一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：
Form1中定义的过程：
Private Sub frmFunctionl（ ）
End Sub
Form2中定义的过程：
Public Sub fimFunction2（ ）
End Sub
mdlFunc中定义的过程：
Public Sub mdlFunction（ ）
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是 ( )。
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Fort2的窗体，一个名称为mdlFunc的标准模块。假定在 Form1、Form2和mdlFune中分别建立了自定义过程，其定义格式为：
Form1中定义的过程；
Private Sub frmFunctionl（ ）
...
End Sub
Form2中定义的过程：
Public Sub frmFunction2（ ）
...
End Sub
mdlFunc中定义的过程：
Public SubmdlFunction（ ）
...
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是 ______。
A. 上述3个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述3个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。假定在Form1、Form2和Func中分别建立了自定义过程，其定义格式为：
Form1中定义的过程：
Private Sub Fun1（ ）
……
End Sub
Form2中定义的过程：
Private Sub Fun2（ ）
End Sub
Func中定义的过程：
Private Sub Fun3（ ）
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是( )。
A. 上述3个过程都可以在工程中的任何窗体或模块中被调用
B. Fun1和Fun2过程能够在工程中各个窗体或模块中被调用
C. 上述3个过程都只能在各自被定义的模块中调用
D. 只在Fun3过程能够被工程中各窗体或模块调用
[单项选择]假定窗体上有一个文本框，名为txtl，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为
A. Txtl.MultiLine=True
B. Txtl.MultiLine=True
C. Txtl.MulfiLine=False
D. Txtl.MultiLine=False
[填空题]在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1 秒、计时器触发事件过程则实现在Text1 文本框中动态显示当前日期和时间。请补充完整。
Private Sub From_Load（）
Me.Timerinterval＝1000
End Sub
Private Sub __________
Me.text1＝Now（）
End Sub
[填空题]在窗体上有一个文本框控件，名称为Text l。同时，窗体加载时设置其计时器间隔为1s、计时器触发事件过程则实现在Text1文本框中动态显示当前日期和时间，请补充完整。
Private Sub Form_Load（ ）
Me.TimerInterval=1000
End Sub
Private Sub 【12】
Me!text1=Now（ ）
End Sub
