首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1-Click() Dim X As Integer,Y As Integer x=1 y=1 Do y=x*y If y>10 Th
编写如下程序: Private Sub Command1-Click() Dim X As Integer,Y As Integer x=1 y=1 Do y=x*y If y>10 Th
admin
2019-06-20
33
问题
编写如下程序:
Private Sub Command1-Click()
Dim X As Integer,Y As Integer
x=1
y=1
Do
y=x*y
If y>10 Then
Exit Do
Else
x=x+3
End If
Loop Until x<=10
Print x;y
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、1 1
B、4 1
C、4 2
D、7 28
答案
B
解析
Do…Loop Until循环,当条件为真时循环执行循环体。代人初值进行计算可得结果。选B。
转载请注明原文地址:https://kaotiyun.com/show/tcUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上有两个列表框,名称分别为List1、List2,在List2中已经预设了内容;还有两个命令按钮,名称分别为C1、C2,标题分别为“添加”、“清除”,如图2—233所示。释序的功能是在运行时,如果选中
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图2.208(
请根据以下各小题的要求设计VisualBasic应川程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Frame1、标题为“目的地”的框架,在框架中添加三个复选框,名称分别为Cheek1、Cheek2、Check3,其标题分别
在名称为Forml的窗体上画一个文本框,名称为Text1,允许多行显示:再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“转换”、“存盘”(如图2.244所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件央中读入i
在考生文件夹下的“samp1.acedb”数据库文件中已建立了表对象“tEmployee”。请按以下操作要求,完成表的设计。(1)判断并设置“tEmployee”表的主键。(2)设置“性别”字段的默认值为“男”。(3)删除表中
设有如下过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_KeyUp(KeyCode
下列叙述中有错误的是()。
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3—169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是()。
随机试题
求由方程∫0yetdt+∫0xcostdt=0所确定的隐函数y=y(x)的导数.
由桑叶、杏叶、人参、石膏、甘草、胡麻仁、阿胶、麦门冬、枇杷叶组成的方剂是
卡马西平苯妥英钠
呃声洪亮,冲逆而出,烦躁口臭,渴喜冷饮,小便短赤,大便秘结,舌苔黄厚,脉象滑数。方选呃声洪亮,冲逆而出,烦躁口臭,渴喜冷饮,大便正常,小便短赤,舌苔黄,脉滑数。方选
在风管穿过需要封闭的防火、防爆的墙体或楼板时,应设预埋管或防护套管,其钢板厚度不应小于()mm。
依据《中华人民共和国防沙治沙法》,关于沙化土地封禁保护区的规定,下列说法正确的有()。
Q公司为从事粮油转运、储存、贸易的工贸企业,拥有专用的粮油码头,现有从业人员980人,其中有来自G公司的劳务派遣人员230人。Q公司有专职安全生产管理人员8人。Q公司现有:60x104t立筒仓1组,10×104t平房仓1组,10×104t食用植物油罐1组
你一家要去美国旅游,去银行看到的牌价如下你旅游回来之后,想要把剩余的1000美元换成人民币,你会选哪个银行?能换到多少人民币?
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程:PrivateSubCommand1_Click()n=Text1.TextSelectCase
July11RandyMcGuire41South174thAvenueGoodyear,Arizona85338DearMr.McGulre,AsafellowmemberoftheHumaneSociety,
最新回复
(
0
)