首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt5.vbp,窗体界面如图3—23所示。程序功能如下:单击“读文件”按钮,可将考生文件夹下in5.dat文件的内容(文件中仅含有用空格隔开的英文单词)显示在Text1文本框中。单击“转换”按钮,可以把文本框中所有单词的第一个字
考生文件夹下有一个工程文件sjt5.vbp,窗体界面如图3—23所示。程序功能如下:单击“读文件”按钮,可将考生文件夹下in5.dat文件的内容(文件中仅含有用空格隔开的英文单词)显示在Text1文本框中。单击“转换”按钮,可以把文本框中所有单词的第一个字
admin
2018-09-19
67
问题
考生文件夹下有一个工程文件sjt5.vbp,窗体界面如图3—23所示。程序功能如下:单击“读文件”按钮,可将考生文件夹下in5.dat文件的内容(文件中仅含有用空格隔开的英文单词)显示在Text1文本框中。单击“转换”按钮,可以把文本框中所有单词的第一个字母转换为大写。单击“写文件”按钮则把文本框中的文本存到考生文件夹下的out5.dat文件中。将事件过程中的注释符去掉,把“?”改为正确的内容,以实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序。程序运行结束前,必须单击“写文件”按钮保存转换后的文本内容,最后将程序按原文件名存盘,否则无成绩。
选项
答案
步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: ch$=Input(n,#1) =Len(ch1)、或n=Len(Text1.Text) c=Mid(ch1,k,1) ch2$=ch2$&c 步骤2:按<F5>键运行程序,单击各个按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
分析题目可知,在Command1的Click事件处理过程中,从in5.dat罩面读取数据并显示在Text1文本框上。凶此第一个“?”从文件读耿数据,Input函数的第二个参数是文件号,即“#”;在Command2的Click事件处理过程中,完成字符转换,首先把义奉框的内容保存剑变量ch1中,再通过循环修改每个单词的首字母,循环从1到n,因此n保存的字符串的长度;第三个“?”处是从ch1里面取出一个字符,接下来判断该字符是否是空格;根据“Text1.Text=cb2”可知变量ch2保存了转换后的字符串,因此在循环里面ch2需要把转换后的字符c加进来。
转载请注明原文地址:https://kaotiyun.com/show/I9Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
以下叙述中正确的是
表达式5*Sqr(25)+Sgn(4^4)的值是
执行语句DimX,YAsInteger后( )。
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
(1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序,如图所示。要求:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐。②请编写适当的程序完成以下功能:在Text1中输入40(度数),
顺序文件在一次打开期间( )。
下面不属于软件设计阶段任务的是
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是( )。
随机试题
曾不知夏之为丘兮,孰两东门之可芜。
按给药途径分类,在下列片剂剂型中,适用于肝脏首过作用较强的药物的剂型是
A.怕热、多汗B.多饮、多食、多尿C.震颤D.体重增加E.甲状腺肿大交感神经兴奋表现
患者,女,26岁。近1个月来,以夜间咳嗽为主,痰中带血丝,伴低热,盗汗。应首先考虑的是()
()不适用于开挖深度较大、渗透系数较小,且土质又不好的地层。
年末将有余额的账户结转下年时,应在下年新账的摘要栏内写()字样。
内地企业在香港创业板发行与上市,股东人数方面要求是( )。
作为职业道德规范,“诚信”具有的特征是()
小张承诺:如果天不下雨,我一定去听音乐会。以下哪项为真。说明小张没有兑现承诺?I.天没下雨,小张没去听音乐会。Ⅱ.天下雨,小张去听了音乐会。Ⅲ.天下雨,小张没去听音乐会。
Workerscomeandgoastheyplease.Theymakevitaldecisionspreviousmadebythebosses.Secretarieshavebeenabolished.The
最新回复
(
0
)