Re: [VB6 ] 關於for迴圈簡化的問題
感謝,語法沒下錯,只是忘記先宣告。太久沒玩VB了,忘記不少東西。
最前面先宣告出陣列,後面就可以改成
Dim y(7)
.
.
.
For i = 0 To 7
y(i) = Mid(yo, i + 1, 1)
If y(i) = 0 Then
Shape1(i).BackColor = RGB(128, 128, 128)
Else
Shape1(i).BackColor = RGB(255, 0, 0)
End If
Next i
就完工了,感謝提示XD
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.169.199.77
討論串 (同標題文章)
完整討論串 (本文為第 2 之 2 篇):