![[单项选择题] 设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCI,第1张](/aiimages/%5B%E5%8D%95%E9%A1%B9%E9%80%89%E6%8B%A9%E9%A2%98%5D+%E8%AE%BE%E5%B7%A5%E7%A8%8B%E4%B8%AD%E6%9C%892%E4%B8%AA%E7%AA%97%E4%BD%93%EF%BC%9AForm1%E3%80%81Form2%EF%BC%8CForm1%E4%B8%BA%E5%90%AF%E5%8A%A8%E7%AA%97%E4%BD%93%E3%80%82Form2%E4%B8%AD%E6%9C%89%E8%8F%9C%E5%8D%95%EF%BC%8C%E5%85%B6%E7%BB%93%E6%9E%84%E5%A6%82%E8%A1%A8%E3%80%82%E8%A6%81%E6%B1%82%E5%9C%A8%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E6%97%B6%EF%BC%8C%E5%9C%A8Form1%E7%9A%84%E6%96%87%E6%9C%AC%E6%A1%86Text1%E4%B8%AD%E8%BE%93%E5%85%A5%E5%8F%A3%E4%BB%A4%E5%B9%B6%E6%8C%89%E5%9B%9E%E8%BD%A6%E9%94%AE%28%E5%9B%9E%E8%BD%A6%E9%94%AE%E7%9A%84ASCI.png "[单项选择题] 设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCI,第1张")
[单项选择题] 设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为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 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."删去
正确答案：B
参考解析：左原程序中，只要触发文本框控件的keyPress事件，则会执行隐藏Form1，显示Form2语句。所以将Form.Hide和Form2.Show两行移到两个End if之间，在每次输入口令之后，只要不按回车键就不会执行程序，按下后程序会检验是否口令为“Teacher”，是则“成绩录入”可见，否则不可见，之后执行Form1.Hide和Form2.Show。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）