[發問] 請教迴圈寫法

x7776658

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

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

我覺得可以將陣列作變數來使用。

下載 (16.59 KB)

2022-4-27 14:45