新手求助～怎样用输入字符组成文件名

Question

我在用VB6.0控制excel时，以某一个已经存在的excel工作簿作为模板新建一个工作簿，然后“另存为”这个工作薄，有关程序如下：set xlbook＝xlapp.workbooks.add("E:\price\templeprice")
xlbook.saveas("E:\price\price")
这样，每次另存为的工作簿都叫“E:\price\price”
我想在窗体上设一个text文本框，让操作者输入一个名字，例如这次输入的是yourprice，希望这次被另存为的工作簿名称是“E:\price\yourprice”应当怎样操作才对？我想尽办法去组合这个文件名都不行，也许这个方法很简单，但是我就是实现不了，请各位高人不吝赐教，再此先鞠躬谢过了！！！

Answer 1

把这句xlbook.saveas("E:\price\price")改为xlbook.saveas("E:\price\" & text1.text)应该可以的.

Answer 2

Dim fname As String
fname = InputBox("请输入文件名：", "提示", "E:\price\templeprice")
Set xlbook = xlapp.workbooks.Add("E:\price\templeprice")
xlbook.saveas (fname)

Answer 3

把这句xlbook.saveas("E:\price\price") 改为xlbook.saveas("E:\price\" & text1.text)