首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3.167所示。在给出的窗体文件
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3.167所示。在给出的窗体文件
admin
2017-09-22
50
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3.167所示。在给出的窗体文件中已经添加了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
(2)考生文件夹下的工程文件sjt4.vbp中有两个名称分别为List1、List2的列表框控件,两个名称分别为Command1、Command2,标题分别为“>>”、“<<”的命令按钮。请在List1中添加“文本框”、“标签”、“列表框”、“单选钮”等表项,如图3.168所示。
程序的功能是:单击“>>”按钮,将List1中的表项添加到List2中,同时将List1清空;单击“<<”按钮,将List2中的表项添加到List1中,同时将List2清空。程序已给出,但是不完整。请将程序中的注释符去掉,把“?”改为正确的内容,实现上述功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: n=Len(Text1.Text) b=Asc(Mid(s,i,1)) Select Case b For i=0 To 2 x(i)=a(i) 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,通过List1列表框的List属性添加四个项目:文本框、标签、命令按钮、单选按钮。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: For i=0 To La.ListCount - 1 Lb.AddItem La.List(i) Next La.Clear 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)本题源程序在For循环体中(其中循环终值应为文本框的字符长度,即n=Len(Text1.Text)),用Mid函数逐一取出文本框中的每个字符,并用Asc函数返回其ASCII码。若取出字符的ASCII码在48~57之间,则记录数字个数的数组变量a(0)增1;若ASCII码在65~90之间,则记录大写字母个数的数组变量a(1)增1;若ASCII码在97~122之间,则记录小写字母个数的数组变量a(2)增1。
(2)本题列表框中列表项的移动功能,是通过调用remove过程来实现的,在remove过程中通过For循环(循环变量终值为La.ListCount-1)将列表框La中的各项逐一添加到列表框Lb中,全部项目添加完成后,用列表框的Clear方法清除该列表框中的所有项目。
转载请注明原文地址:https://kaotiyun.com/show/AjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序用随机函数模拟掷骰子,统计掷50次骰子出现各点的次数。阅读该程序,并在【】和【】处填上正确的内容。PrivateSubCommand1_Click()Dimd(6)fori=1To50n=【】d(n)=【
阅读下列程序: PrivateSubCommand1_Click() DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintH(k); Nexti EndSub Fu
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
CommonDialog控件可以显示______种对话框。
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
如果准备读文件,打开顺序文件“text.dat”的正确语句是
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
随机试题
二尖瓣狭窄最常见的早期症状
“气血生化之源”是指
Feigl反应(碱性条件下加醛和邻二硝基苯),生成紫色与金属离子(如Mg2+)反应,显不同颜色
计量属性包括( )。
(2013年)若企业只生产销售一种产品,在采用本量利方法分析时,假设在其他因素不变的情况下,只降低产品的单位变动成本会引起()。
一般资料:求助者,女性,23岁,个体商贩。案例介绍:求助者家在农村,初中未毕业就开始务农。20岁结婚,近一年多在经商,三天前不明原因突然情绪激动,不停地说话,哭泣不止,被家属送来求助。下面是心理咨询师与求助者的一段咨询对话。心理咨询师:你今天来需要我向你提
去年他在伦敦教英国人中文。
幼儿园教育应以()为基本的活动方式。
态度比品德范围广,但两者实质相同。
设随机变量X与Y相互独立,且X服从标准正态分布N(0,1),Y的概率分布为P{Y=0}=P{Y=1}=.记FZ(z)为随机变量Z=XY的分布函数,则函数FZ(z)的间断点个数为
最新回复
(
0
)