首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3.167所示。在给出的窗体文件
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3.167所示。在给出的窗体文件
admin
2017-09-22
29
问题
(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://jikaoti.com/ti/tWy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序用随机函数模拟掷骰子,统计掷50次骰子出现各点的次数。阅读该程序,并在【】和【】处填上正确的内容。PrivateSubCommand1_Click()Dimd(6)fori=1To50n=【】d(n)=【
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsIntegerClsPri
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_______。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInteger
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
随机文件使用Put语句写数据,使用【】语句读数据。
为命令按钮的Picture属性装入了一个图片,但却发现图片没有显示出来,要使图片显示出来,应设置它的【】属性。
有如下事件过程: SubABD(x%,y%,z%) z%=X%+y% EndSub PrivateSubCommand1_Click() a%=30:b%=40 CallABD(a%,b%,c%) Pr
如果准备读文件,打开顺序文件“text.dat”的正确语句是
随机试题
患者偏头痛,其病暴发,痛势甚剧,连及眼齿,痛止如常人。其治法是
小桐是由菲特公司派遣到苏拉公司工作的人员,在一次完成苏拉公司分配的工作任务时,失误造成路人周某受伤,因赔偿问题周某起诉至法院。关于本案被告的确定,下列哪一选项是正确的?(2016年卷三37题,单选)
下列溶液混合,属于缓冲溶液的是()。
参加注册咨询工程师(投资)考试人员,具备()条件之一的,可免试《工程咨询概论》、《宏观经济政策与发展规划》、《工程项目组织与管理》科目。
是风险分析的基础。
( )不是监理的直接成本。
在我国,法人应当具备的条件包括()。
2015年12月1日,甲劳务派遣公司将王某、郝某二人派遣到乙公司,从事保洁工作。月工资为3000元,每月的15日结算工资。加上王某和郝某,在乙公司现有用工人数中,劳务派遣人员共计5名,其他订立劳动合同的劳动者共计95名。要求:根据上述资
墨子说:“志不强者智不达。”诸葛亮说:“志当存高远。”苏轼说:“古之立大事者,不惟有超世之才,亦必有坚忍不拔之志。”王守仁说:“志不立,天下无可成之事。”可见,立志对一个人的一生具有多么重要的意义。这里的“志”具有双重含义:一是对未来目标的向往;二是实现奋
VBA表达式19.5Mod2*2的运算结果是
最新回复
(
0
)