填空题
在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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
执行下面的程序段,x的值为【 】。 Private Sub Command1_Click()For i=1 To 9a=a + iNext ix=Val(i)MsgBox xEnd Sub
点击查看答案&解析
填空题
下列程序计算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
点击查看答案&解析
相关试题
如果存在如下过程:Private Function FMa...
要使标签的背景样式为不透明,应将BackStyl...
下述语句段在运行时的显示结果是【 】。Ci...