单选题

假定在窗体(名称为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类型的两个数据元素写到文件中

查看答案
该试题由用户603****99提供 查看答案人数:10682 如遇到问题请 联系客服
正确答案
该试题由用户603****99提供 查看答案人数:10683 如遇到问题请联系客服

相关试题

换一换
单选题
假定窗体的名称为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。下列可以执行上述操作的事件过程是
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    微信扫码登录 账号登录 短信登录
    使用微信扫一扫登录
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位