文件夹中文件的数量。如图所示。
能够正确实现上述功能的程序是
A) Private Sub Dirl_Change() B)Private Sub Dir1_Change()
Filel．Path＝Dir1.path Filel.path=dir1．Path
End Sub End Sub
Private Sub Drivel_Change() Private Sub Drive1_Change()
Dirl．Path＝Drivel．Drive Dirl．Path＝Drivel.Drive
Labell．Caption＝Filel.listCount Labell．Captlon＝file1.list
End Sub End Sub
C)Private Sub Dirl_Change() D) Private Sub Dirl_Change()
Filel．Path=Dirl．Path filel．Path＝Dir1．Path
Labell．Caption＝Filel．ListCount Labell．Caption＝Filel．List
End Sub End Sub
Private Sub Drivel_Change() Private Sub Drivel_Change()
Dirl．Path＝Drivel．Drlve Dir1．Path＝Drivel．DrlVe
Labell．Caption＝Filel．ListCount Labell．Caption＝Filel.list
End Sub End Sub (28)一个工程中包含两个名称分别为Forml、Form2的窗体，一个名称为mdlFunc的标准
模块。假定在Forml、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：
Forml中定义的过程：
PriVate Sub frmfunctionl()
End Sub
Form2中定义的过程：
Public Sub frmffunction2()
End Sub
mdlFunc中定义的过程：
PubliC Sub mdlFunction()
End Sub
在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是
A)上述三个过程都可以在工程中的任何窗体或模块中被调用
B)frmfunction2和mdlfunction过程能够在工程中各个窗体或模块中被调用
C)上述三个过程都只能在各自被定义的模块中调用
D)只有mdlFunction过程能够被工程中各个窗体或模块调用(29)窗体上有两个名称分别为Textl、Text2的文本框，一个名称为Commandl的命令按钮。运行后的窗体外观如图所示。
设有如下的类型声明
Type Person
name As String*8
major As String*20
End Type
当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29．dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
A)0pen”c：＼Test29．dat" For Random As#1
Put #1，1，p
Close #1
B)Open "c:＼Test29.dat" For Random As #1
Get#1，1，p
C10se #1
C)open "c＼Test29．dat" For Random As #1 Len＝Len(p)
Put #1，1，p
Close #1
D)Open "c：＼Test29．dat " For Random As #1=Len(p)
Get #1，1，p
CloSe #1
(30)在窗体上画一个名称为CommonDialogl的通用对话框，一个名称为Commandl的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为"Save"，缺省文件名为“SaveFile”，在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是
A)Priv
上一页 [1] [2] [3] [4] [5] [6] 下一页
责任编辑：小草
