重要提示: 请勿将账号共享给其他人使用,违者账号将被封禁!
查看《购买须知》>>>
当前位置: 首页 > 大学网课 > 大学网课
网友您好, 请在下方输入框内输入要搜索的题目:
搜题

题目

[单选题]

窗体上有一个名称为Command1的命令按钮。其单击事件过程如下: Private Sub Command1_Click() Open "c:f1.txt" For Input As #1 Open "c:f2.txt" For Output As #2 Do While Not EOF(1) Line Input #1, str1 Print #2, str1 Loop Close End Sub 以下关于上述程序的叙述中,错误的是________

A.程序的功能是将f2.txt文件的内容复制到f1.txt中

B.f1.txt和f2.txt均是顺序文件

C.EOF函数可以判断是否已到文件的末尾

D.Close能够把打开的两个文件都关闭

答案
C C。【解析】本题考y,-add方法里IsMissing的v3,v3是一个可选项,用来判断这个参数是否存在。根据程序语句,当输入3个参数时,就是3个参数求和,输入2个参数时是两个数求和,题目中是2个参数,因此是2个参数求和,不会报错。
更多“窗体上有一个名称为Command1的命令按钮。其单击事件过程如下: Private Sub Command1_Click() Open "c:f1.txt" For Input As #1 Open …”相关的问题

第1题

在窗体上添加一个命令按钮,名称为Command1,编写如下事件过程: Private Sub Command1_Click() Dim arr arr = Array("武汉", "温州", "吉林", "哈尔滨", "北京") Print arr(2) End Sub 运行时,单击命令按钮后输出的结果是

A.温州

B.吉林

C.哈尔滨

D.北京

点击查看答案

第2题

在窗体上添加一个命令按钮,名称为Command1,编写如下事件过程: Private Sub Command1_Click() Dim arr arr = Array("武汉", "温州", "吉林", "哈尔滨", "北京") Print arr(2) End Sub 运行时,单击命令按钮后输出的结果是()。

A.温州

B.吉林

C.哈尔滨

D.北京

点击查看答案

第3题

窗体上有一个名称为Command1的命令按钮,一个名称为List1的列表框。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open "c:f1.txt" For Input As #1 Do While Not EOF(1) Input #1, str1 List1.AddItem str1 Loop Close End Sub 对于上述程序,以下叙述中错误的是________。

A.Close的作用是关闭已经打开的数据文件

B.单击命令按钮后,把f1.txt中的所有内容添加到列表框中

C.以输入方式打开随机文件f1.txt

D.运行程序后,列表框中的列表项都是f1.txt中的记录

点击查看答案

第4题

在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=0:b=5:c=6 MsgBox? a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为()。

A.11

B.a=11

C.0

D.假

点击查看答案

第5题

设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是()。

A.窗体的Click事件过程的过程名是Myform_Click

B.命令按钮的Click事件过程的过程名是Command_Click

C.命令按钮的Click事件过程的过程名是Command1_Click

D.命令按钮的Click事件过程的过程名是C1_Click

点击查看答案

第6题

在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() a = 75 If a>60 Then k = 1 ElseIf a>70 Then k = 2 ElseIf a>80 Then k = 3 ElseIf a>90 Then k = 4 End If MsgBox k End Sub 窗体打开运行后,单击命令按钮,则消息框的输出的结果是()。

A.1

B.2

C.3

D.4

点击查看答案

第7题

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim s1 As String, s2 As String Open "D:data.txt" For Input As #1 Seek #1, 5 s1 = Input$(2, #1) s2 = Input$(3, #1) Print Seek(1) Close #1 End Sub 假设有磁盘文件D:data.txt,且文件足够长,当程序运行时,单击Command1,在窗体上输出的结果是________。

A.5

B.9

C.10

D.11

点击查看答案

第8题

在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n 3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是()。

A.15

B.18

C.21

D.24

点击查看答案

第9题

在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n 3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是()。

A.15

B.18

C.21

D.24

点击查看答案

第10题

在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() For i = 1 To 4 a = 1 For j = 1 To 3 a = 2 For k = 1 To 2 a = a + 6 Next k Next j Next i Print a End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是()。

A.14

B.15

C.16

D.17

点击查看答案
赏学吧APP
TOP
重置密码
账号:
旧密码:
新密码:
确认密码:
确认修改
购买搜题卡查看答案
购买前请仔细阅读《购买须知》
请选择支付方式
微信支付
支付宝支付
点击支付即表示你同意并接受《服务协议》《购买须知》
立即支付
搜题卡使用说明

1. 搜题次数扣减规则:

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

备注:网站、APP、小程序均支持文字搜题、查看答案;语音搜题、单题拍照识别、整页拍照识别仅APP、小程序支持。

2. 使用语音搜索、拍照搜索等AI功能需安装APP(或打开微信小程序)。

3. 搜题卡过期将作废,不支持退款,请在有效期内使用完毕。

请使用微信扫码支付(元)
订单号:
遇到问题请联系在线客服
请不要关闭本页面,支付完成后请点击【支付完成】按钮
遇到问题请联系在线客服
恭喜您,购买搜题卡成功 系统为您生成的账号密码如下:
重要提示: 请勿将账号共享给其他人使用,违者账号将被封禁。
发送账号到微信 保存账号查看答案
怕账号密码记不住?建议关注微信公众号绑定微信,开通微信扫码登录功能
警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

- 微信扫码关注赏学吧 -
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反赏学吧购买须知被冻结。您可在“赏学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
- 微信扫码关注赏学吧 -
请用微信扫码测试
温馨提示
每个试题只能免费做一次,如需多次做题,请购买搜题卡
立即购买
稍后再说
赏学吧