首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。请在窗体上画一个组合框,名称为Cb1,并输入三个列表项:“3”、“7”、“11”(列表项的顺序不限,但必须是这三个数字);画一个名为Text1的文本框;再画一个标题为“计算”、名称为C1的命令按钮,如图3-15
在考生文件夹下有一个工程文件sjt4.vbp。请在窗体上画一个组合框,名称为Cb1,并输入三个列表项:“3”、“7”、“11”(列表项的顺序不限,但必须是这三个数字);画一个名为Text1的文本框;再画一个标题为“计算”、名称为C1的命令按钮,如图3-15
admin
2016-01-31
25
问题
在考生文件夹下有一个工程文件sjt4.vbp。请在窗体上画一个组合框,名称为Cb1,并输入三个列表项:“3”、“7”、“11”(列表项的顺序不限,但必须是这三个数字);画一个名为Text1的文本框;再画一个标题为“计算”、名称为C1的命令按钮,如图3-151所示。请编写适当的事件过程,使得程序运行时,在组合框中选定一个数字后,单击“计算”按钮,则计算5000以内能够被该数整除的所有数之和,并放入Text1中。最后,按原文件名存盘。
提示:由于计算结果较大,应使用长整型变量。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行一次计算。必须用窗体右上角的关闭按钮结束程序,否则无成绩。
选项
答案
审题分析 设计本题代码的思路:单击“计算”按钮时,用For循环语句循环变量(如k值为1~5000间的所有整数)的取值逐一除以组合框中当前选择的数值(Cb1.Text),并将能被该数值整除的整数累加入一个变量(如s)。判断整数A能被整数B整除的条件表达式为:A Mod B=0。最后将循环结束时变量s的值显示在文本框中。 操作步骤 步骤1:打开考生文件夹下的工程文件sjt4.vbp。 步骤2:在窗体Form1中按要求画出控件并设置属性。 步骤3:双击窗体Form1中的“计算”按钮,打开代码编辑窗口,输入如下代码: 参考代码: Private Sub C1_Click() Dim n AsInteger,k AsInteger,s As Long n=Val(Cb1.Text) s=0 For k=n To 5000 If k Mod n=0 Then s=s+k End If Next k Text1.Text=s End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按
键运行程序,从列表框中选择一项,单击“计算”按钮,单击程序右上角的关闭按钮结束程序。 考点链接 For循环结构。
解析
转载请注明原文地址:https://jikaoti.com/ti/NwJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出()beep声。SubTimer1_Timer()Fori=1to10BeepNextiEn
执行下面的程序段后,x的值为()。x=50Fori=1To20Step2x=X+i\5Nexti
执行语句Open"TC.dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
下列操作不能向工程中添加宙体的是()。
阅读下列程序:PrivateSubCommand1_Click()DimiAsInteger,kAsIntegerk=2Fori=1To3PrintH(k);NextiEndSubFunctionH(jAsI
语句DimArr(-3To5)AsInteger定义的数组的元素个数是()。
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。
下列程序段的执行结果为a=6Fork=1T00a=a+kNextPrintk;a
随机试题
下列属于韦氏智力量表中言语分量表的项目的是()
以下涎腺疾病中,在青春期后有自愈趋势的是
为术后的病人进行口腔护理,是为了满足病人的()
根据《公司法》的规定,有限责任公司董事会的职责包括()。
测量标准须经对()方面考核合格后,才有资格进行量值传递。[2007年真题]
【2012年上】中国古代科学家宋应星所写的是()。
鉴于历史上在贯彻群众路线问题上出现过的偏差,党的十一届三中全会以后,逐步在政策上把公安工作的群众路线确定下来。()
小王和小张分别于早上8:00和8:30从甲地出发,匀速骑摩托车前往乙地。10:00小王到达两地的中点丙地,此时小张距丙地尚有5千米。11:00时小张追上小王。则甲、乙两地相距多少千米?
在考生文件夹下打开EXCEL.XLSX文件:选取A2:G5单元格区域内容,建立“带数据标记的折线图”,图表标题为“降雨量统计图”,图例靠右;将图插入到表的A9:G24单元格区域内,保存EXCEL.XLSX文件。
AccordingtoLandes,somecountriesaresopoormainlybecauseIndiscussingLandes’swork,theauthor’stoneis
最新回复
(
0
)