首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer Dim s_base As String, s As String Dim i As Integer,
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer Dim s_base As String, s As String Dim i As Integer,
admin
2015-06-30
43
问题
编写如下程序:
Private Sub Command1_Click()
Dim m As Integer, n As Integer
Dim s_base As String, s As String
Dim i As Integer, j As Integer
Dim r(20) As Integer
s_base = "0123456789ABCDEF"
m = InputBox("输入数据1")
n = InputBox("输入数据2")
i = 0
Do While m <> 0
r(i) = m Mod n
m = m \ n
i = i + 1
Loop
s = ""
For j = i - 1 To 0 Step -1
s = s + Mid(s_base, r(j) + 1, 1)
Next j
Print s
End Sub
程序运行后,单击命令按钮Command1,并依次在输入对话框中输入58和16,输出结果为
选项
A、A3
B、3A
C、29
D、92
答案
B
解析
m=58,n=16时,r(0)=58 对16取余 得10, m 整除 n得3,m=3;再次循环,r(1)=m 对n取余 得3对16取余得 3,m整除n后得0,退出循环,此时数组r:r(0)=10,r(1)=3。继续下一个For循环,j从1到0,步长为-1,当j为1时,Mid(s_base, r(j) + 1, 1)即为Mid(s_base, 4, 1),即从字符串s_base的第4个字符开始,向后截取一个字符,为"3",s为"3"。同理当j为0时, 从字符串s_base的第11个字符开始,向后截取一个字符,为"A",此时,s="3"+"A"="3A",故输出结果为3A,选择B。
转载请注明原文地址:https://kaotiyun.com/show/BVQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在使用打印直接输出信息时,下列哪个属性或方法实现了使文件结束打印()。
下列描述中正确的是()。
当一个工程含有多个窗体时,其中的启动窗体是______。
为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的Multiselect属性设置为______。
结构化分析方法SA、结构化设计方法SD,和JACKSON方法,是在软件开发过程中常用的方法,人们使用SA方法时可以得到______。
对象实现了数据和操作的结合,使数据和操作______于对象的统一体中。
以下语句错误的是:______。
下列说法错误的是
下面关于完全二叉树的叙述中,错误的是______。
表达式2*3^2+2*8/4+3^2的值为______。
随机试题
______herealizeditwastoolatetoreturnhome.
A.螺旋器B.骨半规管C.前庭D.壶腹嵴E.耳蜗属于听觉感受器的是
药物与血浆蛋白结合
甲因走私武器被判处15年有期徒刑,剥夺政治权利5年;因组织他人偷越国境被判处14年有期徒刑,并处没收财产5万元,剥夺政治权利3年;因骗取出口退税被判处10年有期徒刑,并处罚金20万元。关于数罪并罚,下列哪一选项符合《刑法》规定?(2012年卷二12题)
()属于质量保证资料范畴。
某公司承包了一条单跨城市隧道,隧道长度800m,跨度15m,地质条件复杂。设计采用浅埋暗挖法进行施工,其中支护结构由建设单位直接分包给一家专业施工单位。施工准备阶段,某公司项目部建立了现场管理体系,设置了组织机构,确立了项目经理的岗位职责和工作程序;在暗
银行间债券市场的交易制度不包括()。
“业精于勤荒于嬉,行成于思毁于随。”下列选项对这句话的理解不正确的是()。
一、注意事项1.申论考试是对考生阅读理解能力、综合分析能力、提出和解决问题能力以及文字表达能力的测试。2.作答参考时限:阅读资料40分钟,作答110分钟。3.仔细阅读给定的资料,按照后面提出的“作答要求”依次作答。二、给定资料
Intheeyesofvisitorsfromtheoutsideworld______.Familiesinfrontiersettlementsusedtoentertainstrangers______.
最新回复
(
0
)