题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-23 11:10:36

[单项选择]在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(SmEng)。则在下列横线处
合适的语句是( )。
Private Sub Form_Click( )
Open"C:///SDat.txt"For Output AS 1
For i=1 To 5
  SmNo=InputBox("请输入学号")
StuName=InputBox("请输入姓名")
StuEndg=Val(InputBox("请输入英语成绩"))
______
Next i
Close #1
End Sub
A. Input #1,StuNo,StuName,StuEndg
B. Put #1,StuNo,StuName,StuEndg
C. Write #1,StuNo,StuName,StuEndg
D. Get #1,StuNo,StuName,StuEndg

更多"在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用Inp"的相关试题:

[填空题]在C盘当前文件夹下建立一个名为StuData. txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。
Private Sub Form Click( )
Open"C: StuData. txt"For OutPut As#1
Fori=1 To 5
StuNo=InpuzztBox(“请输入学号”)
StuName=InputBox(“请输入姓名”)
StuEng=Val(InputBox(“请输入英语成绩”))
【15】
Next i
Close#1
End Sub
[填空题]在E盘当前目录文件夹下建立一个名为“Student.txt’’的顺序文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。
Private Sub Form _ Click( )
【12】
For i=1 To 5
StuName=InputBox("请输入姓名")
StuGrade=InputBox("请输入年级号")
StuAge=InputBox("请输入年龄")
【13】
Next i
【14】
End Sub
[单项选择]在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序( )。
Private Type student
StuName As String * 10
StuGrade As String * 10
StuAge As Integer
End Type
Private Sub Form Click( )
Dim s As student
Open "c:/student.txt"For Random As#1 Len=Len(s)
For i=1 To 5
s.StuName=InputBox("请输入姓名")
s.StuGrade=InputBox("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄"))
______
Next i
Close #1
End Sub
A. Print #1,s
B. Print #1,i
C. Put #1,,s
D. Put #1,i
[填空题]在E盘当前目录文件夹下建立一个名为“Student.txt’’’的顺序文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。   Private Sub Form _ Click( )     【 】     For i=1 To 5       StuName=InputBox("请输入姓名")       StuGrade=InputBox("请输入年级号")       StuAge=InputBox("请输入年龄")       【 】     Next i     【 】   End Sub
[填空题]在C盘当前文件夹下建立一个名为StuData.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。 Pfivate Sub Form_Click( ) Open"C:StuData.txt"ForOut PUt As#1 Fori=l To5 StuNo=InputBox("请输入学号") StuName=InputBox("请输入姓名") StuEng=Val(1nputBox(“请输入英语成绩”)) ______ Nexti Close#1 End Sub

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码