[单选题]

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

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

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

B.把Form1.Hide、Form2.Show两行移到两个EndIf之间

C.把IfKeyAscii=13Then改为IfKeyAscii=′′Teaeher′′Then

D.把两个Form2.input.visible中的“Form2”删去

参考答案与解析:

相关试题

( 32 ) 设工程中有 2 个窗体 : Form1 、 Form2 , For

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

  • 查看答案
  • 工程中有两个窗体,名称分别为Form1、Form2,Fonn1为启动窗体,该窗体

    [单选题]工程中有两个窗体,名称分别为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 S

  • 查看答案
  • 设一个工程由两个窗体组成,其名称分别为Form1和Form2,其中Form1为启

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

  • 查看答案
  • 设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一

    [单选题]设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下:Private Sub Command1_Click()D.im a As Integera=10C.all g(Form2,a)E.nd SubPrivate Sub g(f As Form,x As Integer)y=IIf(x>10,100,-100)f,Showf.Caption=yE.nd Sub运行以上程序,正确的结果是( )。A.

  • 查看答案
  • 设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一

    [单选题]设一个工程由两个窗体组成,其名称分别为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,000,-100) f.Show f.Caption=y End Sub运行以上程序,正确的结

  • 查看答案
  • 设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一

    [单选题]设一个工程由两个窗体组成,其名称分别为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, 100,-100) f.Show f.Caption =y End Sub 运行以上的程序,正确的结

  • 查看答案
  • 一个工程中包含两个名称分别为Form1、Form2的窗体。假定在Form1和Fo

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

  • 查看答案
  • 一个工程中含有窗体Form1、Form2和标准模块Modell,如果在Form1

    [单选题]一个工程中含有窗体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和标准模块Modell,如果在Form1

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

  • 查看答案
  • 工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体

    [单选题]工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体上有命令按钮Command1,要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是( )。A.Private Sub Command1_Click( )F.orm2.ShowE.nd SubB.Private Sub Command1_Click( )F.orm2.VisibleE.nd SubC.Private Sub Command1_Click( )Load Form2E.nd Sub

  • 查看答案