网友您好，请在下方输入框内输入要搜索的题目：

搜题

题目内容（请给出正确答案）

[单选题]

窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据：该程序运行时有错误，应该进行的修改是（）

A.将Open语句中的ForAppend改为ForInput

B.将LineInput改为Line

C.将两条LineInput语句合并为LineInput#3，s1，s2

D.将Close语句改为Close#3

答案

A、将Open语句中的ForAppend改为ForInput

解析：文件打开方式中的Append意味着打开的文件是顺序输出方式，也就是说打开文件是为了向其中写入数据而不是要读出数据。因此Open "c://d4.dat" For Append As #3应该改为Open "c://d4.dat" For Input As #3。Close语句中的文件号可以省略，这时会关闭所有打开的文件。

发布时间：2022-01-31

纠错

更多“窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据：该程序运行时有错误，应该进行的修改是（）”相关的问题

第1题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：Private Sub Command1_Click（)Dim x,y,z As Integerx=5y=7z=0Texttext=“”Call P1（x,y,z)TextText=Str（z)End SubSub P1（a As Integer,b As Int

A.0

B.12

C.Str(z)

D.没有显示

点击查看答案

第2题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_C1ick（) S＝0 For i＝1 T0 15 x＝2*i-1 1f x Mod 3＝0 Then s＝s+1 Nexti LabelCaption=s End Sub程序运行后，单击命令按钮，则标签中显示的内容是（）

A.1

B.5

C.27

D.45

点击查看答案

第3题

在窗体上添加一个水平滚动条,名称为 HScroll1 ;再添加一个文本框,名称为 Text1 。要想使用滚动条滑块的当前值来调整文本框中文字的大小,则可满足的语句是 ____

A.Text1．FontName= HScroll1．Max

B.Text1．FontSize= HScroll1．Min

C.Text1．FontSize= HScroll1．Value

D.Text1．FontBold= HScroll1．Value

点击查看答案

第4题

在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：Private Sub Command1_Click（）x = 0 Do While x < 50 x = （x + 2） * （x + 3） n = n + 1 Loop Text1.Text = Str（n） Text2.Text = Str（x）End Sub程序运行

A.1和0

B.2和72

C.3和50

D.4和168

点击查看答案

第5题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2、Label3的标签，然后编写如下的事件过程：Private x As Integer Private Sub Command1_Click（）Static y As IntegerDim z As Integern = 10z = n + zy = y

A.10；10；10

B.30；30；30

C.30；30；10

D.10；30

点击查看答案

第6题

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Command1_Click（）Static x As IntegerStati cy As Integery=1y=y+5x=x+5Printx；yEnd Sub程序运行时，三次单击命令按钮Commandl后，窗体上显

A.1516

B.156

C.1515

D.56

点击查看答案

第7题

为了使命令按钮（名称为Command1)右移应使用的语句是（）

A.Command1.Move -200

B.Command1.Move 200

C.Command1.Left= Command1.Left+200

D.Command1.Left= Command1.Left-200

点击查看答案

第8题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：Private Sub Command1_Click（）a = InputBox（“请输入日期（1～31）”） t = “去往” & IIf（a > 0 And a <= 15, “杭州”, “”） _ & IIf（a > 15 And a <= 31, “苏州”,

A.去往方向旅游

B.去往苏州方向旅游

C.去往杭州方向旅游

D.去往杭州，苏州方向旅游

点击查看答案

第9题

在表单form1中有三个文本框text1、text2、text3（它们的value初值均为"无"）和一个命令按钮command1，命令按钮的click事件代码如下：thisform.text3.value=thisform.text1.value-thisform.text2.value表单运行后，在text1、text2中分别输入{^2006/11/6}和4，然后单击command1，则text

A.{^2006/11/6}4

B.2006/11/2

C.2006/11/64

D.{^2006/11/2}

点击查看答案

第10题

假定表单里有文本框对象TEXT1和命令按钮组对象CMG1对象各一个，CMG1中包含CM1和CM2两个命令按钮，如果要在CM1命令按钮的某个事件中访问文本框TEXT1的VALUE属性，下列式子正确的是（）

A.PARENT.TEXT1.VALUE

B.THIS.TEXT1.VALUE

C.THISFORM.TEXT1.VALUE

D.THIS.THISFORM.TEXT1.VALUE

点击查看答案

第11题

VB为命令按钮提供的Cancel属性是（）

A.用来指定命令按钮是否为窗体的"取消"按钮

B.用来指定命令按钮的功能是关闭整个应用程序

C.用来指定命令按钮的功能是关闭一个运行程序

D.按ESC键，用来指定命令按钮的功能是停止一个程序的运行

点击查看答案

账号：尚未登录

登录没有账号？去注册

我要提问

联系客服

购买搜题卡

题库练习

课程学习

功能	扣减规则
功能	基础费（查看答案）	加收费（AI功能）
文字搜题、查看答案	1/每题	0/每次
语音搜题、查看答案	1/每题	2/每次
单题拍照识别、查看答案	1/每题	2/每次
整页拍照识别、查看答案	1/每题	5/每次