我使用以下代码:创建EXCEL文件和动作 Dim v As Integer = e.form.Controls("TextBox1").Value Dim vv As Integer = e.form.Controls("TextBox2").Value Dim vvv As Integer = e.form.Controls("TextBox3").Value Dim App As New MSExcel.Application Dim Wb As MSExcel.Workbook = App.WorkBooks.Add Wb.WorkSheets(1).name = (vv) Wb.WorkSheets(1).range("A1").Value = (v) Wb.SaveAs("d:\123.xls") ' 在这里,我希望能够:根据TextBox3录入的内容做为文件名称,并默认保存到D:\EXCEL\文件夹下面.请教老师!!!' App.Quit
|