网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

( 32 ) 设工程中有 2 个窗体 : Form1 、 Form2 , Form1 为启动窗体 。 Form2 中有菜单 。 其结构如表 。 要求在程序运行时 , 在 Form1 的文本框 Text1 中输入口令并按回车键 ( 回车键的 ASC I I码为 13 ) 后 , 隐藏 Form1 , 显示 Form2 。 若口令为 “ Teacher ” , 所有菜单项都可见 ; 否则看不到 “ 成绩录入 ” 菜单项。为此,某人在 Form1 窗体文件中编写如下程序:

Private Sub Text1_KeyPress ( KeyAscii As Integer )

If KeyAscii=13 Then

If Text1.Text= " Teacher " Then

Form2.input.visible=True

Else

Form2.input.visible=False

End If

End If

Form1.Hide

Form2.Show

End S u b

程序运行时发现刚输入口令时就隐藏了 Form1 ,显示了 Form2 ,程序需要修改。下面修改方案中正确的是

A )把 Form1 中 Text1 文本框及相关程序放到 Form2 窗体中

B )把 Form1.Hide 、 Form2.Show 两行移到 2 个 End If 之间

C )把 If KeyAscii=13 Then 改为 If KeyAscii= " Teaeher " Then

D )把 2 个 Form2.input.Visible 中的 “ Form2 ” 删去


参考答案

更多 “ ( 32 ) 设工程中有 2 个窗体 : Form1 、 Form2 , Form1 为启动窗体 。 Form2 中有菜单 。 其结构如表 。 要求在程序运行时 , 在 Form1 的文本框 Text1 中输入口令并按回车键 ( 回车键的 ASC I I码为 13 ) 后 , 隐藏 Form1 , 显示 Form2 。 若口令为 “ Teacher ” , 所有菜单项都可见 ; 否则看不到 “ 成绩录入 ” 菜单项。为此,某人在 Form1 窗体文件中编写如下程序:Private Sub Text1_KeyPress ( KeyAscii As Integer )If KeyAscii=13 ThenIf Text1.Text= " Teacher " ThenForm2.input.visible=TrueElseForm2.input.visible=FalseEnd IfEnd IfForm1.HideForm2.ShowEnd S u b程序运行时发现刚输入口令时就隐藏了 Form1 ,显示了 Form2 ,程序需要修改。下面修改方案中正确的是A )把 Form1 中 Text1 文本框及相关程序放到 Form2 窗体中B )把 Form1.Hide 、 Form2.Show 两行移到 2 个 End If 之间C )把 If KeyAscii=13 Then 改为 If KeyAscii= " Teaeher " ThenD )把 2 个 Form2.input.Visible 中的 “ Form2 ” 删去 ” 相关考题
考题 如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( )。A.发生一个运行时错误B.发生一个编译时错误C.在所有的初始化代码运行后Forml是活动窗体D.在所有的初始化代码运行后Form2是活动窗体

考题 创建一个工程,该工程包含两个窗体,名字分别为Form1和Form2。下列程序代码用于实现以下功能:单击命令按钮Command1后,Form1窗体消失,显示Form2,并且Form2中按钮Command2变为可用。请填空。Private Sub Command1_ Click()______MeForm2______CommandEnable = TrueEnd Sub

考题 某人创建了1个工程,其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是( )。A.在工程属性对话框中把“启动对象”设置为Form2B.在Form1的Load事件过程中加入语句 Load Form2C.在Form2的Load事件过程中加入语句Form2.ShowD.在Form2的TabIndex属性设置为1,把Form1的TabIndex属性设置为2

考题 一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Public X As Integer,在Model1中有语句Public Y As Integer。则以下叙述中正确的是( )。A.变量X、Y的作用域相同B.Y的作用域是Model1C.在Form1中可以直接使用XD.在Form2中可以直接使用X和Y

考题 新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下:Private Sub Command1_Click()【6】Form2. 【7】End Sub试补充完整。

考题 工程中有两个窗体,名称分别为Form1、Form2,Fonn1为启动窗体,该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2,则按钮Click事件过程应该是 ______。A.Private Sub Command1_click() Foma2.Show End SubB.Private Sub Command1_Click() Form2.Visible End SubC.Private Sub Command1_Click() Load Form2 End SubD.Private Sub Command1_click() Form.Load EndSub

考题 某人创建了—个工程,其中的窗体名称为Form1;之后又添加了—个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是______。A.在工程属性对话框中把“启动对象”设置为Form2B.在Form1的Load事件过程中加入语句Load Form2C.在Form2的Load事件过程中加入语句Form2.ShowD.把Fonn2的TabIndex属性设置为1,把Form1的TabIndex属性设置为2

