首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上给出了一个文本框Text1 和两个命令按钮,命令按钮的标题分别是“读文件”、“计算”,名称分别是Command1、Command2。请画三个单选按钮,名称分别为Option1、Option2、Opti
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上给出了一个文本框Text1 和两个命令按钮,命令按钮的标题分别是“读文件”、“计算”,名称分别是Command1、Command2。请画三个单选按钮,名称分别为Option1、Option2、Opti
admin
2019-01-16
52
问题
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上给出了一个文本框Text1 和两个命令按钮,命令按钮的标题分别是“读文件”、“计算”,名称分别是Command1、Command2。请画三个单选按钮,名称分别为Option1、Option2、Option3,标题分别为“大小写字母数之差”(即大写字母数减小写字母数)、“大小写字母数之和”、“大小写字母数乘积”;窗体如图1-305所示。
程序运行时,请按以下顺序操作:
1)单击“读文件”按钮,可把考生目录下的文件in3.dat 中的所有内容读到变量s中(此事件过程已经给出);
2)选中一个单选按钮。
3)单击“计算”按钮,则可按选中的单选按钮的标题要求对s中的字符进行计算,结果放到文本框中(要求考生编写程序)。
4)单击窗体右上角的关闭按钮结束程序。“读文件”按钮的Click事件过程已经给出,请为“计算”按钮编写适当的事件过程实现上述功能。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须进行一次计算,并且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp,其窗体左部的图片框的名称为Picture1,框中还有六个有香蕉图案的小图片框,它们是一个数组,名称为pic,在窗体右部有一个有香蕉图案的图片框,名称为Picture2,如图1-306(a)所示。
程序运行时,有六个香蕉图案的小图片框不显示。可以用鼠标拖拽的方法把右边的香蕉放到左部的图片框中(右部的香蕉不动),如图1-306(b)所示。左边的图片框最多可放六个香蕉。
实现此功能的方法是:刚运行程序时,图片框数组不显示,当拖拽一次香蕉时,就显示一个图片框数组元素,产生香蕉被放入的效果。
文件中已经给出了所有控件和程序,但程序 不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改工程中已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。
选项
答案
1小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,按表2-164在窗体中画出控件并设置其相关属性。 [*] 步骤2:双击窗体中的“计算”命令按钮,在打开的代码编辑窗口中编写其单击事件过程。 参考代码: Private Sub Command2_Click() Dim i As Integer, j1 As Integer Dim j2 As Integer, j As Integer j1 = 0: j2 = 0 For i = 1 To Len(s) If Asc(Mid(s, i, 1)) >= Asc("A") And Asc(Mid(s, i, 1)) <= Asc("Z") Then j1 = j1 + 1 End If If Asc(Mid(s, i, 1)) >= Asc("a") And Asc(Mid(s, i, 1)) <= Asc("z") Then j2 = j2 + 1 End If Next If Option1.Value = True Then j = j1 - j2 End If If Option2.Value = True Then j = j1 + j2 End If If Option3.Value = True Then j = j1 * j2 End If Text1.Text = j End Sub 步骤3:按<F5>键运行程序,单击“读数据”按钮,然后选择不同的单选按钮并单击“计算”按钮,统计出结果。 步骤4:单击窗体右上角的关闭按钮以结束程序。 步骤5:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For k = 0 To 5 If Pic(k).Visible = False Then Pic(k).Visible = True 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/4uFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
程序流程图中带有箭头的线段表示的是( )。
编写如下程序:PrivateSubCommand1_Click()DimxAsIntegerx=10Printfun1(x,12)+xEndSubPrivat
窗体上有一个名称为Frame1的框架(如图),若要把框架上显示的"Frame1"改为汉字"框架",下面正确的语句是( )。
算法的空间复杂度是指( )。
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10The
下列关于标签的描述中,错误的是
现有如下程序:PrivateSubCommand1_Click() s=0 Fori=1To5 s=s+f(5+i) Next PrintsEndSubPublicFunctionf(xAsInteger
为了把命令按钮设置为图形格式,其Style属性值应为
下列选项中属于面向对象设计方法主要特征的是( )。
随机试题
电话系统的通信线路是用来传输语音的,因此它不能用来传输数据。()
粪便中发现巨噬细胞有助于诊断
65岁以上人口数与0~14岁人口数二百分比,称为
A.血容量严重不足B.血容量不足C.心功能不全或血容量相对过多D.容量血管过度收缩E.心功能不全或血容量不足
A.保和丸B.枳实导滞丸C.木香槟榔丸D.健脾丸E.枳实消痞丸治疗脾虚气滞,寒热互结之心下痞满证的常用方是
某投资项目的单因素敏感性分析中,基本方案对应的销售量为0.8万台/年,财务内部收益率为25%。当产品的销售量减少10%时,该项目的财务内部收益率降低到22%,则此时的敏感度系数为()。
对于职业安全健康管理体系第二方审核和第三方审核的描述,正确的是()。
以募集设立方式设立股份有限公司时需要召开创立大会,下列关于创立大会的表述中,符合《公司法》规定的是()。
甲公司是一家拥有自主知识产权的信息安全企业。经过十多年的发展,通过不断地技术创新,在终端安全管理产品、数据安全管理产品、安全管理平台产品及安全服务整体解决方案等方面形成多项核心技术,公司已成为国内最具技术创新和产品开发实力的信息安全主要厂商之一。下列属于甲
某高校外语教研室新招进五位外语老师,每位老师只教授一门外语。并且满足以下条件:(1)如果小钱教德语,那么小孙不教俄语;(2)或者小李教德语,或者小钱教德语;(3)如果小孙不教俄语,那么小赵不教法语;(4)或者小赵教法语,或者小周不教英语。以下哪项
最新回复
(
0
)