VB中怎样使用CommonDialog控件！
点击左边窗体的command1按钮，出现类似右边窗体，然后选择需要txt的文件（如666.txt），并将它的名称以字符串的形式赋给Text1.text!...
点击左边窗体的command1按钮，出现类似右边窗体，然后选择需要txt的文件（如666.txt），并将它的名称以字符串的形式赋给Text1.text!
展开
3个回答
展开全部
在工具栏中点鼠标右击啊，再点部件，就从里面找就是了！！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
部件 里 的CommonDialog 6.0
追问
等于没说！
不过还是谢谢你的帮助！母亲节快乐！祝你全家身体健康，万事如意！
有时间帮我想想这个吧
http://zhidao.baidu.com/question/422675333.html?quesup2&oldq=1
谢了！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Private Sub Command1_Click()
Dim f
With CreateObject("UserAccounts.CommonDialog")
.Filter = "txt File|*.txt": .InitialDir = "d:\"
f = .ShowOpen
Text1 = IIf(f, .FileName, "")
End With
End Sub
Dim f
With CreateObject("UserAccounts.CommonDialog")
.Filter = "txt File|*.txt": .InitialDir = "d:\"
f = .ShowOpen
Text1 = IIf(f, .FileName, "")
End With
End Sub
追问
提示不行！不过我已经在另一头的提问中找到答案了！
http://zhidao.baidu.com/question/422686202.html#reply-box-1030588739
谢谢你的帮助！母亲节快乐！祝你全家身体健康，万事如意！
追答
可能系统不一样，是xp的运行正常，问题解决了就行，方法非常多。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
