在考生文件夹下有一个工程文件sjt4．vbp。窗体中已经给出了所有控件。程序运行时，单击”读入文件”按钮，将显示一个”打开”对话框，可以在该对话框中选择考生文件夹下的文本文件in4．txt，并把该文件的内容显示到Textl文本框中。要求：请去掉程序中的注

admin2019-06-11 23

问题在考生文件夹下有一个工程文件sjt4．vbp。窗体中已经给出了所有控件。程序运行时，单击”读入文件”按钮，将显示一个”打开”对话框，可以在该对话框中选择考生文件夹下的文本文件in4．txt，并把该文件的内容显示到Textl文本框中。
要求：请去掉程序中的注释符，并把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。

选项

答案步骤1：打开考生文件中的本题工程文件sjt4．vbp，在代码编辑窗口，去掉程序中的注释符”’“，将问号”?”改为正确的内容。参考代码： Private Sub Commandl_Click( ) Dim n As Long CDl．FileName=““ CD1．Filter=“所有文件｜*.*｜文本文件｜*．txt ｜ Word文档｜*．doc” CD1．FilterIndex=2 CD1．ACtion=1 If CD1．FileName＜＞ ““Then Open CD1．FileName For Input As#1 n=LOF(1) Textl=Input$(n，#1) ClOse #1 EndIf End Sub 步骤2，按要求将文件保存至考生文件夹中。

解析

转载请注明原文地址:https://kaotiyun.com/show/z8Up777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

如果一个菜单项的Enabled属性被设置为False，则程序运行时，该菜单项

设a=10，b=5，c=1，执行语句Printa＞b＞c窗体上显示的是

窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：PrivateTypexaAsInteger：bAsIntegerEndTypePrivateSubCommand1_Click()

下面能够将某个变量声明为局部变量的是

用来设置文字字体是否斜体的属性是

关于随机文件，以下叙述中错误的是

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明：PrivateTypePzersonNameAsString*8：MajorAsStri8

由高中数学可知，对于连续函数f(x)，若f(x1)与f(x2)值的符号相反，则在x1和x2之间必存在x0，使得f(x0)=0(该点称为“零点”)。设有VB函数：PrivateFunctionf(xAsSingle)AsSingle可以返回fix)

有下面程序代码：PrivateSubCommand1_Click()DimaAsStringa="COMPUTER"n=search(a，"T")：PrintIIf(n=0，"未找到"，n)EndSubPrivateFunctio

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4Print______________NextEn

在企业管理的各项职能中，被称为首要职能的是

沙眼在国际上常分为

透皮治疗系统的基本组成是

简述教育的心理起源学说。

下列选项中，能由左边的展开图折叠而成的是：

TheGreatNewspaperWarUpuntilabout100yearsago,newspapersintheUnitedStatesappealedonlytothemostseriousreaders.

TheysaidtheyWouldletusknowifthey______anynewsaboutthecar.

Completethetablebelow.WriteNOMORETHANONEWORDforeachanswer.