我打开科技鱼怎么没有对话框？

发布网友发布时间：2022-04-19 13:08

共3个回答

热心网友时间：2023-06-24 08:22

按照你说的部件里没,那就是精简版的缘故,解决办法:
1.下载控件"comdlg32.ocx"
2.用代码直接调用系统动态链接库,比如下面的代码
Dim f, s: s = String(260, Chr(0))
Set f = CreateObject("MSComDlg.CommonDialog")
With f
.Flags = &H4
.MaxFileSize = 260
.InitDir = "g:\"
.Filter = "所有文件(*.*)|*.*|文本文件(*.txt)|*.txt"
.FilterIndex = 2
'.DefaultExt = .Filter
.ShowSave
s = .FileName
End With
If s <> "" Then Label1.Caption = s
Set f = Nothing

热心网友时间：2023-06-24 08:22

你可以打开程序-然后在“文件”“新建工程”里面，就可以找到，出现这样的情况可能是你运用第一次程序的时候点击了下“次不在提示”。

热心网友时间：2023-06-24 08:23

需要添加勾选的部件才能使用通用对话框

首页

文章

我打开科技鱼怎么没有对话框？