窗体上有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。
第1题:
假定通用对话框的名称为CD1,命令按钮的名称为Commandl,则单击命令按钮后,能使打开对话框的标题为“通用对话框”的事件过程是( )。
第2题:
窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是
A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()
End Sub End Sub
C)Private Sub Commandl_Click() D)Private Sub Command_ Click()
End Sub End Sub
第3题:
设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是()。
A.窗体的Click事件过程的过程名是Myform_Click
B.命令按钮的Click事件过程的过程名是Command_Click
C.命令按钮的Click事件过程的过程名是Command1_Click
D.命令按钮的Click事件过程的过程名是C1_Click
第4题:
窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。
第5题:
(6)在窗体上有1个名称为Command 1的命令按钮,并有如下事件过程和函数过程:
Private Sub Command 1_Click()
Dim p As Integer
p=m(1)+m(2)+m(3)
Print p
End Sub
Private Function m(n As Integer) As Integer
Static s As Integer
For k=1 To n
s=s+1
Next
m=s
End Function
运行程序,单击命令按钮Command 1的输出结果为【6】。