กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
318 2
URL.หัวข้อ /
URL
การวน loop for
Private Sub Form_Load()
Dim i As Integer
Dim str As String
'ต้องการ วน loop เพื่อนำค่าใน textbox1.value,textbox2.value,...,textbox4.value มาใช้ได้
'แต่ผมจะอ้างอิงอย่างไรครับเพื่อจะดึงค่าของมันออกมา
'เช่น loop i = 0 ต้องการอ้างถึง textbox ที่ i ก็คือ textbox0 แล้วตามด้วย
'ค่า properties ของมันคือ textbox0.Value จากนั้นก็นำค่าไปใช้งานได้น่ะครับ
For i = 1 To 4
str = "textbox" & i
'แล้วพอจะใช้งานคือดึงค่ามันก็กลายเป็น Compile Error - Invalid Qualifier ครับ
MsgBox str.Value 'ผมทราบแล้วว่า String มันไม่มี .properties ครับ จึงขอเรียนถามครับว่าจะใช้วิธีไหนได้ครับ
Next i
End Sub
ด้วยความเคารพ
Dim i As Integer
Dim str As String
'ต้องการ วน loop เพื่อนำค่าใน textbox1.value,textbox2.value,...,textbox4.value มาใช้ได้
'แต่ผมจะอ้างอิงอย่างไรครับเพื่อจะดึงค่าของมันออกมา
'เช่น loop i = 0 ต้องการอ้างถึง textbox ที่ i ก็คือ textbox0 แล้วตามด้วย
'ค่า properties ของมันคือ textbox0.Value จากนั้นก็นำค่าไปใช้งานได้น่ะครับ
For i = 1 To 4
str = "textbox" & i
'แล้วพอจะใช้งานคือดึงค่ามันก็กลายเป็น Compile Error - Invalid Qualifier ครับ
MsgBox str.Value 'ผมทราบแล้วว่า String มันไม่มี .properties ครับ จึงขอเรียนถามครับว่าจะใช้วิธีไหนได้ครับ
Next i
End Sub
ด้วยความเคารพ
2 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R03898
ขอบพระคุณอาจารย์สุภาพมากครับ
Time: 0.0905s
For i = 1 To 4
str = "textbox" & i
MsgBox Me(str)
Next i