哎……呀……这是怎么弄啊？
我做个程序，我想点击窗体时弹出消息框，再点击确定时这个程序能移动到我指定的路径里。有谁会？？
有谁会？？
2007-02-14 22:16
Private Sub Form_Click()
Dim lujing As String
lujing = InputBox("请输入路径", "输入")
FileCopy App.Path + "\工程1.exe", lujing
End Sub
2007-02-15 15:41
自身的文件名不一定为工程1,应该这样写:
Private Sub Form_Click()
Dim lujing As String
lujing = InputBox("请输入路径", "输入")
FileCopy App.Path + "\" + App.EXEName + ".exe", lujing
End Sub
2007-02-15 20:38
2007-02-15 22:13