首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.t
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.t
admin
2013-10-06
38
问题
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.txt文件中的所有英文字符放入Textl(可多行显示);单击”统计”按钮,找出并统计英文字母i、j、k、l、m、n(不区分大小写)各自出现的次数;单击”存盘”按钮,将字母i~n出现次数的统计结果依次存到考生目录下的顺序文件out5.st中。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
步骤1:新建一个”标准EXE”工程,如表3-4在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Option Base 1 Dim sum(6) As Integer Prirate Sub Command:C1ick( ) Open App.Path&”\in5.txt”For Input As#1 Text1.Text=Input(LOF(1),#1) Close#1 End Sub Private Sub Command2 C1ick( ) For i=1 To 6 sum(i)=0 Next i If Len(Textl.Text)=0 Then NsgBox”请先使用_”读数”_功能!” Else For i=1 To Len(Textl.Text) c=LCase(Mid(Textl.Text,i,1)) Select Case c Case”i” SUm(1)=Sum(1)+1 Case”j” Sum(2)=sum(2)+1 Case”k” sum(3)=sum(3)+1 Case”1” sum(4)=sum(4)+1 Case”m” sum(5):sum(5)+1 Case”n” sum(6)=sum(6)+1 End Select Next i End If End Sub Private Sub Command3 C1ick( ) Open App.Path&”\out5.txt”For Output As#1 For i=1 To 6 Print #1,sum(i) Next i Close #1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/eO60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
用来设置文件中下一个读写位置的语句是______。
在结构化分析中,【】用于详细地定义数据流图中的成分。
以下叙述中错误的是______。
下面过程定义语句可以使过程调用后不影响主调过程中的实际参数的是______。
下列函数过程的作用是计算x和y的最大公约数。请填空。PrivateSubCommand1_Click()DimxAsInteger,yAsInteger,ResultAsIntegerx=InputBox(“请输入第一
在树中,一个结点的直接子结点的个数称为该结点的【】。
在关系数据库中,元组的集合称为关系。通常标识元组的属性或最小属性组称为【】。
在Form1的窗体上绘制一个文本框,名为Text1;绘制一个命令按钮,名为Cmd1,标题为Display,它的TabIndex属性设为0。请为Cmd1设置适当的属性,使得当焦点在Text1上时,按Esc键就调用Cmd1的Click事件,该事件过程的作用是在
随机试题
Theywerereducedto________thefactthattheyhadlostthegame.
化脓性脊椎炎的好发部位是
宫颈癌Ⅲ期,肿瘤的MRI表现正确的是
以下哪项不是小叶性肺炎常见的并发症()
有下列哪一种情形的属于劣药
摩尔有房屋一套,租给伊来客居住,约定的租赁期限是4年。在第3年的时候,摩尔不幸去世,接着,伊来客也不幸死亡。该租赁房屋由摩尔之子摩里波继承,其要解除租赁合同,收回房屋,而先前与伊来客一起居住的妻子哈蓓丝不愿意,那么下列说法正确的是______。
(),是指债权人对已占有的债务人的动产,在债权未能如期获得清偿前,留置该动产作为担保以实现债权的权利。
案例:下面为一道物理习题和某同学的解答。题目:在如图9所示的实验电路中,R1=10Ω,R2的最大电阻值为30Ω,电源电压为8V(电源内阻不计),求:(1)滑动变阻器R2接入电路的电阻为零时,闭合开关,电阻R1消耗的电
给定程序中,函数fun的功能是将带头结点的单向链表逆置,即若原链表中从头至尾结点数据域依次为2、4、6、8、10,逆置后,从头至尾结点数据域依次为10、8、6、4、2。请在程序的下画线处填入正确的内容并把下画线删除,使程序得出正确的结果。
Educatortodayaremoreandmoreoften【C1】______tosaythatcomputerliteracyisabsolutelynecessaryforcollegestudents.Man
最新回复
(
0
)