设工程中有2个窗体:Form1、Form2、Form1为启动窗体。Form2中有菜单,其结构如表所示。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的Ascii码为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 Sub
程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是( )
A:把Form1中Text1文本框及相关程序放到Form2窗体中 B:把Form1.Hide、Form2.Show两行移动至2个End If之间 C:把If KeyAscii=13 Then改为If KeyAscii="Teacher"Then D:把2个Form2.Input.Visible中的"Form2."删去
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为“Teacher”,所有菜单都可见;否则看不到“成绩录入”菜单项。为此,某人在Form1窗体文件中编写如下程序:
菜单结构
|
标题 | 名称 | 级别 |
成绩管理 | mark | 1 |
成绩查询 | query | 2 |
成绩录入 | input | 2 |
Private Sub Text11_KeyPress(KeyAscii As Integer)
If KeyAseii = 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 Sub
程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是( )。
A:把Form1中Text1文本框及相关程序放到Form2窗体中 B:把Form1. Hide、Form2. Show两行移到2个End If之间 C:把If KeyAscii=13 Then改为If KeyAscii="Teacher" Then D:把2个Form2. input. Visible中的“Form2. ”删去
当双击窗体Form1时,要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程,正确的是( )。
A:Private Sub Form _ Db1Click( )
Forml.Hide
Form2.Show 0
End Sub B:Private Sub Form _ Db1Click( )
Form1.Hide
Form 2.Show 1
End Sub C:Private Sub Form _ Click( )
Form l.Hide
Form 2.Show
End Sub D:Private Sub Form _ Dbl Click( )
Form l.Enabled=False
Form 2.Enabled=True
End Sub
当双击窗体Form1时,要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程,正确的是
A:Private Sub Form _ Db1Click( ) FormHide Form2.Show 0 End Sub B:Private Sub Form _ Db1Click( ) Form1.Hide Form 2.Show 1 End Sub C:Private Sub Form _ Click( ) Form Hide Form 2.Show End Sub D:Private Sub Form _ Dbl Click( ) Form Enabled=False Form 2.Enabled=True End Sub
一个工程中包含两个名称分别为Form1和Form2的窗体,程序运行后,如果单击 Form1,则隐藏Form1且显示Form2。下列可以执行上述操作的事件过程是
A:Private Sub Form_Click() Form1. Hide Form2. Show End Sub B:Private Sub Form1_Cliek() Form1. Hide Form2. Show End Sub C:Private Sub Form_Click() Form1. Hide=True Form2. Show=True End Sub D:Private Sub Form_Load() Form1. Hide Form2. Show End Sub
当双击窗体Form1时,要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程,正确的是( )。
A:Private Sub Form _ Db1Click( )
Forml.Hide
Form2.Show 0
End Sub B:Private Sub Form _ Db1Click( )
Form1.Hide
Form 2.Show 1
End Sub C:Private Sub Form _ Click( )
Form l.Hide
Form 2.Show
End Sub D:Private Sub Form _ Dbl Click( )
Form l.Enabled=False
Form 2.Enabled=True
End Sub
设工程中有2个窗体: Form1、Form2,Form1为启动窗体。Form2中有菜单。其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为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 Sub
程序运行时发现刚输入口令时就隐藏了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”删去