易截截图软件、单文件、免安装、纯绿色、仅160KB

这种情况下的 CommonDialog1.ShowSave VB代码怎么写

我想把exe程序所有目录下的1.txt文件，用一个按钮导出去，就是说，我点一下按钮，出现保存对话框，然后我选择一个路径，就可以把exe程序所有目录下的1.txt文件保存到我选择的那个路径下，而且文件名也改成了我在对话框那输入的新文件名，请教前辈，这个过程的CommonDialog1.ShowSave该怎么写，谢谢！
"exe程序所有目录下" 是什么意思？

exe程序所在目录下。楼主用词不当的吧
估且认为是手误,exe目录下只有一个1.txt
filecopy "1.txt", CommonDialog1.filename

引用
VB codePrivateSub Command1_Click()Dim mfileAsString, mfile2AsStringOnErrorResumeNext
    CommonDialog1.InitDir= App.Path
    CommonDialog1.Filter="文档文件(*.txt)|*.txt|所有文件(*.*)|*.*"
    CommonDialog1.Sh?-


看起来就是这个，虽然还没试，不过我不懂下面这些语句干什么的，您能告诉我有什么用吗？

Dim buff() As Byte, i As Long
    i = FileLen(mfile)
    ReDim buff(i - 1)

    Open mfile For Binary As #1
    Get #1, , buff
    Close #1

    Open mfile2 For Binary As #1
    Put #1, , buff
    Close #1


exe程序所有目录下就是说1.txt是相对路径，即在本目录下的一个文件，可能是我没说清楚，呵呵
同意 3F .

引用
同意 3F .


相关问答：

VB 的 PictureBOX 控件绘图问题 - VB / 控件

初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
  Picture1.Top = -VScroll1.Value + bcW '垂直移动
  Picture1.Left = -HScroll1.Value + bcW ' ......

vb 牛吗 - Web 开发 / vbScript

vb是不是很牛啊 怎么那么多的病毒都是vb做的啊 c#行不行？
c#在XP运行不了，除非让别人先装上.net.
VB相对于C,C++,ASM等等，局限性大多了。

别再说什么语言不如什么语言的话了，只有你不会用或用着不顺手的� ......

帮我改改这VB题 - VB / 基础类

帮我改改 我总觉得有问题
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

求助：VB调用动态库问题 - VB / 基础类

各位大虾：
  我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......

关于VB.NET和MS ACCESS的问题

我写了一个软件，要用到ACCESS数据库，我再访问ACCESS的时候，我需要从表里读出一行数据，我的程序是这样写的，SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号