首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj3.vbp,相应的窗体文件名为vbsj3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为窄白;有一个列表框,名称为lstWord。程序运行后,
在考生文件夹下有一个工程文件vbsj3.vbp,相应的窗体文件名为vbsj3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为窄白;有一个列表框,名称为lstWord。程序运行后,
admin
2019-06-11
32
问题
在考生文件夹下有一个工程文件vbsj3.vbp,相应的窗体文件名为vbsj3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为窄白;有一个列表框,名称为lstWord。程序运行后,在文本框中输入一个英文句子(由多个单词组成,各单词之间用一个空格分开),然后单击命令按钮,程序将把该英文句子分解为单词,并把每个单词作为一个项目添加到列表框中,如图3-28所示。该程序不完整,请把它补充完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
程序源码:
Private Sub cmdAdd Click()
Dim S1 As String, S2 As String
Dim I1 As Inteqer
′ S1=?
I1=1
Do
′ Do While Mid(S1, I1, 1) <> ?
And I1 <=Len(S1)
S2=S2 & Mid(S1, I1, 1)
I1=I1+1
Loop
′ lstWord.AddItem?
′ S2=?
I1=I1+1
Loop While I1<=Len(S1)
End Sub
选项
答案
审题分析 程序设计思路:从文本框的第1个字符开始依次检查其后面的每一个字符,若发现空格则将其之前或两个空格之间的字符串作为一个单词添加到列表框中。在Do循环(指内循环,循环条件为:取出的字符为非空格字符且取字符的起始位置没有超出文本框的总字符数,表达式为:Mid(S1,I1,1)<>" "And Il<=Len(S1),其中S1=txtSentense.Text,将Mid函数从文本框中取出的非空格字符,逐个连接成一个单词,语句为:S2=S2&Mid(Sl,I1,1),每执行一次循环体取字符的起始位置加l,即I1=I1+1。当遇到空格时结束循环,将得到的单词(即变量S2的值)用AddItem方法添加到列表框中,并且清空变量S2,将取字符的起始位置加1。 之后继续执行内循环以得到下一个单词,直到取字符的起始位置(即变量I1的值)超过文本框的总字符数为止,外循环的条件为:I1<=Len(S1)。 操作步骤 步骤1:打开考生文件夹下的工程文件vbsj3.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: S1=txtSentense.Text Do While Mid(S1,I1,1)<>" "And I1 <=Len(S1) lstWord.AddItem S2 S2=" " 步骤3:按要求将文件保存至考生文件夹中 特别提示 以空格作为分隔单词的依据是本题的关键,同时注意空格字符串和空字符串是完全不同的。 考点链接 Do循环和While循环、常用内部函数、选择控件。
解析
转载请注明原文地址:https://kaotiyun.com/show/ERUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimSAsInteger,NAsIntegerS=1DoS=(
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Lea(xStr)
数据库设计中反映用户对数据要求的模式是()。
编写如下程序代码:PrivateSubCommand1_Click()DimtAsIntegerDimnAsInteger,xAsIntegert=0F0rn=1To12
设窗体上有1个名称为Command1的命令按钮,并编写了下面的事件过程:PrivateSubConmmadl_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSing
设有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*yEndFunction在窗体上画一个命令按钮,其
考生文件夹下有工程文件sjt5.vbp,窗体界面如图所示。考生文件夹下的in5.dat文件中有某次歌曲大奖赛10位选手的得分,文件中的每一行数据包含选于的编号及5位评委的打分。程序运行时,单击“显示数据”按钮,则将in5.dat文件的内容读入二维数组a中,
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
在E—R图中,用来表示实体联系的图形是
随机试题
斯金纳认为对人类行为的调节和控制,只能依靠外部的()。
患者呼吸急促,喉中哮鸣有声,面色晦滞带青,天冷或受寒易发,形寒怕冷,舌苔白滑,脉弦紧或浮紧。治宜选用
A.枕左横B.枕左前C.枕右后D.枕右前E.枕横位
公路工程中使用的水泥对其化学性质和物理性质有较高的要求,其中三氧化硫含量不得超过()。
商业银行可根据自身业务特色和需要,对以下哪些可能对各类资产负债,以及表外项目价值造成影响的风险因素的变化进行压力测试()
劳动力市场的客体是()。
关于薪酬的级差和薪酬结构,下列表述错误的是()。
kisstherod
关于FastEthernet的描述中,错误的是()。
照数据库的数据类型分类,VFP属于()。
最新回复
(
0
)