更多"使通用对话框C1显示为一个标准的颜色对话框,应使用语句______,使"的相关试题:
[填空题]在窗体上画一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个名称为 C1、标题为“存盘”的命令按钮,编写适当的事件过程。程序运行时,如果单击“存盘”命令按钮,则打开保存文件对话框,并把Text1中的内容按照在对话框中选定的路径和文件存盘。在刚打开对话框时的默认路径是“c: /my documents/”。请填空。
Private Sub C1_ Click( )
CD1. InitDir =
CD1. FileName = "myflie.txt"
CD1. Filter = “文本文件| ______”
CD1. ______ =
Open______ For Output As #1
Print #1, ______
Close #1
End Sub
[填空题]将通用对话框控件CommonDialog1显示为颜色对话框,可以改变该控件的______属性。
[单项选择]在窗体上有一个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序中应使用的语句是______。
A. Cd1.Action=1
B. Cd1.Action=2
C. Cd1.ShowSave=0
D. Cd1.ShowSave=True
[填空题]在窗体上画一个名称为CD1的通用对话框,一个名称为Text1的文本框和一个名称为 C1的命令按钮。程序运行后,如果单击C1命令按钮,则弹出打开文件对话框,该对话框的标题是“打开文件”,此时如果单击对话框上的“打开”按钮,则把选中的文件读到内存,并在Text1中显示出来。下面给出了C1的Click事件过程。请填空。
Private Sub C1_ Click( )
Dim n As Long
CD1 ______=“打开文件”
CD1. FileName = ""
CD1 ______= “所有文件|*.* |文本文件|*.txt |Word 文档|*.doc"
CD1. FilterIndex = 2
CD1.
If CD1. FileName <> " " Then
Open ______ For ______ As #1
n = LOF(1)
Text1. Text = Input (n, #1)
Close ______
End If
End Sub
[填空题]若已在窗体中加入一个通用对话框,要求在运行时,通过ShowOpen打开对话框时只显示扩展名为.doc的文件,则对通用对话框的Filter属性正确的设置是 (14) 。
[填空题]在用通用对话框的ShowOpen显示“打开”文件对话框时,指定其中的文件类型为文本文件的格式为 【6】 。
[填空题]通用对话框控件可通过调整其Action属性而改变成各种实用的对话框,但它不能改变成______对话框。
[单项选择]在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Commandl的命令按钮。然后编写如下事件过程:
Private Commandl_Click( )
CommonDialogl.FileName=""
CommonDialogl.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialogl.Filterlndex=2
CommonDialogl.DialogTifle="VBTest"
CommonDialogl.Action=1
EndSub
对于这个程序,以下叙述中错误的是( )。
A. 该对话框被设置为“打开”对话框
B. 在该对话框中指定的默认文件名为空
C. 该对话框的标题为VBTest
D. 在该对话框中指定的默认文件类型为文本文件(*.Txt)
[单项选择]在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:
Prirate Sub Command1_Click( )
CommonDialogl. FileName=""
CommonDialogl. Filter="All file|*. *|(*. Doc)|*. Doc|(*. Txt)|*. Txt"
CommonDialogl. Filterlndex=2
CommonDialogl. DialogTitle="VBTest"
CommonDialogl. Action=1
End Sub
对于这个程序,以下叙述中错误的是______。
A. 该对话框被设置为“打开”对话框
B. 在该对话框中指定的默认文件名为空
C. 该对话框的标题为VBTest
D. 在该对话框中指定的默认文件类型为文本文件(*. Txt)