作业帮26个英文字母,任选四个,包含CO这个排列的,所有的排列用EXCEL我我描述下,给宝宝起名字,必须是用26个字母组合成一个词（可重复）,这个词语可以是四个或者五个或者6个字母,但是这个词语里面
来源：学生作业帮助网 编辑：作业帮 时间：2024/05/02 06:39:02
26个英文字母,任选四个,包含CO这个排列的,所有的排列用EXCEL我我描述下,给宝宝起名字,必须是用26个字母组合成一个词（可重复）,这个词语可以是四个或者五个或者6个字母,但是这个词语里面
26个英文字母,任选四个,包含CO这个排列的,所有的排列用EXCEL我
我描述下,给宝宝起名字,必须是用26个字母组合成一个词（可重复）,这个词语可以是四个或者五个或者6个字母,但是这个词语里面必须包含co这个词（这个词可以必须在词头或者词尾）,顺序不能颠倒,请用程序帮我列下,我举例吧：ABCO COAB AACO COAA COCO都是符合要求的
26个英文字母,任选四个,包含CO这个排列的,所有的排列用EXCEL我我描述下,给宝宝起名字,必须是用26个字母组合成一个词（可重复）,这个词语可以是四个或者五个或者6个字母,但是这个词语里面
Sub aa() '四位
k = 1
For i = 1 To 26
For j = 1 To 26
Range("A" & k) = Chr(i + 64) & Chr(j + 64) & "CO"
Range("A" & k + 1) = "CO" & Chr(i + 64) & Chr(j + 64)
k = k + 2
Next j
Next i
End Sub
Sub Bb() '五位
k = 1
For i = 1 To 26
For j = 1 To 26
For a = 1 To 26
Range("B" & k) = Chr(i + 64) & Chr(j + 64) & Chr(a + 64) & "CO"
Range("B" & k + 1) = "CO" & Chr(i + 64) & Chr(j + 64) & Chr(a + 64)
k = k + 2
Next a
Next j
Next i
End Sub
Sub cc() '六位
k = 1
For i = 1 To 26
For j = 1 To 26
For a = 1 To 26
For B = 1 To 26
Range("C" & k) = Chr(i + 64) & Chr(j + 64) & Chr(a + 64) & Chr(B + 64) & "CO"
Range("C" & k + 1) = "CO" & Chr(i + 64) & Chr(j + 64) & Chr(a + 64) & Chr(B + 64)
k = k + 2
Next B
Next a
Next j
Next i
End Sub
六位的在EXCEL2003中装不下（C列）,建议用2007以上版本.
