cd.DBF
cd
.DBF
11
第1题:
( 8 ) 设窗体上有一个名称为 CD1 的通用对话框 , 一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。程序执行时,单击 Command1 按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的 “ 打开 ” 按钮后 , 则可打开该文本文件 , 并读入一行文本 , 显示在 Text1 中 。 下面是实现此功能的事件过程,请填空。
Private Sub Command1_Click()
CD1.Filter =" 文本文件 1*.txt(Word 文档 )*.doc"
CD1.Filterinder = 1
CD1.ShowOpen
If CD1.FileName<>""Then
Open [9] For Input As #1
Line Input #1,ch$
Close #1
Text1.Text = [10]
End If
End Sub
第2题:
执行下列命令后,输出的结果是 ______。 X=“ABCD” Y=“EFG” ?SUBSTR(X,IIF(X<>Y,LES(Y),LEN(X)),LEN(X)-LEN(Y))
A.A
B.B
C.C
D.D
第3题:
窗体上有1个名称为CD1的通用对话框,1个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
CD1.FileName=""
CD1.Filter="All Files|*.*|(*.Do
CD1|*.Doc|(*.Txt)|*.txt"
CD1.FilterIndex=2
CD1.Action=1
End Sub
关于以上代码,错误的叙述是( )。
A.执行以上事件过程,通用对话框被设置为“打开”文件对话框
B.通用对话框的初始路径为当前路径
C.通用对话框的默认文件类型为*.Txt
D.以上代码不对文件执行读写操作
FilterIndex属性用于指定默认的过滤器。在用Filter属性设置多个过滤器后,每个过滤器都有一个值,第一个为1,第二个为2,依次类推,当前的FilterIndex=2,因此默认的文件类型为*.doc。
第4题:
SUBSTR("ABCDEF",3,2)的结果是A)AB B)CD C)FE D)CB
第5题:
设窗体j.有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:Private Sub Command1=Click( ) CD1.DialogTitle="打开文件" CD1.InitDir="C:\" CD1.Filter="所有文件|*.*| Word文档|*.doc|文本文件|*.txt" CD1.FileName="" CD1.Action=1 If CD1.FileName=""Then Print"未打开文件" Else Print"要打开文件"& CD1.FileName End If End Sub 但实际显示的对话框中列出了C.\下的所有文件和文件夹,“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是( )。
A.把CD1.Action=1改为CD1.Action=2
B.把“CD1.Filter=”,后面字符串中的“所有文件”改为“文本文件”
C.在语句CD1.Action=1的前面添加:CD1.FilterIndex=3
D.把CD1.FileName=""改为CD1.FileName=”文本文件”
第6题:
已知通用对话框名为Cd1g,则执行下列的( )语句,将弹出“帮助”对话框。
A.Cd1g.Action=6
B.Cd1g.Action=5
C.Cd1g.Action=4
D.Cd1g.Action=3
第7题:
已知通用对话框名为Cd1g,则执行下列的( )语句,将弹出“打印机”对话框。
A.Cd1g.Action=6
B.Cd1g.Action=5
C.Cd1g.Action=4
D.Cd1g.Action=3
第8题:
( 33 ) 窗体上有 1 个名称为 CD1 的通用对话框 , 1 个名称为 Command1 的命令按钮 。 命令按钮的单击事件过程如下:
Private Sub Command1_Click( )
CD1.FileName= “ “
CD1.Filter="All Files|*.*|(*.DoC ) |*.Doc|(*.Txt)|*.txt"
CD1.FilterIndex=2
CD1.Action=1
End Sub
关于以上代码,错误的叙述是( )。
A )执行以上事件过程,通用对话框被设置为 “ 打开 ” 文件对话框
B )通用对话框的初始路径为当前路径
C )通用对话框的默认文件类型为 *.Txt
D )以上代码不对文件执行读写操作
第9题:
已知通用对话框名为Cd1g,则执行下列的( )语句,将弹出“打印机”对话框。
A.Cd1g.ShowPress
B.Cd1g.ShowPrinter
C.Printer Cd1g
D.ShowPrinter Cd1g
第10题:
已知通用对话框名为Cd1g,则执行下列的( )语句,将弹出“颜色”对话框对话框。
A.Cd1g.ShowColor
B.Cd1g.ShowPalate
C.Color Cd1g.
D.ShowColor Cd1g