假设在窗体上建立了一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮Command1,并编写如下事件过程：PrivateSubCommand1_Click()CommonDialog1.Flags=4CommonDialog1.Filter="allfiles(*.*)|*.*|textFiles(*.Txt)|*.txt|BatchFilse(*.bat)|*.bat"CommonDialog1.FilterIndex=1CommonDialog 1.ShowOpenMsgBoxCo

题目

假设在窗体上建立了一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮

Command1,并编写如下事件过程：

PrivateSubCommand1_Click()

CommonDialog1.Flags=4

CommonDialog1.Filter="allfiles(*.*)|*.*|textFiles(*.Txt)|*

.txt|BatchFilse(*.bat)|*.bat"

CommonDialog1.FilterIndex=1

CommonDialog 1.ShowOpen

MsgBoxCommonDialog 1.FileName

EndSub

程序运行后，单击命令按钮，将显示一个"打开"对话框，此时在"文件类型"对话框中显示的是( )

A.AllFiles(*.*)

B.出错

C.BatchFiles(.bat)

D.不确定

相似考题

1.在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click（）CommonDialog1.Filter="All Files（*.*）|*.*Text Files"&_"（*.txt）|*.txt| Executable Files（*.exe）|*.exe"CommonDialog1.Filterindex=3CommonDialog1.Show OpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（ ）。 A．All Files（*.*）B．Text files（*.txt）C．Executable Files（*.ext）D．不确定

2.在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个名称为Command1的命令按钮，并编写如下事件过程：Private Sub Command1_ Click()CommonDialogFlags = cd10FNHideReadOnlyCommonDialogFilter= "All Files (*.*) ｜*.* ｜Text Files" &"(*.txt ｜*.txt｜Batch Files (*.bat)｜*.bat)"CommonDialogFilterIndex = 1CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 ______；如果在对话框中选择D盘temp 目录下的te1.txt 文件，然后单击“确定”按钮，则在信息框中显示的提示信息是______。

3.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，"000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A．123.45B．12345.00C．12345D．00123.45

4.（ 31 ）在窗体上画一个通用对话框，其名称为 CommonDialog1 ，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _"(*.txt)|*.txt| Executable Files(*.exe)|*.exe"CommonDialog1.FilterIndex = 3CommonDialog1.ShowOpenMsgBox CommonDialog1.FileNameEnd Sub程序运行后，单击命令按钮，将显示一个 “ 打开 ” 对话框，此时在 “ 文件类型 ” 框中显示的是A ） All Files(*.*)B ） Text Files(*.txt)C ） Executable Files(*.exe)D ） 不确定

更多“假设在窗体上建立了一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮Command1,并 ”相关问题

  • 第1题：

    在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：

    Private Sub Command1_Click()

    CommonDialog1.Flags=vbOFNHideReadOnly

    CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt

    CommonDialog1.FiherIndex=1

    CommonDialog1.ShowOpen

    MsgBox CommonDialog1.FileName

    End Sub

    程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

    A．All Files(*.*)

    B．Text Files(*.*)

    C．*.txt

    D．All Files(*.*)|Text Files(*.*)


    正确答案：A
    解析：通用对话框控件的CommonDialog1的Filter属性用来指定在对话框中显示的文件类型。利用该属性可以设置多个文件类型，供用户在对话框的“文件类型”的下拉列表中选择。Filter的属性值由一对或多对文本字符串组成，每对字符串用管道符“1”隔开，在管道符“|”前面的部分称为描述，后面的部分一般为通配符和文件扩展名，称为“过滤器”。如“*.txt”等，各对字符串之间也用管道符隔开。其格式如下：
    [窗体.]对话框名.Filter="描述符1|过滤器1|描述符2|过滤器2……"
    如果省略窗体，则为当前窗体。本题执行语句后，可以在文件类型栏内通过下拉列表选择所要显示的文件类型，而最初默认显示的文件类型(过滤器)可以由FiherIndex属性来指定，该属性是一个整数。用Filter属性设置多个过滤器后，每个过滤器都有一个值，第1个过滤器的值为1，第2个过滤器的值为2……用FiherIndex属性可以指定作为默认显示的过滤器，本题中的值是1，所以显示All Files(*.*) 。

  • 第2题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。

    A．123.45

    B．12345.00

    C．12345

    D．00123.45


    正确答案：B

  • 第3题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

    Private Sub Command1_Click（）

    a = 12345

    Print Format$（a, "000.00"）

    End Sub

    程序运行后，单击命令按钮，窗体上显示的是（ ）。

    A．123.45

    B．12345.00

    C．12345

    D．00123.45


    正确答案：B

  • 第4题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是

    A． 123.45

    B．12345.00

    C．12345

    D．00123.45


    正确答案：B
    解析：对于符号“0”，实际数字小于符号位数时，数字前后加0；大于时，若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示。若小数部分的位数多于格式字符串的位数，按四舍五入显示。

  • 第5题：

    在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个名为Command1的命令按钮，并编写如下事件过程： Private Sub Command1_ Click() CommonDialogFlags= cd10FNHideReadOnly CommonDialogFilter= "All Files (*.*) ｜*.*｜Text File" & _ "(*.txt) ｜*.txt ｜ Batch Files (*.bat)｜ *.bat" CommonDialogFilterIndex = 2 CommonDialogShowOpen MsgBox CommonDialogFileName End Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。

    A．All Files (*.*)

    B．Text Files(*.txt)

    C．Batch Files (*.bat)

    D．不确定


    正确答案：B

相关内容