在窗体上画一个通用对话框图,其Name属性为Cont,瑞画一个命令按钮,Name属性为Command1,然后编写如下事件过程:   Privute Sub Command1_Click( )    Cont.FileName=" "    Cont.Fla

admin2009-01-15  32

问题 在窗体上画一个通用对话框图,其Name属性为Cont,瑞画一个命令按钮,Name属性为Command1,然后编写如下事件过程:   Privute Sub Command1_Click( )    Cont.FileName=" "    Cont.Flags=vbOFNFileMustExist    Cont.Filter="All Files| * .*"    Cont.FilterIndes_3    Cont.DialogTitle="Open File"    Cont.Action=1    If Cont.FileName=" " Then      MsgBox "No file selected"    Else      Open Cont.FileName For Input As #1      Do While Not EOF(1)        Input #1.b$        Print b$      Loop      End If    End Sub   以下各选项,对上述事件过程描述错误的是

选项 A、该事件过程用来建立一个Open对话框,可以在这个对话框中选择要打开的文件
B、选择后单击“打开”按钮,所选择的文件名即作为对话框的FileName属性值
C、Open对话框不仅仅用来选择一个文件,还可以打开、显示文件
D、过程中“Cont.Action=1”用来建立 Open对话框,它与Cont.ShowOpen等价

答案4

解析 从本题的本意来说就是要建立一个Open对话框,然后选择要打开的文件,程序编写也是如此,所以选项A)是正确的;选择文件后单击“打开”按钮,所选择的文件名即作为对话框的FileName属性值,所以选项B)也是正确的;Action属性为1与ShowOpen方法等价,所以选项D)是正确的;打开文件对话框可以让用户选择一个文件,由程序使用,所以它并不能真正“打开”文件,而仅仅是用来选择一个文件,从程序代码中可以看出,打开操作和显示操作是由Else语句来完成的:
    Else
        Open Cont.FileName For lnput As #1
        Do While Not EOF(1)
          Input #1,b$
          Print b$
        Loop
    End If
转载请注明原文地址:https://kaotiyun.com/show/He2p777K
0

最新回复(0)