问题标题：
vb要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列.求高手看下这个行数的问题PrivateSubCommand1_Click()Dima%,b%,c%,i%,k%k=0Fori=100To999a=iMod10b=(iMo
问题描述：
vb要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列.求高手看下这个行数的问题
PrivateSubCommand1_Click()
Dima%,b%,c%,i%,k%
k=0
Fori=100To999
a=iMod10
b=(iMod100)10
c=i100
Ifa+b+c=10Then
k=k+1
PrintTab((kMod5)*8);i
EndIf
Nexti
EndSub
这个输出的数据时斜着排列的,哪有问题?求高手
不好意思,我会了
马坡回答：
PrivateSubCommand1_Click()
Dima%,b%,c%,i%,k%
k=0
Fori=100To999
a=iMod10
b=(iMod100)10
c=i100
Ifa+b+c=10Then
PrintTab((kMod5)*8);i;
k=k+1
EndIf
Nexti
EndSub
孟令云回答：
帮忙看看这个吧，统计字符个数的，之后把上个财富给你。
马坡回答：
已经回答了，你自己去看
点击显示
其它推荐