[试题]

( 8 ) 设窗体上有一个名称为 CD1 的通用对话框 , 一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。程序执行时,单击 Command1 按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的 “ 打开 ” 按钮后 , 则可打开该文本文件 , 并读入一行文本 , 显示在 Text1 中 。 下面是实现此功能的事件过程,请填空。

Private Sub Command1_Click()

C.D1.Filter =" 文本文件 1*.txt(Word 文档 )*.doc"

C.D1.Filterinder = 1

C.D1.ShowOpen

If CD1.FileName<>""Then

Open [9] For Input As #1

Line Input #1,ch$

C.lose #1

Text1.Text = [10]

E.nd If

E.nd Sub

参考答案与解析:

相关试题

( 33 ) 窗体上有 1 个名称为 CD1 的通用对话框 , 1 个名称为 C

[单选题]( 33 ) 窗体上有 1 个名称为 CD1 的通用对话框 , 1 个名称为 Command1 的命令按钮 。 命令按钮的单击事件过程如下:Private Sub Command1_Click( )C.D1.FileName= “ “C.D1.Filter="All Files|*.*|(*.DoC ) |*.Doc|(*.Txt)|*.txt"C.D1.FilterIndex=2C.D1.Action=1E.nd Sub关于以上代码,错误的叙述是( )。A. )执行以上事件过程,通用对话框

  • 查看答案
  • 在窗体上有一个名称为CD1的通用对话框和一个名称为Comrnand1的命令按钮。

    [单选题]在窗体上有一个名称为CD1的通用对话框和一个名称为Comrnand1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为“保存”,缺省文件名为“ABC”, 在“文件类型”栏中显示*.txt。则能够满足上述要求的稗序县( )。/

  • 查看答案
  • 窗体上有1个名称为CD1的通用对话框,1个名称为Commandl的命令按钮。命令

    [单选题]窗体上有1个名称为CD1的通用对话框,1个名称为Commandl的命令按钮。命令按钮的单击事件过程如下: Private Sub Commandl_Click() CD1.FileName="" CD1.Filter="AllFiles|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CD1.FilterIndex=2 CD1.Action=1 End Sub 关于以上代码,错误的叙述是( )。A.执行以上事件过程,通用对话框被设置为“打开”文件对话框B.通用对话框的初

  • 查看答案
  • 窗体上有一个名称为commondialog1的通用对话框,一个名称为Comman

    [单选题]窗体上有一个名称为commondialog1的通用对话框,一个名称为Command1的命令按钮,并有如下事件过程:Private Sub Command1_Click()C.ommondialog1.defauhext=”doc”C.ommondialog1.filcname=”vb.txt”C.ommondialog1.filter=”Alt(*.*)”|*.*|word|*.doc|”C.ommondialog1.filerindex=1C.ommondialog1.showsaveE.nd

  • 查看答案
  • 设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为

    [试题]设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时,单击Commandl按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的“打开”按钮后,则可打开该文字文件,并读人一行文本,显示在Textl中。下面是实现此功能的事件过程,请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|*.txt|Word文档|*.doc” CDl.FilterIndex=1:CD1.Show

  • 查看答案
  • 窗体上有1个名称为CD1的通用对话框,1个名称为Command1的命令按钮。命令

    [单选题]窗体上有1个名称为CD1的通用对话框,1个名称为Command1的命令按钮。命令按钮的单击事件过程如下:Private Sub Command1_Click()C.D1.FileName=""C.D1.Filter="All Files|*.*|(*.DoC.D1|*.Doc|(*.Txt)|*.txt"C.D1.FilterIndex=2C.D1.Action=1E.nd Sub关于以上代码,错误的叙述是( )。A.执行以上事件过程,通用对话框被设置为“打开”文件对话框B.通用对话框的

  • 查看答案
  • 假定在窗体上建立了一个通用对话框,其名称为Cd1,用下面的语句可以建立一个对话框

    [单选题]假定在窗体上建立了一个通用对话框,其名称为Cd1,用下面的语句可以建立一个对话框: Cdl. ShowPrinter 与该语句等价的语句是 ( )A.Cd1. Action=2B.Cd1. Action=3C.Cd1 Action=4D.Cd1. Action=5

  • 查看答案
  • 在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Comma

    [单选题]在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Commandl的命令按钮。然后编写如下事件过程: Private Commandl_Click() CommonDialogl.FileName="" CommonDialogl.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialogl.Filterlndex=2 CommonDialogl.DialogTifle="VBTestA.该对话框被设置

  • 查看答案
  • 在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Comma

    [单选题]在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程: Prirate Sub Command1_Click() CommonDialogl. FileName="" CommonDialogl. Filter="All file|*. *|(*. Doc)|*. Doc|(*. Txt)|*. Txt" CommonDialogl. Filterlndex=2 CommonDialogl. DialogTitle="V

  • 查看答案
  • 在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Comma

    [单选题]在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为Save,默认文件名为SaveFile,在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是 ______。A.Private Sub Command Click() CommonDialogl.FileName="SaveFile" CommonDialogl.Filte="All Files|*.*|(*.txt)|*

  • 查看答案
  • ( 8 ) 设窗体上有一个名称为 CD1 的通用对话框 , 一个名称为 Text