在窗体上画一个通用对话框,其Name 属性为Cont ,再画一个命令按钮,Name 属性为Co mmand1,然后编写如下事件过程:
Private Sub Co mmand1_Click()
Cont .File Name =""
Cont .Flags =vbOFNFile MustExist
Cont .Filter ="All Files|*.*"
Cont .FilterIndex=3
Cont .DialogTitle ="Open File"
Co nt .Action =1
If Cont .File Name =""Then
MsgBox "No file selected"
Else
Open Cont .File Name For Input As #1
Do While Not EOF(1)
Input #1,b$
Print b$
Loop
End If
End Sub
以下各选项,对上述事件过程描述错误的是( )。
发布于 2022-05-11 09:58:28
登录后免费查看答案
关注者
0
被浏览
12