填空题

设在工程中有一个标准模块，其中定义了如下记录类型
Type Books
Name As String*10
TelNum As string*20
End Type
在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，
在顺序文件Person.txt中写入一条记录。该操作的事件过程是 【15】 。

【参考答案】

Private Sub Command1_Click()
Dim Book1 As Books
Op......

(↓↓↓ 点击下方‘点击查看答案’看完整答案、解析 ↓↓↓)
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test .dat中。请在空格处填上适当的内容，将程序补充完整。 Private Sub Command1_Click() Open c: test.dat For 【14】 As #1 For i=1 to Len(Text1.text) print#1，mid(Text1.Text，i，1) Next Close #i End Sub
填空题
设有如下程序： Private Sub Form_Click() Dim a As Integer，s As Integer n=8：s=0 Do s=s+n:n=n-1 Loop While n＞0 Print s End Sub 以上程序的功能是计算1到8的和。程序运行后，单击窗体，输出结果为 【12】 。
相关试题