声明一个学生姓名变量，我们将其称为studentname 作为字符串。像在代数方程中的 x 和 y 一样考虑变量。它们只是特定类型的事物的名称。在数学方程式中，x 和 y 是数字。字符串基本上是一个字符序列，例如单词、数字或任何其他任意数据。 "Moo-Juice" 是一个字符串，例如 - 由 " 字符分隔。
将名为intMsg 的消息声明为字符串。
子程序“Command1_Click”，当用户点击按钮（大概）Command1 时调用。子例程是函数，您可以在其中放置您希望重用的公共代码，或者在诸如此类的语言的情况下，用于响应已发生的事件。 GUI 应用程序中的事件有多种不同的风格，当用户单击按钮时会调用该事件。其他包括MouseMove、KeyUp、KeyDown。响应这些事件可以让您的代码做一些事情。
将Text1 控件的Text 属性设置为空字符串（清除它）。表单上的控件（文本框和按钮都是控件的示例）具有属性。 Text 属性是文本框控件存储您可以在文本框中看到的内容的位置。控件通常具有一大堆属性。 Left 表示它在表单上相对于水平位置的位置。 Font 指定要使用的字体等。有许多不同的 GUI 系统，除了 VB6 和 .NET 环境，还有 Windows Forms 和 WPF（Windows Presentation Foundation）。在其他语言中，您可以想到尽可能多的 GUI 系统。
将variable1 声明为字符串。
在此子例程 (Command1_Click) 中，如果发生错误，请转到似乎不在您的代码 sn-p 中的 file_error 标签，因此我们可以假设它位于循环之外的更下方。 GoTo 完全按照它在罐头上所说的去做 - 它跳转到指定的标签并在那里继续执行。 On Error 告诉 Visual Basic 如果发生错误该怎么办，在这种情况下，它是说“如果出现问题就去那里”。
以读取模式打开指定的文件，为其分配文件句柄#1 以供将来参考。文件处理程序，就像变量一样，是一种识别我们想要处理的文件的方法。如果我同时打开多个文件，如果没有文件处理程序（在 VB6 中），系统如何知道我要写入哪个文件？通过说“打开这个文件，我将其称为#1”，我们可以告诉系统我们想要在任何特定时间点播放哪个文件。
开始一个循环。有许多循环结构，VB6（和一般的 BASIC）的冗长使您可以看到您正在执行哪种循环。这是一个Do 循环。它将执行至少一次，每次迭代都会检查最后的条件。如果该检查返回 true，则循环停止。其他循环类型包括For（用于对步骤进行细粒度控制，以及多少次迭代。其他语言允许更具表现力的布尔逻辑来确定for循环的确切生命周期）和While，类似于do，但是检查是在顶部执行的，因此如果条件立即失败，它可能会运行 0 次。
从文件句柄#1 中读取一行到我们的字符串变量variable1。请记住，我们已经告诉它要使用哪个文件句柄，因此系统知道从哪里读取数据。
将此附加到我们之前清空的文本框中，并带有回车和换行符。鉴于我们正在逐行阅读，我们在将文本放入文本框时保留了行尾。追加意味着我们保留那里的内容并添加。
继续这样做，直到我们到达文件末尾。 EOF() 函数接受一个文件句柄并说明我们是否已经到达 *E*nd *O*f 和 *F*伊莱。请记住，如果表达式为 true，则循环结束。好吧，EOF() 返回 true 如果我们已经到达文件的末尾。停止阅读它的好时机，你不觉得吗？ :)
关闭文件句柄。说够了！ :)
总结
此代码 sn-p 逐行读取文件并将内容放入文本框中，保留行尾。
问题
-
intMsg 从未使用过。
-
studentname 也不是
- 如前所述，您缺少
file_error 标签和子例程的结尾 (End Sub)。