考题 在一个工程中有两个窗体,窗体Form1上有一个命令按钮Disp,单击该按钮,Form1窗体隐藏,显示Form2窗体,程序如下,请补充完整。Private Sub Disp_Click ()Me.HideForm2. 【10】End Sub

考题 一个工程中包含两个名称分别为Form1、Form2的窗体。假定在Form1和Form2中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubFun1()……EndSubForm2中定义的过程:PrivateSubFun2()……EndSub若要在窗体Form2调用Form1中建立的自定义过程Fun1,则调用格式正确的是( )A.Fun1()B.CallForm1.Fun1()C.Form1.Fun2()D.CallFun1()

考题 如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( )。A.发生一个运行时错误B.发生一个编译时错误C.在所有的初始化代码运行后Form1是活动窗体D.在所有的初始化代码运行后Form2是活动窗体

考题 设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“Teacher”,所有菜单项都可见;否则看不到“成绩录入”菜单项。为此.某人在Form1窗体文件中编写如下程序:Private Sub Text1_KeyPress(KeyAscii As Integer)IfKeyAscii=13 ThenIf Text1.Text=“Teacher”ThenForm2.input.Visible=TrueElseForm2.input.Visible=FalseEnd ifEnd ffForml.HideForm2.ShowEnd Sub菜单结构程序运行时发现刚输入口令时就隐藏了Forml,显示了Form2,程序需要修改。下面修改方案中正确的是A.把Forml中Textl文本框及相关程序放到Form2窗体中B.把Forml.Hide、Form2.Show两行移到2个End If之间C.把IfKeyAscii=13 Then改为IfKey Ascii=“Teacher”ThenD.把2个Form2.input.Visible中的“Form2.”删去

考题 如果Form2是启动窗体,并且Form2的Load事件过程中有Form1.Show,则程序启动后( )。 A、发生一个运行时错误参考答案:C、在所有的初始化代码运行后Form1是活动窗体D、在所有的初始化代码运行后Form2是活动窗体

考题 假设某应用程序开发工程(默认的工程名为“工程1”)已先后创建了两个窗体,其名称分别为form1和form2。为使窗体form1成为运行该工程时的启动窗体,在开发过程中,应在“工程-工程1属性”对话框内的“通用”标签下,在“启动对象”的下拉列表框中,选择所需启动的窗体名______

考题 在考生文件夹中有一个工程文件execise55.vbp,它包含两个名称分别为Form1和Form2的窗体,Form1和Form2窗体上建立了标题分别为Cmd1和Crud2的按钮。请先把Form1上按钮的标题改为End,把Form2上按钮的标题改为Display,并将Form2设为启动窗体,将Form1设为不显示。该程序实现的功能是:在程序运行时显示Form2窗体,单击Form2上的Display按钮,则显示Form1窗体;若单击Form1上的End按钮,则关闭Form1和Form2,并结束程序运行。注意:请去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。正确程序运行后的界面如下图所示。

考题 新建一个工程,内有两个窗体,名称分别为Form1、Form2,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下,请填空。Private Sub Command1_Click()Form1.HideForm2.______End Sub

考题 一个工程中含有窗体Form1、Form2和标准模块Modell,如果在Form1中有语句Public X As Integer,在Modell中有语句Public Y As Integer。则以下叙述中正确的是 ______。A.变量X、Y的作用域相同B.Y的作用域是ModellC.在Form1中可以直接使用XD.在Form2中可以直接使用X和Y

考题 工程中有Form1、Form2两个窗体。Forml窗体外观如图1所示。程序运行时,在Forml中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮“计算并显示”(其名称为Commandl),则显示Form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来,如图2所示。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示“请输入数值数据!”。请填空。Private Sub Command1_Click()IfText1.Text=””ThenMsgBox”请输入半径!”ElseIf Not IsNumerie(【 】)ThenMsgBox“请输入数值数据!”.Elser=Val(【 】)Form2.Show【 】.Print”圆的面积是”3.14”r*rEnd IfEnd Sub

考题 假定建立了一个工程,该工程包括两个窗体,其名称分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示Form2,请在空白处将程序补充完整。Private Sub Command1_Click()______form2.______End Sub

考题 设一个工程由两个窗体组成,其名称分别为Form1和Form2,其中Form1为启动窗体。在窗体Form1上有一个名称为Command1的命令按钮,Form1的程序代码如下:程序抽行时,单击命令按钮Command1,正确的结果是( )。A. Form2的Caption属性值为-100B. Form1的Caption属性值为100C. Form1的Caption属性值为-100D. Form2的Caption属性值为100

