编程论坛 → VB6论坛

蛇形走位排列的vb编程该怎么设计？

ww555547 发布于 2020-08-03 10:13， 1583 次点击

小白想请教一下各位，蛇形走位排列的vb编程该怎么设计？

[此贴子已经被作者于2020-8-3 10:28编辑过]

3 回复

cwa99582020-08-04 08:21

蛇形走位排列是什么呢？

ww5555472020-08-04 10:21

回复 2楼 cwa9958

就是考场排座位的时候，那种s型排列
1 10 11 20
2 9 12 19
3 8 13 18
4 7 14 17
5 6 15 16
这样的

cwa99582020-08-05 13:43

程序代码：

Private Sub Command1_Click()

    m = 5   '行
    n = 4   '列
    For i = 1 To m
        For j = 1 To n
            Print IIf(j Mod 2 = 0, m * j - i + 1, i + (j - 1) * m),
        Next
        Print
    Next

End Sub

[此贴子已经被作者于2020-8-5 13:47编辑过]