| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 如何批量定义变量 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=159057) |
| -- 作者：bobolan521 -- 发布时间：2020/12/12 9:55:00 -- 如何批量定义变量 Dim Book As New XLS.Book() Dim Sheet1 As XLS.Sheet = Book.Sheets(0) For i As Integer = 1 To 40 Book.Sheets.Add() \'增加一个工作表 Dim "Sheet" & i As XLS.Sheet = Book.Sheets(i) \'引用新增加的工作表 Next 红色代码会报错，老师请问一下如何写代码才可以实现批量定义变量呢？
|
| -- 作者：有点蓝 -- 发布时间：2020/12/12 10:11:00 -- 没有这种用法，只能一个个定义。也没有必要多个 Dim Sheet1 As XLS.Sheet = Book.Sheets(0) For i As Integer = 1 To 40 Book.Sheets.Add() \'增加一个工作表 Sheet1 = Book.Sheets(i) \'引用新增加的工作表 Next |
| -- 作者：bobolan521 -- 发布时间：2020/12/12 10:15:00 -- 谢谢有点蓝老师 |