小编Max*_*III的帖子

我想知道为什么以下语法不能像我在VBA中那样工作,以及我应该做些什么来确保它呢.

For a = 1 To 10
    For b = 1 To 10
        For c = 1 To 10
            If a <> b <> c Then
                MsgBox (a & " " & b & " " & c)
            End If
        Next c
    Next b
Next a

这是一个简化的示例,仍然可以通过以下方式手动获取:

if a<>b and b<>c and c<>a then

但是我实际想要的代码多次有10个这样的变量,这使得它在55个不等条件下不可行,或者我可能会输错.我认为有一种更有效的方法,但我还没有找到它.

PS.我的目标是,如果所有变量都是唯一的,则只会弹出一个消息框.

我已经实现了我的目标,尽管它可能比以下方法更有效率:

For a = 1 To 10
    check(a) = True
    For b = 1 To 10
        If check(b) = False Then
        check(b) = True …