问题
单项选择题
木材的持久强度为极限强度的()。
A、40-50%
B、50-60%
C、60-70%
D、70-80%
答案
参考答案:B
木材的持久强度为极限强度的()。
A、40-50%
B、50-60%
C、60-70%
D、70-80%
参考答案:B
窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时,如果单击"打开"菜单项,则执行打开文件的操作,当选定了文件(例如,E: \VB\2010-9 \in.txt)并打开后,该文件的文件名会被添加到菜单中,如图2所示。各菜单项的名称和标题等定义如下表。
标题 | 名称 | 内缩 | 索引 | 可见 |
文件 | file | 无 | 无 | Ture |
打开 | mnu Open | 无 | Ture | |
关闭 | mnu Close | 无 | Ture | |
— | mnu | 无 | Ture | |
(空) | FName | 无 | False |
以下是单击"打开"菜单项的事件过程,请填空。
Dim mnuCounter As integer
Private Sub mnuOpen_Click()
CD1.ShowOpen
If CD1.FileName<>" "Then
Open (14)
For Input as#1
mnuCounter=mnuCounter+1
Load FName(mnuCounter)
FName(mnuCounter).Caption=CD1.FileName
FName(mnuCounter). (15) =True
Close#1
End If
End Sub