首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画三个命令按钮(名称分别为Command1、Command2和Command3,标题分别为“显示”、“统计”和“保存”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2
在名称为Form1的窗体上画三个命令按钮(名称分别为Command1、Command2和Command3,标题分别为“显示”、“统计”和“保存”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2
admin
2019-01-16
51
问题
在名称为Form1的窗体上画三个命令按钮(名称分别为Command1、Command2和Command3,标题分别为“显示”、“统计”和“保存”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2),如 图1-292(a)所示。程序运行后,如果单击“显示”命令按钮,则读入in5.txt 文件中的文本,并在文本框中显示出来,如图1-292(b)所示;如果单击“统计”命令按钮,则统计文本框中ASCII 码大于等于70、小于等于100 的字符的个数,并把结果在文本框中显示出来,如图1-292(c)所示(注意,图中所显示的统计次数是随便写的,不是实际的统计结果);如果单击“保存”命令按钮,则把统计结果存入考生文件夹下的out5.txt 文件中。
注意:结束程序运行前必须用“保存”命令按钮把统计结果存入考生文件夹下的out5.txt 文件中,否则没有成绩。存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
【操作步骤】 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个文本框和三个命令按钮,并分别设置它们的相关属性,属性及值如表2-156所示。 [*] 步骤3:打开代码编辑窗口,编写三个命令按钮的单击事件代码。 参考代码: Private str1 As String Private Sub Command1_Click() Open "in5.txt" For Input As 1 Line Input #1, str1 Close #1 Text1.Text = str1 End Sub Private Sub Command2_Click() Dim i, j As Integer j = 0 For i = 1 To Len(str1) If Asc(Mid(str1, i, 1)) >= 70 And Asc(Mid(str1, i, 1)) <= 100 Then j = j + 1 End If Next Text1.Text = j End Sub Private Sub Command3_Click() Open "out5.txt" For Output As #1 Write #1, Text1.Text Close #1 End Sub 步骤4:按要求将文件保存在考生文件夹中。 步骤5:运行程序,先单击“显示”按钮,然后单击“统计”按钮,最后单击“保存”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/SuFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
利用通用对话框控件打开字体对话框的操作是
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
下面关于直线控件的叙述中正确的是
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0s=s&nMod
编写如下程序:PrivateSubCommand1_Click()DimxAsIntegerx=10Printfun1(x,12)+xEndSubPrivateFunctionfun1(mAsI
为了保存数据,需打开顺序文件"E:\UserData.txt",以下正确的命令是
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click() x=0 DoWhilex
设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"
随机试题
出版物生产成本中的直接成本包括()等项目。
A.弥散障碍B.第一秒用力呼气率降低C.两者均有D.两者均无支气管哮喘
当设计无具体要求时,对一、二级抗震等级的框架结构,其纵向受力钢筋检测所得的强度实测值应符合“钢筋抗拉强度实测值与屈服强度实测值的比值不应大于1.25,屈服强度实测值与强度标准值的比值不应小于1.3”的规定。()
按照住房城乡建设部、财政部《关于印发的通知》(建标[2013]44号)的规定,对建筑以及材料、构件和建筑安装物进行一般鉴定、检查所发生的费用,应在()中列支。
商业银行申请开展个人理财业务,应当向中国银监会报送的材料包括()。
(2017年)增值税一般纳税企业以支付现金方式取得联营企业股权的,所支付的与该股权投资直接相关的费用应计入当期损益。()
土地增值税纳税人是法人的,当转让的房地产坐落地与其机构所在地或经营所在地一致时,在办理税务登记的原管辖税务机关申报纳税即可。()
关于“重证据,重调查研究,严禁逼供信”的政策,下列说法错误的是()。
(厦门大学2011年初试真题)根据个人所得税法的规定,下列是个人所得税纳税人的有()。
下列变量名中,合法的()。A)B)C)D)
最新回复
(
0
)