首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj3.vbp,相应的窗体文件名为vbsj3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为窄白;有一个列表框,名称为lstWord。程序运行后,
在考生文件夹下有一个工程文件vbsj3.vbp,相应的窗体文件名为vbsj3.frm。在窗体上有一个命令按钮,其名称为cmdAdd,标题为“添加”;有一个文本框,名称为txtSentense,初始内容为窄白;有一个列表框,名称为lstWord。程序运行后,
admin
2019-06-11
79
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
(1)考生文件夹中有工程文件sjt3.vbp。窗体上显示有一个列表框和一个文本框,且列表框中已有若干列表项。程序的功能是,程序运行时,当用户在列表框中单击并选中某个列表项时,该项的内容将显示到文本框中,用户可以在文本框中对相关内容进行编辑,按回车键后,能够
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Len(xStr)
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPriv
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是()。
下列排序方法中,最坏情况下比较次数最少的是()。
在窗体上画一个名称为Text1的文本框,编写如下事件过程代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(KeyAscii)
设有如下数组声明:Dima()AsSingle下面关于这一声明的叙述中正确的是()。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为()。
下面对对象概念描述正确的是
在E—R图中,用来表示实体联系的图形是
随机试题
我国社会主义初级阶段的个体经济是()。
麻疹患儿于疹退后1周,体温又上升到38℃,呕吐2次,抽搐1次,嗜睡。脑脊液检查:白细胞数20×109/L,淋巴细胞80%,蛋白质800mg/L,糖2.5mmol/L。应诊断为
醋酸氢化可的松的结构类型属于
通信行业向社会主要提供()。
根据民事诉讼法及相关规定,对于人民法院认为审理案件需要的证据,人民法院应当调查收集。下列哪些情形属于“人民法院认为审理案件需要的证据”?
教育学意义上的教学是()
某省2016年上半年省内居民网络消费达1696.07亿元,同比增长45.13%。该省11个地市中,2016年上半年省内居民网络消费额两两之差小于10亿元的组合共有:
[*]
下列选项中不符合良好程序设计风格的是
在Java语言中,如实型常量后没有任何字母,计算机默认为【】类型。
最新回复
(
0
)