VB中如何计算一个数字的各位之和直至小于10

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/04/29 12:21:45

VB中如何计算一个数字的各位之和直至小于10
一个整数,是从其他VB程序中计算出来的数,目前不知道具体数字是多少,如何计算它的各数位的数字之和,直至小于10的数字
例如：从VB程序中计算出来的数字为：
12345
那么1+2+3+4+5=15
1+5=6
那么,得数是6

Private Function Calculate(ByVal Int_num As String) As Integer
'Int_num 设置为String是为了 Len(Int_num) 计算正确
Calculate = 0
If Int_num

VB中如何计算一个数字的各位之和直至小于10 07年春的计算机vb题编制函数过程sum,用于计算一个整数的各位数字之和 VB 判断一个整数w的各位,数字平方之和能否被5整除,要VB的 c语言;计算一个自然数的各位数字之和与各位数字的平方和在小于2006的自然数中,各位数字之和是26的有多少? 编写函数,计算一个整数各位数字之和 4.编写一个函数计算任意一个整数的各位数字之和(例如-1782的各位数字之和是1+7+8 用vb计算100到999中有多少个数其各位数之和等于5 C语言：从键盘上输入一个整数,计算整数的各位数字之和用C语言编程,输入一个正整数,计算并显示该数的各位数字之和. C语言：输入一个正整数, 计算并显示出该数的各位数字之和. 设计一个函数,能求一整数的各位数字之和,调用该函数计算任一输入的整数的各位数字之和.