首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认文件类型为“文本文件”,默认目录为考生目录。选中in5.txt 文件,如图 1-92(a)所示,单击“打开”按钮,则把文件中的
在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认文件类型为“文本文件”,默认目录为考生目录。选中in5.txt 文件,如图 1-92(a)所示,单击“打开”按钮,则把文件中的
admin
2019-05-14
28
问题
在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认文件类型为“文本文件”,默认目录为考生目录。选中in5.txt 文件,如图 1-92(a)所示,单击“打开”按钮,则把文件中的内容读入并显示在文本框(Text1)中;单击“修改内容”按钮,则可把Text1中的大写字母“E”、“N”、“T”改为小写,把小写字母“e”、“n”、“t”改为大写;单击“保存文件”按钮,则弹出“另存为”对话框,默认文件类型为“文本文件”,默认目录为考生目录,默认文件为“out5.txt”,如图1-92(b)所示,单击“保存”按钮,则把Text1中修改后的内容存到out5.txt文件中。
窗体中已经给出了所有控件和程序,但程序不完整,去掉程序中的注释符,把程序中的?改为正确的内容,并编写“修改内容”按钮的Click事件过程。
注意:考生不得修改已经存在的程序。必须把Text1中修改后的内容用“保存文件”按钮存储结果,否则无成绩。最后,按原文件名把程序存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: CommonDialog1.FilterIndex = 2 Open CommonDialog1.FileName For Input As #1 Text1.Text = s CommonDialog1.Action = 2 步骤2:按指定位置编写“修改文件”的单击事件过程。 参考代码: Private Sub Command2_Click() ’ 考生需要编写的程序 s = "" str_len = Len(Text1) For k = 1 To str_len ch = Mid$(Text1, k, 1) If ch = "E" Or ch = "N" Or ch = "T" Then s = s & LCase(ch) ElseIf ch = "e" Or ch = "n" Or ch = "t" Then s = s & UCase(ch) Else s = s & ch End If Next k Text1 = s End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击“打开文件”按钮,接着单击“修改内容”按钮,然后单击“保存文件”按钮。
解析
转载请注明原文地址:https://jikaoti.com/ti/5SN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为cmdArray的命令按钮数组,含3个命令按钮,它们的lndex属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮
下列程序段中没有错误的是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
阅读下面程序代码:PrivateSubCommand1_Click()DimtempAsIntegera=Array(2,7,4,10,0,1,8,5,3,9,6)Fori=7To4Step-1Forj=3Toi-1If
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("请输入一个正整数="
假定计时器控件Timerl的Enabled属性为True,Interval属性为1000,并编写如下程序代码:PrirateSubTimer1_Timer()DimxAsIntegerFori=1To100x=x+1Nexti
窗体上有一个名称为VScrolll的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
设有下面的程序段iX=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面定义语句中正确的是
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenPrintx,yExitDoElsex=x+3En
随机试题
Thenumberofpermanentstaffis________.
实体完整性规则要求关系中主键值不能为______。
将函数f(x)=展开为(x-1)的幂级数,并写出其收敛域.
闭路电视监控系统中,当传输距离较远时宜采用()传输信号。
光学水准仪在机电设备安装中主要用于()等。
Word中选定表格的某一行,再从“编辑”菜单中选择“清除”命令(或按Del键)将()。
甲某购买了某公司的股票1000股,每股票面金额32元,预期每年可以获得6.0%的股息,而当时银行存款的利息率为3.0%。如果没有其他因素的影响,一年后甲某购买的1000股股票的价格是()元。
一个实心立体图形如图所示从中挖掉一个圆柱体,然后从任意面剖开,下面哪一项不可能是该立体图形的截面?
MaryandIbought______someoranges.
Theygotooneoftheworld’smostprestigiousuniversitiesandpridethemselvesontheirsuperiorintellectbutalmosthalfof
最新回复
(
0
)