假定在窗体（名称为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类型的两个数据元素写到文件中
查看答案
相关试题
换一换
假定窗体的名称为Form1，对该窗体编写如下代码： Private Sub Form_Load()Form1．Caption="计算机"Me．Caption="等级"Caption="考试" End Sub 程序运行后，窗体的标题是
A.计算机 B.等级 C.考试 D.Form1
答案
在名称为Form1的窗体上画一个文本框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能．完成设置后的窗体如下图所示。要求：不编写任何代码。
答案
在设计阶段,双击窗体Form1的空白处,打开代码窗口,显示____事件过程
答案
假定窗体的名称为Form1,则把窗体的标题设置为“VB_Test”的语句为（）。
A.Form1=“VB_Test” B.Form1.Caption=“VB_Test” C.Form1.Text=“VB_Test” D.Form1.name=“VB_Test”
答案
设工程文件中包名称分别为Form1、Form2的两个窗体，且Form1的菜单属性设置如下： 标题（p) 名称（m) 内缩符号 Index 窗体 Mnu（) 无 显示窗体2 Mnu1 1 1 退出 Mnu1 1 2 窗体Form1中的程序如下： Dim Flag As Boolean Private Sub Form_Load（) Flag = True End Sub Private Sub mn
A.Index属性的值可以用来区分控件数组元素 B.Index为1的菜单项的标题可能会改变 C.两个名称均为Mnu1的菜单项构成一个控件数组 D.语句Form2. Hide将Form2卸载
答案
设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click（) Dim a As Integer a=10 Call g（Form2，a) End Sub Private Sub g（f As Form, X As Integer) y=IIf（x＞,10,
A.Forml的Caption属性值为100 B.Form2的Caption属性值为-100 C.Form1的Caption属性值为-100 D.Form2的Caption属性值为100
答案
在设计阶段，双击窗体Form1的空白处，打开代码窗口，显示( )事件过程模板。
A.Form_Click B.Form_Load C.Form1_Click D.Foma1_Load
答案
假定在窗体（名称为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类型的两个数据元素写到文件中
答案
设工程文件包含两个窗体文件及一个标准模块文件，两个窗体上分别只有一个名称为Command1的命令按钮Form1的代码如下：Form2的代码如下：Module1的代码如下：运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是（）
A.15 B.05 C.00 D.程序有错
答案
设有工程文件Proj，其中含有Form1窗体、Form2窗体、标准模块Module1.bas：，在Form1窗体模块的通用声明段中书写了如下语句PubliAInteger，在Form1窗体模块中还定义了通用过程Loca1Sub。则以下说法中正确的是（）
A.可以在整个Proj工程中的所有模块中使用变量X B.只能在窗体Form1和Form2中使用变量X，但不能在标准模块Module1中使用变量X C.在标准模块Modtde1中可以使用变量X，但在窗体Form2中不能使用变量X D.变量X的作用范围不包含Form1中的Loca1Sub
答案
热门试题
假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2。启动窗体为 Form1，在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，在横线处将程序补充完整。 Private SubCommand1_Click（) Unload Form1 Form2． 【7】 End Sub
假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和 Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将下面的程序补充完整。Private Sub Command1_ Click（) 【14】 Form1 Form2. 【15】 End Sub
在设计阶段，双击窗体Form1的空白处，打开代码窗口，显示下面哪个事件过程?()
已知两个窗体Form1、Form2，下列事件过程中，______ 可以实现单击窗体Form1的命令按钮时，显示窗体Form2，而窗体Form1消失。
假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Fonn2，启动窗体为Form1。在Form1画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command1_Click（)______Form1Form2.______ End Sub
假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2，启动窗体为 Form1。在Form1中画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command1_Click（) 【8】 Me Form2． 【9】 End Sub
假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2，启动窗体为 Form1。在Form1画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请在 【14】 和 【15】 处将程序补充完整。 Private Sub Command1_Click（) 【14】 Form1Form2. 【15】 End Su
一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub frmFunctionl（) End Sub Form2中定义的过程： Public Sub fimFunction2（) End Sub mdlFunc中定义的过程： P
设窗体名称为form1。以下叙述中正确的是（）
Mdiform为MDI窗体，其中有菜单MnuTest，Form1为子窗体，也有菜单MnuTest，执行下列程序后，单击MnuTest菜单，输出结果为______。 其中Mdiform中代码如下： Private Sub MDIForm_Load （)Form1.Show End Sub Private Sub Mnutest_Click （)MsgBox "MDI" End Sub Form1中代
一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub Fun1()...... End Sub Func中定义的过程： Public Sub Fun2() ...... End Sub 若要在窗体For2g调用Porm1和Func中分别建立的自定义过程，则调用格式正确的是 ( )
一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub Fun1（)...... End Sub Func中定义的过程： Public Sub Fun2（) ...... End Sub 若要在窗体For2g调用Porm1和Func中分别建立的自定义过
假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Fom2，启动窗体为Form1。在Form1上面画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示Form2，请在 【8】 和 【9】 处将程序补充完整。 Private Sub Command1_Click（) 【8】 form2 【9】 End Sub
新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下，请填空。 Private Sub Command1_Click（) Form1.Hide Form2. （12) End Sub
新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮， Form1窗体消失，显示Form2窗体，程序如下： Private Sub Command1_Click（) 【 】 Form2 【 】 End Sub 试补充完整。
新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮， Form1窗体消失，显示Form2窗体，程序如下，请填空。 Private Sub Command1_Click（)Form1.HideForm2. 【8】 End Sub
设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是
在一个工程中有两个窗体，窗体Form1上有一个命令按钮Disp，单击该按钮，Form1窗体 隐藏，显示Form2窗体，程序如下，请补充完整。 Private Sub Disp_Click（) Me．Hide Form2.【 】 End Sub
当双击窗体Form1时，要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程，正确的是()。
一个工程中包含两个名称分别为Form1和Form2的窗体，程序运行后，如果单击 Form1，则隐藏Form1且显示Form2。下列可以执行上述操作的事件过程是
使用微信扫一扫登录
