t72和t90:abcde*f=decab abcdef代表不同阿拉伯数字请问代表什么数

Private Sub Command1_Click()
Dim A As Long, B As Long, C As Long, D As Long, E As Long, F As Long
Dim LEFT As Long, RIGHT As Long, LISTSTR As String
For A = 0 To 9
For B = 0 To 9
If B <> A Then
For C = 0 To 9
If C <> B And C <> A Then
For D = 0 To 9
If D <> C And D <> B And D <> A Then
For E = 0 To 9
If E <> D And E <> C And E <> B And E <> A Then
For F = 0 To 9
If F <> E And F <> D And F <> C And F <> B And F <> A Then
LEFT = (A * 10000 + B * 1000 + C * 100 + D * 10 + E) * F
RIGHT = D * 10000 + E * 1000 + C * 100 + A * 10 + B
If LEFT = RIGHT Then
LISTSTR = "A:" & A & " || " & "B:" & B & " || " & "C:" & C & " || " & "D:" & D & " || " & "E:" & E & " || " & "F:" & F
List1.AddItem LISTSTR
End If
End If
Next F
End If
Next E
End If
Next D
End If
Next C
End If
Next B
Next A
List1.AddItem "All Data Action OK!!!"
End Sub

无解！