填空题

在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

【参考答案】

Open"E:\Student．txt" For Output As #1
<上一题 目录 下一题>
热门 试题

填空题
下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a，其中最后一项为n个。 例如：a=5，n=4时，则Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。Private Sub Command1_Click()Dim a As Integer，n As Integer，Cout As IntegerDim Sn As Long，Tn As LongCout=1Sn=0Tn=0a=InputBox( 请输入a的值： )【 】 DoTn=Tn * 10 + aSn二Sn + TnCout=Cout+1【 】 Debug．Print a，n，SnEnd Sub
填空题
以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输 入负数时结束输入，输出结果。请补充完整下列程序段。Dim x，amax,amin As Singlex=InputBox( Enter a score )amax=xamin=xDo While【 】 If x>amax Thenamax=xEnd IfIf【 】Thenamin=xEnd Ifx=InputBox( enter a score )LoopPrint max= ；amax， min= ；amin
相关试题