首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮和2个文本框,其名称分别为Command1、Text1和Text2,然后编写如下事件过程: Private Sub Command1_Click() n = 0 a = Val(Text1.Text) Whil
在窗体上画1个命令按钮和2个文本框,其名称分别为Command1、Text1和Text2,然后编写如下事件过程: Private Sub Command1_Click() n = 0 a = Val(Text1.Text) Whil
admin
2020-01-02
58
问题
在窗体上画1个命令按钮和2个文本框,其名称分别为Command1、Text1和Text2,然后编写如下事件过程:
Private Sub Command1_Click()
n = 0
a = Val(Text1.Text)
While a > 0
n = n + a Mod 10
a = a \ 10
Wend
Text2.Text = Str(n)
End Sub
程序运行后,在Text1中输入2468,,单击Command1按钮,则在Text2中显示的是
选项
A、20
B、2468
C、8642
D、10
答案
A
解析
程序主要是将文本框中输入的数值,将其每位数累加起来。Val是将文本框的文本转化为数值。当输入2468时,第一次执行循环,n=0+8,a=246;第二次执行循环体,n=8+6=14,a=24;第三次执行循环体,n=14+4=18,a=2;第四次执行循环体,n=18+2=20,a=0,此时不符合循环条件,退出循环。Str(n)将n=20,整数20转换为字符串,故文本框Text2的文本显示为20。故选A项。
转载请注明原文地址:https://kaotiyun.com/show/s2Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于多重窗体程序的叙述中,错误的是
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer()Static
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是
在窗体上画一个命令按钮,然后编写如下程序:OptionBase1PfivmeSubCommandl_Click()DimArr(10)AsIntegerFori=1To10
假定有如下程序:PrivateSubForm_Click()Dima(4)AsInteger,b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox(”请输入一个整
窗体上有1个名称为Label1的标签;1个名称为List1,且含有若干表项的列表框。为了使得单击List1中某个表项时,在Label1中相应地显示该表项,应使用的程序代码为
以下合法的VisualBasic标识符是
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
下面不属于软件设计阶段任务的是
下列与队列结构有关联的是
随机试题
算法的基本结构中不包括()。
为赈灾集资,假如你是校学生会主席,为援助青海玉树地震中的群众在学校开展募捐集资活动。请写一封集资信,号召老师和同学们为灾区人民尽自己的微薄之力。并告知他们可以按照随信所附的信封上的地址进行捐赠。
民事法律行为最基本的要素是()
以下关于参数估计的说法正确的是
李某于98年1月立自书遗嘱一份;98年3月因中风手足不能动弹,遂请秘书王某、刘某在场见证作录音遗嘱一份,98年5月,李某身体状况好转,遂由护士二人在场见证,秘书朱某代书遗嘱一份;99年6月1日,李某病危,在神志清醒的情况下立口头遗嘱一份,经抢救,6月2日李
布雷顿森林体系解体后,各国普遍放弃固定汇率制度,开始实行浮动汇率制度。()
《中华人民共和国海关法》规定:海关多征的税款,海关发现后应当立即退还;纳税义务人自缴纳税款之日起()内,可以要求海关退还。
某幼儿园大班的涛涛一天上课时玩游戏机,被林老师发现后没收放至办公室。过了很长时间,涛涛找到林老师,要求归还游戏机。林老师说,已经没收了,就不再归还。几天后,办公室发生盗窃事件,游戏机丢失了。涛涛的父母得知后,要求幼儿园赔偿游戏机。但幼儿园的意见则是:涛涛上
在SQL的SELECT查询中,HAVING子句不可以单独使用,总是跟在【】子句之后一起使用。
Idon’tthinkitisanyuse_________thismatteranyfurther.
最新回复
(
0
)