[填空题] 窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的 *** 作,当选定了文件(例如: G:VB2010-9in.txt)

[填空题] 窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的 *** 作,当选定了文件(例如: G:VB2010-9in.txt),第1张

[填空题] 窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的 *** 作,当选定了文件(例如: G:VB2010-9in.txt)

[填空题] 窗体上有一个名称为CD1的通用对话框。通过菜单编辑器建立如图1所示的菜单。程序运行时,如果单击“打开”菜单项,则执行打开文件的 *** 作,当选定了文件(例如: G:VB2010-9in.txt)并打开后,该文件的文件名会被添加到菜单中,如图2所示。各菜单项的名称和标题等定义如下表。以一下是单击“打开”菜单项的事件过程,请填空。  Dim mnuCounter As Integer  Private Sub tnnuOpen_ Click()  CDI.Show0pen  If CD I .FileName<>""Then  Open_【14】_For Input As#1  mnuCounter=mnuCounter+1  Load FName(mnuCounter)  FName(mnuCounter).Caption=CD I.FileName  FName(mnuCounter)._【15】_=True  Close#1  End If  End Sub

正确答案:

Cd1.FileName

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zaji/5602845.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-12-15
下一篇 2022-12-15

发表评论

登录后才能评论

评论列表(0条)

保存