首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有文本框Text1。运行程序,输入大于0的整数m,单击按钮Command1,程序显示由星号组成的高度为m的等腰三角形。例如,当m=5时,显示图形如下。 * * * * * * * * * * * * *
窗体中有文本框Text1。运行程序,输入大于0的整数m,单击按钮Command1,程序显示由星号组成的高度为m的等腰三角形。例如,当m=5时,显示图形如下。 * * * * * * * * * * * * *
admin
2021-06-03
41
问题
窗体中有文本框Text1。运行程序,输入大于0的整数m,单击按钮Command1,程序显示由星号组成的高度为m的等腰三角形。例如,当m=5时,显示图形如下。
*
* * *
* * * * *
* * * * * * *
* * * * * * * * *
事件代码如下。
Private Sub Command1_Click()
m = Val(Me!Text1)
result = ""
For k = 1 To m
For n = 1 To k + m - 1
If 【 】 Then
result = result & " "
Else
result = result & " *"
End If
Next n
result = result + Chr(13)
Next k
MsgBox result, , "运行结果"
End Sub
程序【 】处应填写的语句是
选项
A、n < m - k + 1
B、n <= m - k + 1
C、n > m - k + 1
D、n >= m - k + 1
答案
A
解析
题目第一个for循环用于控制输入的行数,第二个for循环控制每行前面的空格数。我们可以看到,当K初始值为1,第一行需要输出4个空格和一颗星简单方法是,一个一个代进去测试。如在k=1情况下满足<5或者<=4的选项,题目中只有A满足。因此,本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/r4Sp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
若使用如下代码创建数据表Student;DimstrSQLAsStringstrSQL="createtableStudent("strSQL=strSQL+"SnoCHAR(10)PRIMARYKEY,"
在实体关系模型中,有关系R(学号,姓名)和关系S(学号,课程名,课程成绩),要得到关系Q(学号,姓名,课程名,课程成绩),应该使用的关系运算是()。
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好三个关联表对象“tStud”“tCourse”“tScore”和一个空表“tTemp”。试按以下要求完成设计。(1)创建一个查询,统计人数在7人以上(含7)的院系人数,字段显
在“学生”表中有姓名、性别、出生日期等字段,查询:并显示男性中年龄最大的学生。并显示姓名、性别和年龄,正确的SQL命令是()。
Access中描述若干个操作组合的对象是()。
要在报表中设置筛选条件以限制来自表中的记录,应使用的宏命令是()。
运行下列过程,当输入一组数据:10,20,50,80,40,30,90,100,60,70,输出的结果应该是SubPl()Dimi,j,arr(11)AsIntegerk=1Whilek<=10a
在已建雇员表中有“工作日期”字段,下图所示的是以此表为数据源创建的“雇员基本信息”窗体。假设当前雇员的工作日期为“1998-08-17”,若在窗体“工作日期”标签右侧文本框控件的“控件来源”属性中输入表达式:=Str(Month([工作日期]))+“月
在教师表中“职称”字段可能的取值为:教授、副教授、讲师和助教。要查找职称为教授或副教授的教师,错误的语句是
下列Access内置函数中,不属于SQL聚合函数的是
随机试题
治疗牛急性瘤胃臌气的穴位为
患者,男,52岁。近2个月来大便次数增多,有肛门坠胀感及里急后重,大便变细。常有黏液血便,经抗生素治疗症状可缓解,但不久又复发,且呈进行性加重。术后可不追加化疗的条件是
血糖浓度低时,脑仍能摄取葡萄糖而肝不能,是因为()。
合伙人有下列情形之一的,当然退伙。( )
监理单位需要调换监理机构的总监理工程师人选时,()。
在对进度计划进行工期和时间安排的合理性审查时,应重点审查()。
第一台电子数字计算机ENIAC诞生于()年。
赔偿请求人或者赔偿义务机关,对赔偿委员会作出的赔偿决定,认为确有错误的,()向上一级人民法院赔偿委员会提出申诉。
下列数据流图(DFD)构造规则中正确的是
Whatisthewomangoingtodo?
最新回复
(
0
)