首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件vbsj5.vbp。其功能是产生并显示一个数列的前n 项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积>=10,则以乘积的十位数为数列的第3项,以乘积的个位数为数
在考生目录下有一个工程文件vbsj5.vbp。其功能是产生并显示一个数列的前n 项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积>=10,则以乘积的十位数为数列的第3项,以乘积的个位数为数
admin
2019-01-16
31
问题
在考生目录下有一个工程文件vbsj5.vbp。其功能是产生并显示一个数列的前n 项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积>=10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的第4项。再用数列的最后2项相乘,用上述规则形成后面的项,直至产生了第n 项。窗体上部从左到右3个文本框的名称分别为:txtFir、txtSec、txtNum,窗体下部的文本框名称为txtList。程序运行时,在txtFir、txtSec中输入数列的前两项,txtNum中输入要产生的项数n,单击“计算”按钮则产生此数列的前n项,并显示在txtList 中。如图1-337所示。
已经给出了全部控件,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:不得修改原有程序和控件的属性。最后把修改后的文件按原文件名存盘。
程序源码:
Private Sub cmdCal_Click()
txtList ="" : a = Val(txtFir)
b = Val(txtSec) : n = Val(txtNum)
’ txtList = txtList & a & " " & ?
k = 2
Do While k <n
c=a * b : k = k +1
If c <10 Then
txtList = txtList & " "
& c
’ a = ?
b = c
Else
d = c \ 10
txtList = txtList & " "
& d
a = d
k = k + 1
’ If k <= Then
d = c Mod 10
txtList = txtList & "
" & d
’ ? = d
End If
End If
Loop
End Sub
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件vbsj5.vbp,在代码编辑窗口,去掉程序中的注释符 “’”,将问号“?”改为正确的内容。 参考代码: txtList = txtList & a & " " & b a = b If k <= n Then b = d 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/quFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下不能输出"Program"的语句是( )。
工程中有Form1、Form2两个窗体(Form1中有文本框Text1;Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateSubT
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用()。
下列说法中,错误的是
阅读程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
以下叙述中错误的是( )。
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
下面哪个属性肯定不是框架控件的属性( )。
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是( )。
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为"零点")。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返
随机试题
《淮南子》以()思想为主,糅合了儒家、法家、阴阳家等学说,一般被列为杂家代表作。
当归补血汤的主治证候中没有
主动脉瓣狭窄不引起
孕妇行椎管内麻醉时
患儿,女,1岁。多汗,睡眠不安。查体:可见枕秃、方颅和肋缘外翻。X线检查长骨钙化带消失,干骺端呈毛刷样、杯口状改变,骨骺软骨带增宽,骨密度减低。此患儿最可能的诊断是
动产物权的设立和转让,自()时发生效力,但法律另有规定的除外。
试述制度化管理与人性。
关系模型有三类完整性约束:实体完整性、参照完整性和用户定义的完整性。定义外键实现的是哪一(些)类完整性?______。
他们的表现非常出色,赢得了观众们热烈的掌声。
Whatisthesourceofthisextremeself-confidencefoundinalmostalloptimists(乐观主义者),thisbeliefthattheycanaccomplishgr
最新回复
(
0
)