VB （A B C D E）排列问题

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/19 15:55:17

VB （A B C D E）排列问题
有ABCDE五个字母,他们不重复的排序结果有120种,怎么写代码才能把这120种排列求出来啊?
例如ABCDE,ABCED,ABECD.

'试一下：
Private Sub Command1_Click()
Dim i1, i2, i3, i4, i5, j, arr() As String, n
For i1 = 65 To 69
For i2 = 65 To 69
For i3 = 65 To 69
For i4 = 65 To 69
For i5 = 65 To 69
n = n + 1
ReDim Preserve arr(1 To n)
arr(n) = Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5)
For j = 65 To 69
If InStr(arr(n), Chr(j)) = 0 Then
n = n - 1
Exit For
End If
Next j, i5, i4, i3, i2, i1
MsgBox Join(arr)
End Su

VB中用IF语句把a b c d e从大到小排列把VB算术表达式a / (b + c / (d + e / Sqr(f)))写成数学表达式. 将A、B、C、D、E排成一列，要求A、B、C在排列中顺序为“A、B、C”或“C、B、A”（可以不相邻），这样的排列数有多一个超级SB问题a = b * c * d * e 关于vb中常量?下列是正确的VB常量.A.#08/32/2010# B.E-5 C.7D D.True 将字符a,a,a,a,a,b,c,d,e进行排列,有几种排法?,若b,c,d,e中任何两个字母不相邻有几种排法? 电子表格：按照A列数据的顺序,排列B,C,D,E,F列 A、B、C、D、E五种元素从左到右按原子序数递增排列的分析 A B C D E 请问在VB中算术表达式W=A^2/（B+C/（D+E/SQR(F)））改写为等价的数学表达式是什么? 已知A,B,C,D,E五个数,他们在数轴上的位置如图所示,请根据图形把A,B,C,D,E从小到大排列. 7个连续质数从大到小排列是a、b、c、d、e、f、g.已知它们的和是偶数，那么d=（　　）