如何利用vb编程求一个整数各个数位上数字之和
如何利用vb编程实现求一个整数各个数位上数字之和,现在就分享具体的实现步骤,仅供参考使用。
操作方法
- 01
首先启动vb,新建一个工程,选择标准exe文件后进入窗体界面。
- 02
调整窗体的大小,双击工具栏中的按钮,创建command控件。
- 03
修改按钮的caption属性值为计算,接着双击进入代码区域,对象为command1,过程设置为click。
- 04
在代码区域输入代码,代码如下: Dim a, s, b As Long a = Val(InputBox("请输入a的值")) s = 0 Do While a > 0 b = a Mod 10 s = s + b a = a \ 10 Loop Print s
- 05
点击运行按钮,接着点击计算按钮,并输入数值进行验证功能,这里是123进行验证,结果应该是6.
- 06
执行文件-保存工程命令,接着执行文件-生成工程exe命令,将文件生成可执行文件。
赞 (0)