程序设计典型例题解析(2)

来源：用户分享时间：2025/7/5 11:58:29 本文由

loading 分享下载这篇文档手机版

说明：文章内容仅供预览，部分内容可能不全，需要完整文档或者需要复制内容，请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ：xxxxxx 处理（尽可能给您提供完整文档），感谢您的支持与谅解。

图3 记事本程序运行界面

程序如下，请补充完整。 Private Sub Command1_Click() Dim strtxt As String Text1 = \

Open [1] '以读方式打开文件

Do While [2] '判断文件是否结束 Input

#1,

strtxt

'从文件中读取数据并将其赋值给变量strtxt Text1 = Text1 + [3] '将内容显示在文本框中 Loop

[4] '

关闭文件 End Sub

Private Sub Command3_Click()

Open \For Output As #1 '以写方式打开文件 Write Close #1 End Sub

Private Sub Command4_Click() Unload Me End Sub 答案：

[1] \[2] Not EOF(1) [3] strtxt [4] Close #1 [5] Text1

#1,

[5]

'在文本框中写入内容

程序设计典型例题解析(2).doc 将本文的Word文档下载到电脑，方便复制、编辑、收藏和打印