好吧问答库 > 我安装的VB怎么没有通用对话框？哪里去了？部件里没！难道是精简版的缘故？

我安装的VB怎么没有通用对话框？哪里去了？部件里没！难道是精简版的缘故？

2024年11月17日 07:45

有3个网友回答

网友（1）：

按照你说的部件里没,那就是精简版的缘故,解决办法:
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

网友（2）：

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

网友（3）：

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