首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写程序,要求输入一个正整数,计算各位数字之和,并将计算结果显示在窗体上。程序如下: Private Sub Command1_Click() Dim Sum As Integer, k As Long k = Val(InputBox("
编写程序,要求输入一个正整数,计算各位数字之和,并将计算结果显示在窗体上。程序如下: Private Sub Command1_Click() Dim Sum As Integer, k As Long k = Val(InputBox("
admin
2019-06-20
41
问题
编写程序,要求输入一个正整数,计算各位数字之和,并将计算结果显示在窗体上。程序如下:
Private Sub Command1_Click()
Dim Sum As Integer, k As Long
k = Val(InputBox("输入正整数:"))
Do While k > 0
Sum = Sum + ( __________ )
k = k \ 10
Loop
Print Sum
End Sub
程序不完整,应该在_______ 处填写的内容是
选项
A、k Mod 10
B、k
C、left(CStr(k), 1
D、mid (CStr(k), 1,1)
答案
A
解析
k = Val(InputBox("输入正整数:"))的意思是将输入对话框中输入的数据转换成数字赋给变量k。 在内层循环中,循环体的意思是将k除10的余数(k mod 10)加入到sum变量中,然后k重新赋值, k除以10的整数赋值给k。执行循环体,直到k=0为止。最后得到的sum就是输入整数的各位数字之和,故选择A项。
转载请注明原文地址:https://kaotiyun.com/show/muUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了用键盘打开菜单和执行菜单命令,第一步应按的键是
下面变量定义中错误的是
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen<>0Printn\10Mod10;:PrintnMod1
当文本框中的内容发生改变时所触发的事件是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
以下关于事件、事件驱动的叙述中,错误的是
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sit3.frm,包含了所有控件和部分程序,如图2.90所示。要求如下:①利用属性窗口向列表框添加四个项目:VisualBasic、TurboC、C++、Java。②
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
若要清除列表框控件中的所有列表项,应该使用的方法是
8.6787E+8写成普通的十进制数是()。
随机试题
下列属于凶礼的有()
体层摄影中,被照体的欲选成像平面称
甲在信用社未贷到款而疑心本单位的乙搞鬼,遂即把乙殴打致伤。W省A市B县公安局对甲处以拘留10日的处罚,并决定由甲赔偿乙的实际损失。甲不服,向上一级主管机关申请复议,上一级主管机关认为此案认定事实清楚,证据确凿,适用依据正确,程序合法,内容适当的,决定维持。
下列各项中属于企业广义投资活动的有()。
以下关于个人所得税有关规定的表述中,说法正确的有()。
下列选项中,不属于四大发明的是()。
这半年来.某社区银燕幼儿园中二班的周老师经常发现班上的小朋友施巧巧身上有淤青,三天前.周老师在幼儿园门口还亲眼看见施巧巧的母亲张女士在动手打施巧巧。于是,周老师来到社区服务中心.要求社区的社会工作者介人。社区工作者接受此案后,通过和周老师会谈、了解了事情的
在OSI七层协议模型中,TCP是(183)的协议。使用(184)次握手协议建立连接,当主动方发出SYN连接请求后,等待对方回答(185)。这种建立连接的方法可以防止(186)。TCP使用(187)进行流量控制。
某工作站无法访问域名为www.test.com的服务器,此时使用ping命令按照该服务器的IP地址进行测试,响应正常。但是按照服务器域名进行测试,出现超时错误。此时可能出现的问题是(17)。
It’smyhonortobeheretonight.OurorganizationiscalledtheNoiseAbatementSocietythat【B1】______andtriestodealwi
最新回复
(
0
)