更多"一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为m"的相关试题:
[单项选择]一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub frmFunctionl（ ） ... End Sub Form2中定义的过程： Public Sub frmFunction2（ ） ... End Sub md1Func中定义的过程： Public Sub mdlFunction（ ） ... End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFune的标准模块。假定在 Forml、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：
Forml中定义的过程：
Privme Sub frmFunction1( )
……
End Sub
Form2中定义的过程：
Public Sub frmFunction2( )
End Sub
mdlFunc 中定义的过程：
PubHc Sub mdl Function( )
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程，其定义格式为：
Form1中定义的过程：
Private Sub Fun1（ ）
......
End Sub
Func中定义的过程：
Public Sub Fun2（ ）
......
End Sub
若要在窗体For2g调用Porm1和Func中分别建立的自定义过程，则调用格式正确的是 ( )
A. Call Form1. Funl()
B. Call Form1. Fun1()
C. Form1. Fun1()
D. Fun1()
[单项选择]设一个工程由两个窗体组成，其名称分别为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运行以上程序，正确的结果是
A. Form1的Capdon属性值为100
B. Form2的Caption属性值为-100
C. Form1的Caption属性值为-100
D. Form2的Capdon属性值为100
[填空题]假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示Form2，请在空白处将程序补充完整。
Private Sub Command1_Click（ ）
______
form2．______
End Sub
[填空题]假定建立了一个工程，该工程包括两个窗体，其名称(Name属性)分别为Form1和Form2，启动窗体为 Form1。在Form1中画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。
Private Sub Command1_Click（ ）
【8】 Me
Form2． 【9】
End Sub
[单项选择]某人创建了一个工程，其中的窗体名称为Form1；之后又添加了一个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是
A. 在工程属性对话框中把“启动对象”设置为Form2
B. 在Form1的Load事件过程中加入语句Load Form2
C. 在Form2的Load事件过程中加入语句Form2.Show
D. 在Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为2
[单项选择]假定在窗体上建立了一个通用对话框，其名称为Cd1，用下面的语句可以建立一个对话框：
Cdl. ShowPrinter
与该语句等价的语句是 ( )
A. Cd1. Action=2
B. Cd1. Action＝3
C. Cd1 Action=4
D. Cd1. Action＝5
[单项选择]一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Public X AsInteger,在Model1中有语句Public Y As Integer，则以下叙述中正确的是( )。
A. 变量X、Y的作用域相同
B. Y的作用域是Model1
C. 在Form1中可以直接使用X
D. 在Form2中可以直接使用X和Y
[填空题]假定在工程文件中有一个标准模块，其中定义了如下记录类型
Type Books
Name As String * 10
TelNum As String * 20
End Type
要求在执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。将经下程序补充完整。
Private Sub Command1_Clickk( )
Dim B As Books
open "c: /person. txt" For output As #1
B. Name = InputBox ("请输入姓名t" )
B. TelNum = InputBox("请输入电话号码" )
write #1, 【15】
close #1
End Sub
[单项选择]假定在工程文件中有一个标准模块，其中定义了如下记录类型
Type Books
Name As String*10
TelNum As String *20
End Type
要求在执行事件过程Command1_Click时，在C盘目录下的顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
A) Private Sub Command1_Click（ ）
Dint B As Books
Open"c: /Person.txt" For Output As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write#1 ,B.Name,B.TelNum
Close#1
End Sub
B) Private Sub Command1_Click（ ）
Dim B As Books
Open"C:/Person.txt" For Input As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Print#1,B.Name,B.TelNum
Close#1
End Sub
C) Private Sub Command1_Click（ ）
Dim B As Books
Open"c:/Person.txt" For Output As#1
Name=InputBox("输入姓名")
TelNom=InputBox("输入电话号码")
Write #1,B
Close#1
End Sub
D) Private Sub Command1_Click（ ）
Dim B As Book
O
A. A
B. B
C. C
D. D
[单项选择]假定在工程文件中有一个标准模块，其中定义了如下记录类型：
Type Books
Name As String * 10
TelNum As String * 20
End Type
要求在执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是( )
A. Private Sub Command1_Click()
B. Private Sub Command1_Click()
C. Private Sub Command1_Click()
D. Private Sub Command1_Click()
[单项选择]
设工程中有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”删去
[单项选择]设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“XSLNCER”，所有菜单项都可见：否则看不到“成绩录入”菜单项。为此，某人在Form1窗体文件中编写如下程序：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If Tex 1.Text="XSLNCER"Then
Form2.input.Visible=True
Else
Form2.input.Visible=False
End If
End If
Form1.Hide
Form2.Show
End Sub
菜单结构 标题 | 名称1 | 级别 | 成绩管理 | mark A. 把2个Form2.input.Visible中的“Form2”删去
B. 把Form1中Text1文本框及相关程序放到Form2窗体中
C. 把If KeyAsii=13 Then改为If KeyAscii="XSLNCER"Then
D. 把Form1.Hide、Form2.Show两行移动到2个End If之间
购买搜题卡查看答案
[会员特权] 开通VIP， 查看 全部题目答案
[会员特权] 享免全部广告特权
请选择支付方式
-
微信支付
-
支付宝支付
立即支付
系统将自动为您注册账号
请使用微信扫码支付
请不要关闭本页面，支付完成后请点击【支付完成】按钮
恭喜您，购买搜题卡成功
重要提示：请拍照或截图保存账号密码！
我要搜题网官网：https://www.woyaosouti.com
我已记住账号密码
| |
