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

Question

如题所述

Answer 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

Answer 2

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

Answer 3

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