单项选择题

假定有下表所列的菜单结构：
标题 名称 层次
显示 appear 1(主菜单)
大图标 bigicon 2(子菜单)
小图标 smallicon 2(子菜单)
要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是( )

A．Private Sub bigicon_Click()
bigicon.Checked=False

End Sub

B．Private Sub bigieon_Click()
Me.appear.bigicon.Checked=True
End Sub
C．Private Sub bigicon_Click()
bigicon.Checked=True End Sub D．Private Sub bigicon_Click()
appear.bigicon.Checked=True
End Sub
<上一题 目录 下一题>
热门 试题

单项选择题
在用通用对话框控件建立“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件)，则正确的描述格式是( )
A．"text (.txt)|(*.txt)"
B．"文本文件(.txt)|(.txt)”
C．"text(.txt)||(*.txt)"
D．"text(.txt)(*.txt)\
单项选择题
假定在工程文件中有一个标准模块，其中定义了如下记录类型： Type Books Name As String * 10 TelNum As String * 20 End Type 要求在执行事件过程Command1_Click时，在顺序文件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 A8 Book
Open"c:\Person.txt"For Input As # 1
Name=InputBox("输入姓名")
TelNum-InputBox("输入电话号码")
Print # 1,B.Name.B.TelNum
Close # 1
End Sub
相关试题