考题 有一个ylc5.vbp,只有一个窗体Form1,需要创建Form2。在窗体Form1上建立Command1和Command2两个命令按钮,标题分别为“隐藏启动窗体”和“关闭窗体”。在窗体Form2上创建标题为“打开窗体1”的按钮。将Form2设为启动窗体,单击Form2上的按钮,则显示Form1窗体:若单击Form1上的“隐藏启动窗体”按钮,则Form2消失。若单击Form1上的“关闭窗体”按钮,则Form1和Form2都消失,退出程序。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc5.vbp,窗体文件名为ylc5-1.frm, ylc5-2.frm。程序中不得使用任何变量。

考题 当双击窗体Form1时,要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程,正确的是

考题 在考生文件夹中有一个工程文件execise63.vbp及窗体文件execise63.frm。在名为Form1上有一个名称为Cmd1,标题为Hide的命令按钮。在Form2上有一个名称为Cmd2,标题为Display的命令按钮。它的功能是在运行时只显示名为Form2的窗体,单击Form2上的 Display按钮,则显示名为Form1的窗体;单击Form1上的Hide按钮,则Foma1的窗体消失。这个程序不完整。要求:(1)把Form2设为启动窗体;把Form1上按钮的标题改为Hide,把Form2上按钮的标题改为Display。(2)去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后把修改后的文件存盘。(3)工程文件和窗体文件仍按原名保存。正确程序运行后的界面如图所示。

考题 在考生文件夹中有一个工程文件execise45.vbp和窗体文件execise45.frm。它的功能是在运行时只显示名为Form2的窗体,单击Form2上的“上线”命令按钮,则显示名为Form1的窗体;单击Form1上的“隐身”命令按钮,则Form1的窗体消失。这个程序并不完整,要求:(1)把Form2设为启动窗体;把Form1上按钮的标题改为“隐身”,把Form2上按钮的标题改为“上线”。(2)去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后把修改后的文件存盘。(3)工程文件和窗体文件仍按原名保存。正确程序运行后的界面如卜图所示。

考题 已知两个窗体Form1、Form2,下列事件过程中,______可以实现单击窗体Form1的命令按钮时,显示窗体Form2,而窗体Form1消失。A.Private Sub Command1_ Click() LoadForm2 Form1. Hide End SubB.Private Sub Command1_ Click() Show Form2 Form1. Hide EndSubC.Private Sub Command1_ click() Show Form2 Form1. Hide End SubD.Private Sub Command1_ click()

考题 设工程中有2个窗体:Form1、Form2、Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输人口令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为“Teacher”,所有菜单项都可见;否则看不到“成绩录入”菜单项。为此.某人在Form1窗体文件中编写如下程序:Private Sub Text 1 KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenIf Text1.Text=TeacherThenForm2.input.Visible=TrueElseForm2.input.Visible FalseEnd IfEnd IfForml.HideForm2.ShowEnd Sub菜单结构标题 名称级别成绩管理mark1成绩查询query2成绩录入mput3程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是( )。A.把Form1中Text1文本框及相关程序放到Form2窗体中B.把Form1.Hide、Form2.Show两行移动2个End If之间C.把If KeyAscii=13 Then改为If KeyAseii=TeacherThenD.把2个Form2 input.Visible中的“Form2.”删去

考题 ( 6 )工程中有 Form1 、 Form2 两个窗体。 Form1 窗体外观如图 1 所示。程序运行时,在 Form1 中名称为 Text1 的文本框中输入一个数值 ( 圆的半径 ) , 然后单击命令按钮 “ 计算并显示 ” ( 其名称为Command1 ) ,则显示 Form2 窗体,且根据输入的圆的半径计算圆的面积,并在 Form2 的窗体上显示出来,如图 2 所示 。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示 “ 请输入数值数据! ” 请填空。Private Sub Command1_Click()If Text1.Text= ”” ThenMsgBox “ 请输入半径! ”Else If Not IsNumeric( 【 6 】 ) ThenMsgBox “ 请输入数值数据! ”Elser=val( 【 7 】 )Form2.show【 8 】 .Print “ 圆的面积是 ” 3.14*r*rEnd IfEnd Sub

考题 在一个多窗体程序中,Form1是启动窗体,当程序运行后要想显示Form2窗体,正确的语句是()。A、ShowForm2B、Form2.showC、LoadForm2D、Form2.Load