標題: [發問] 請教迴圈寫法 [打印本頁]

---

作者: x7776658    時間: 2022-4-24 10:19     標題: 請教迴圈寫法

各位前輩好         
請問若要將以下資料改成為迴圈的形式將如何編寫
謝謝

Dim key1 As String

Dim key2 As String

Dim key3 As String

key1 = "NS_RAY[nsRayGrid_73.r1].NS_SEGMENT[segment_1]"

key2 = "NS_RAY[nsRayGrid_73.r2].NS_SEGMENT[segment_1]"

key3 = "NS_RAY[nsRayGrid_73.r3].NS_SEGMENT[segment_1]"


X1 = LT.DbGet(key1, "Global_X")

X2 = LT.DbGet(key2, "Global_X")

X3 = LT.DbGet(key3, "Global_X")


Cells(1, 1).Value = X1

Cells(1, 2).Value = X2

Cells(1, 3).Value = X3

---

作者: andys811538    時間: 2022-4-27 14:46

我覺得可以將陣列作變數來使用。
[attach]34808[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)