vb 字母组合问题text1里有6个字母,ABCDEFtext2里有4个字母MNSY一个命令按钮要实现的是:首先把tex
来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:综合作业 时间:2024/05/02 06:53:27
vb 字母组合问题
text1里有6个字母,ABCDEF
text2里有4个字母MNSY
一个命令按钮
要实现的是:首先把text1里的字母依次组合成两位的字母,中间要用空格分开.组成AB AC AD AE AF BC BD BE BF CD CE CF DE DF EF
然后把组出来的这些两位数组合,依次跟text2中的每一个字母组合一遍,形成ABM ABN ABS ABY ACM ACN ACS ACY,依次类推.
把结果输出到text3中.
这样的代码怎么写?
text1里有6个字母,ABCDEF
text2里有4个字母MNSY
一个命令按钮
要实现的是:首先把text1里的字母依次组合成两位的字母,中间要用空格分开.组成AB AC AD AE AF BC BD BE BF CD CE CF DE DF EF
然后把组出来的这些两位数组合,依次跟text2中的每一个字母组合一遍,形成ABM ABN ABS ABY ACM ACN ACS ACY,依次类推.
把结果输出到text3中.
这样的代码怎么写?
Private Sub Command1_Click()
For i = 1 To Len(Text1.Text)
For j = i + 1 To Len(Text1.Text)
For k = 1 To Len(Text2.Text)
DoEvents
Text3.Text = Text3.Text & Mid(Text1.Text, i, 1) & Mid(Text1.Text, j, 1) & Mid(Text2.Text, k, 1) & " "
Next
Next
Next
End Su
For i = 1 To Len(Text1.Text)
For j = i + 1 To Len(Text1.Text)
For k = 1 To Len(Text2.Text)
DoEvents
Text3.Text = Text3.Text & Mid(Text1.Text, i, 1) & Mid(Text1.Text, j, 1) & Mid(Text2.Text, k, 1) & " "
Next
Next
Next
End Su
vb 字母组合问题text1里有6个字母,ABCDEFtext2里有4个字母MNSY一个命令按钮要实现的是:首先把tex
含有2个连续o的单词单词里要有2个连续的o2个o前要有4个字母,6个字母后面要有1个字母的,还有前面要有1个字母后面有4
为什么26个英语字母里有5个原音字母
26个字母里元音字母有哪些?
26个字母组合的问题26个英文字母,第一步首先任选两个进行组合,共有共有325种组合方式,第二步然后从这325种种组合里
英文字母26个,4个字母1个组合,有多少种不同的组合?
26个字母英语单词的拼写,有几个字母是只有一个读音的字母?
vb的问题,求一个算法!每个字母改为它后面的第N个字母.
34个字母随意组合一个“五个字母的单词”,考虑顺序的,能有多少种组合法
8个数字取一个数和10个字母中取一个字母的组合有多少种
英语里的音标是怎么出现的?26个字母为什么有48个发音?
有一个单词倒数第3个字母是a,且有6个字母组成