在窗体上画一个命令按钮,名称为command1,然后编写如下程序: Private Sub Command1_Click() Dim ct As String Dim nt As Integer Open "e:\stud. txt" (13) Do While True ct=InputBox("请输入姓名:") If ct= (14) Then Exit Do nt=Val(InputBox("请输入总分:")) Write #1, (15) Loop Close #1 End Sub 以上程序的功能是,程序运行后,单击命令按钮,则向e盘根目录下的文件stud. txt中添加记录(保留已有记录),添加的记录由键盘输入;如果输入“end”,则结束输入。每条记录包含姓名(字符串型)和总分(整型)两个数据。请填空。