用VB编写函数过程,求任意正整数各位数字之和
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/04/27 17:42:28
用VB编写函数过程,求任意正整数各位数字之和
是用VB编写啊,
是用VB编写啊,
在窗体上添加一个按钮,加入如下代码“
Private Sub Command1_Click()
Dim N '因为你说的是任意正整数,所以没有给变量指定变量类型
Dim I As Integer
Dim L As Integer,S As String
Dim M As Integer
N = InputBox("请输入任意一个正整数") '此处假设输入的内容是符合正整数要求的,不再另外做判断
S = CStr(N)
L = Len(S) '获取N的长度
For I = 1 To L
M = M + Mid(S,I,1)
Next
MsgBox N & "的各位数字之和为:" & M
End Su
Private Sub Command1_Click()
Dim N '因为你说的是任意正整数,所以没有给变量指定变量类型
Dim I As Integer
Dim L As Integer,S As String
Dim M As Integer
N = InputBox("请输入任意一个正整数") '此处假设输入的内容是符合正整数要求的,不再另外做判断
S = CStr(N)
L = Len(S) '获取N的长度
For I = 1 To L
M = M + Mid(S,I,1)
Next
MsgBox N & "的各位数字之和为:" & M
End Su
用VB编写函数过程,求任意正整数各位数字之和
编写一个函数 int sum(int n),求任意一个正整数的各位数字之和;再编写一个程序调用sum函数
编程 编写函数,计算正整数的 各个数字之和
用VB编写程序,求三位数的奇数中,所有各位数字之和是12的倍数的数的个数?
VB语句问题,编写求矩形面积的函数过程,调用该函数求任意两个矩形的面积和.
4.编写一个函数计算任意一个整数的各位数字之和(例如-1782的各位数字之和是1+7+8
谁能给我写一个vb小程序,编写一个函数,求1-N(正整数)的所有正整数之和,
编写函数,计算一个整数各位数字之和
用vb编写函数过程IsPrim(n),对于一个给定的正整数n,判断是否是素数
用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和.
07年春的计算机vb题 编制函数过程sum,用于计算一个整数的各位数字之和
编写Java应用程序,求任意一个三位数的数字之和