
Private Sub Text1_KeyPress ( KeyAscii As Integer )
If KeyAscii=13 Then
If Text1.Text= " Teacher " Then
F.orm2.input.visible=True
E.lse
F.orm2.input.visible=False
E.nd If
E.nd If
F.orm1.Hide
F.orm2.Show
E.nd 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 ” 删去
[单选题]设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“Teacher”,所有菜单项都可见;否则看不到“成绩录入”菜单项。为此.某人在Form1窗体文件中编写如下程序:Private Sub Text1_KeyPress(KeyAscii As Integer)IfKeyAscii=13 ThenIf Text1
[单选题]工程中有两个窗体,名称分别为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和标准模块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中有语句PublicX As Integer,在Modell中有语句Public Y As Integer。则以下叙述中正确的是A.变量X、Y的作用域相同B.Y的作用域是ModellC.在Form1中可以直接使用xD.在Form2中可以直接使用X和Y
[单选题]设一个工程由两个窗体组成,其名称分别为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上有一个名称为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上有一个名称为Command1的命令按钮,Form1的程序代码如下:程序抽行时,单击命令按钮Command1,正确的结果是( )。A. Form2的Caption属性值为-100B. Form1的Caption属性值为100C. Form1的Caption属性值为-100D. Form2的Caption属性值为100
[单选题]设一个工程由两个窗体组成,其名称分别为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和标准模块Model1,如果在Form1中有语句Public X As Integer,在Model1中有语句Public Y As Integer。则以下叙述中正确的是( )。A.变量X、Y的作用域相同B.Y的作用域是Model1C.在Form1中可以直接使用XD.在Form2中可以直接使用X和Y
[单选题]一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Pubilc X As Integer,在Model1中有语句Pubilc Y As Integer,则以下叙述中正确的是( )。A.变量X、Y的作用域相同B.Y的作用域是Model1C.在Form1中可以直接使用XD.在Form2中可以直接使用X和Y