首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2020-06-30
29
问题
编写如下程序:
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://jikaoti.com/ti/TkS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)请在名称为Form1的窗体上建立一个二级下拉菜单,第一级共有两个菜单项,标题分别为“文件”、“编辑”,名称分别为file、edit;在“编辑”菜单下有第二级菜单,
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在窗体上画出2个名称分别为Shape1、Shape2的形状控件,在属性窗口设置控件的属性,使得Shape1为圆角矩形,并填充红色(&H000000FF&);Sha
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Form1的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-168所示)。程序运行后,如果单击“读入数据”按
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为L1的标签,标题为“请确认”;再画两个命令按钮,名称分别为C1、C2,标题分别为“是”、“否”,高均为300、宽均为8
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画1个命令按钮,其名称为C1,标题为“等级考试”;再画1个文本框,名称为T1,如图3-184(a)所示。请编写适当的事件过程,使程序运行
软件生命周期是指()。
在软件开发中,需求分析阶段产生的主要文档是()。
以下关于通用对话框的叙述中,错误的是( )。
对长度为10的线性表进行冒泡排序,最坏情况下需要比较的次数为
随机试题
有关窗宽的论述,错误的是
视乳头是视野上生理盲点所对应的部位,主要原因为该处
建设工程项目质量控制系统运行机制的核心是()。
人皆有求生本能,更多绝症患者放弃治疗实有其现实隐衷,比如继续治疗将会给家庭带来不可承受的经济负担,比如癌症晚期患者就医环境不尽如人意。这些现实的无奈,恰是完善医疗制度和社会保障的着力之处。这不仅需要提供有尊严、安全而稳定的就医环境,完善大病救助制度以缓解普
给定资料1.党的十九大报告提出,加强思想道德建设。人民有信仰,国家有力量,民族有希望。要提高人民思想觉悟、道德水准、文明素养,提高全社会文明程度。广泛开展理想信念教育,深化中国特色社会主义和中国梦宣传教育,弘扬民族精神和时代精神,加强爱国主义、集体主义、
商务印书馆
A.条件(1)充分,但条件(2)不充分B.条件(2)充分,但条件(1)不充分C.条件(1)和条件(2)单独都不充分,但条件(1)和条件(2)联合起来充分.D.条件(1)充分,条件(2)也充分.E.条件(1)和条件(2)单独都不充分,条件(1)和条件
宋朝张先《木兰花》中云:“人意共怜花月满,花好月圆人又散”。下列诗句与题诗所含哲理相近的是()
下列关于栈的叙述正确的是( )。
Languagelearningbeginswithlistening.Individualchildrenvarygreatlyinthemountoflisteningtheydoafter【S1】
最新回复
(
0
)