vb 要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列. 求高手看下这个行数的问题

来源：学生作业帮编辑：百度作业网作业帮分类：综合作业时间：2024/07/08 02:32:30

vb 要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列. 求高手看下这个行数的问题
Private Sub Command1_Click()
Dim a%, b%, c%, i%, k%
k = 0
For i = 100 To 999
a = i Mod 10
b = (i Mod 100) \ 10
c = i \ 100
If a + b + c = 10 Then
k = k + 1
Print Tab((k Mod 5) * 8); i
End If
Next i
End Sub
这个输出的数据时斜着排列的,哪有问题?求高手
不好意思,我会了

Private Sub Command1_Click()
Dim a%, b%, c%, i%, k%
k = 0
For i = 100 To 999
a = i Mod 10
b = (i Mod 100) \ 10
c = i \ 100
If a + b + c = 10 Then
Print Tab((k Mod 5) * 8); i;
k = k + 1
End If
Next i
End Sub
再问：帮忙看看这个吧，统计字符个数的，之后把上个财富给你。
再答：已经回答了，你自己去看

vb 要求输出3位正整数,各个数字之和等于10,每行显示5个数据,每个数据占6列. 求高手看下这个行数的问题求数据为三位正整数并且它的其各个数字之和等于10 用VB怎麼做以每行5个的形式输出所有的3位数字的质数.说明:(1)每个质数占6列,因此请用输出语求数据为三位正整数（即100~999之间）,并且它的其各个数字之和等于10 用VB怎麼做设计一个程序,能随机产生3个3位的正整数,且要求每个数的三位数字之和等于20,并输出结果求教一道VB代码编程题目：取随机函数[20,300]中50个能被6整除的数据,要求每行输出4个.急求!谢谢各位已知某个正整数的各个数字之和与各个数字之积等于这个数.求这个正整数. C语言输入一个3行5列的矩阵数据,输出矩阵中每行最大值如图所示,有9个方格,要求每个方格填入不同的数字,使得每行,每列,每条对角线上的3个数字之和相等. 输入一个正整数,输出该数的各个数字之和.要求编写函数,计算整数的各个数字之和 VB随机产生10个任意的两位正整数存放在一维数组中,求数组的最大值、平均值、能实现将数据升序排列,并且要求：输入6个数据到2行3列的二维数组,计算其中数值大于0的数据的平均值,输出计算出来的平均值.