首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画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-06-30
13
问题
在窗体上画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/phHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
使用()方法,可清除列表框中所有的列表项。
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"
假定窗体上有一个标签,名为Label。为了使该标签透明并且没有边框,则正确的属性设置为()。
下列合法的变量名是( )。
如图2所示,在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每ls在文本框中显示一次当前的时间。PrivateSubTimer1_______TextTime.Text=Time
数据库管理系统中负责数据模式定义的语言是
软件设计中模块划分应遵循的准则是
与数学式子对应的VisualBasic表达式是()。
程序测试的目的是
随机试题
釉牙本质界的形态特点是
以下预防调护,哪项与瓜藤缠预防无关:
关于横位的叙述正确的是
既能退虚热,又可清湿热的药物是
张某从甲银行分支机构乙支行借款20万元,李某提供保证担保。李某和甲银行又特别约定,如保证人不履行保证责任,债权人有权直接从保证人在甲银行及其支行处开立的任何账户内扣收。届期,张某、李某均未还款,甲银行直接从李某在甲银行下属的丙支行账户内扣划了18万元存款用
下列各项中,应当确认为预计负债的有()。
Haveyoueverbeenannoyedwithyourselfwhenyou【C1】______somethingimportant?Maybeyouthinkyouhaveabadmemory.Doyoukn
我国《宪法》和《选举法》规定,我国在县级以及县级以下实行()选举。
求极限
A、Lackoffinancialsupporters.B、Lackofvacantspace.C、Lackofofficialapproval.D、Lackoftoolsandlabor.A
最新回复
(
0
)