VB编程的一个小问题,请教懂的帮指点一下

来源:百度知道 编辑:UC知道 时间:2024/05/30 05:40:46
我写下边这段程序:

Private Sub Command1_Click()
dimdbname As String: Dim db As Database: Dim td As TableDef

CommonDialog2.FileName = "请选择以上文件名"

End Sub
打到CommonDialog2.却不出现提示,是什么原因啊?
有放啊,顺便问一下,那个commondialog怎么放?我是随便放在一个角落那的

我有放的 我刚都看到了 两个都有

按Ctrl+T 选中 就OK了
Microsoft Common Dialog Control 6.0(SP3)
如果这样的话..那么,如果你自己打出来的后面的代码,能用就行了吧...
不去管那么多了.,呵呵.只要能用就行了

发现错误啦!CommonDialog2不存在或不是通用对话框控件、Database及TableDef类型未声明涅~囧囧囧囧

试下这个

Private Sub Command1_Click()
Dim dbname As String
' ↑这里没空格哦
Dim db As Database
' ↑↓怀疑没声明
Dim td As TableDef

CommonDialog2.FileName = "请选择以上文件名"

End Sub

打到CommonDialog2.却不出现提示,是什么意思啊??

是不是这样呢:
Private Sub Command1_Click()
dimdbname As String: Dim db As Database: Dim td As TableDef

CommonDialog2.FileName = "请选择以上文件名"
CommonDialog2.showopen

End Sub