[求助]高手帮帮忙,选择文件并把文件名添加到文本框里
本帖最后由 作者 于 2009-3-23 15:52:58 编辑 <br /><br /> <p class="MsoNormal" style="MARGIN: 0cm 0cm 0pt;"><strong><font face="Times New Roman"></font></strong></p><strong><p class="MsoNormal" style="MARGIN: 0cm 0cm 0pt;"></p><p><strong><span lang="EN-US" style="COLOR: black; FONT-WEIGHT: normal; mso-bidi-font-size: 10.5pt; mso-font-kerning: 0pt; mso-bidi-font-weight: bold;"><p></p></strong></p><p></p><p></p><p></p><p></p><p></p><p></p><p></p><p></p></span></strong><strong><p></p></strong><p><strong><p> 我想做在cad上做一个视窗<br/>具体想法是:<br/> 按一下命令按钮就弹出选择文件对话框<br/>选中文件后<br/>文件路径显示在文字框里<br/>应该怎么做,可以给我写个代码吗?<br/>请大家多多指教</p></strong></p><p> 我想做在cad上做一个视窗<br/>具体想法是:<br/> 按一下命令按钮就弹出选择文件对话框<br/>选中文件后<br/>文件路径显示在文字框里<br/>应该怎么做,可以给我写个代码吗?<br/>请大家多多指教</p> <p>无语,还有这样问问题的,干脆让别人给你做一个吧!</p><p></p> <p>并不是每一个学vba的人,所有的控件都会</p><p>也不是所有的控件,每一个人都能用到</p> <p>eg:</p><p>Private Sub CommandButton1_Click()<br/>CommonDialog1.ShowOpen<br/>TextBox1.Text = CommonDialog1.FileName<br/>End Sub<br/></p> 我放到程序里总是提醒出错,应该怎么加载引用项或装什么程序 <p>先练好基本功能吧</p> <p>我的vba就是通过明经通道一点一点学的,</p> <p>代码见4楼,窗体包含一个CommandButton对象,一个TextBox对象及一个<font color="#ff0000">CommonDialog对象</font></p> <p>谢谢了,</p><p>我的CommonDialog还是不能用,我的是在cad2006中做的,我也引用了CommonDialog,</p><p>在控件里也加载了CommonDialog</p><p></p>
页:
[1]