首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
28
问题
编写如下程序:
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/oIHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生0个0~1000的随机整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Form1的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-168所示)。程序运行后,如果单击“读入数据”按
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2)(如图1-262所示)。程序运行
为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为( )。
以下表达式与Int(3.5)的值相同的是
在软件开发中,需求分析阶段产生的主要文档是()。
考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“各行平均数的最大值为”的标签LabeE,再画一个初始内容为空的文本框Text2,如图3.106所示。程序功
为了建立随机文件,要求文件的每条记录应包含多个不同数据类型的数据项,则记录应使用的数据类型是
下列有关通用对话框控件的说法中,正确的是
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
随机试题
关于平装,说法正确的有()。
心理语言学
下列各项中,属于“吸收投入资本”与“发行普通股”两种筹资方式共同特点的有()
下列有关哲学和具体科学的关系的命题中,正确的是
下列对起重力矩限制器主要作用的叙述哪个是正确的?()
在任何情况下,海运单的“收货人”栏内只能填写实际收货人,不能做成“凭指示”。()
心理辅导的一般目标可归纳为两个方面:一是学会调适,二是开发潜能。()
ThereisgrowinginterestinEastJapanRailwayCo.ltd.,oneofthesixcompanies,createdoutoftheprivatizednationalrailw
阅读下列说明,回答问题1至问题3。【说明】以下代码由C语言书写,能根据指定的年、月计算当月所含天数。intGetMaxDay(intyear,intmonth){intmaxday=0;if(month
Everyonewantstobehealthyandhappy.【C1】______,illnessoraccidentsmayoccurwithoutany【C2】______.Frequentlythepers
最新回复
(
0
)