求助?VB...For下面怎么用8进制...TKS...............

RT..
平常用For i=0 to 23
想要的效果是 For i=0 to 27(这里i逢8进1, i=7完,就变成i=10)

For i=0 To &O27 '注意&后面是字母O

For i = 0 To &O27
Label1(i).BackColor = "255"
Next
写了这个,运行了一下,,发现和For i = 0 To 23效果是一样的...
要的是Label1(8) (9)不能被选中,(18) (19)也不能被选中

For i = 0 To 23
Label1(Val(Oct(i))).BackColor = vbRed
Next

下载贴吧APP
看高清直播、视频！

分享到: