文件名称：方法一次性读-Visual Basic 6.0简明教程
文件大小：3.12MB
文件格式：PPT
更新时间：2024-05-15 03:17:14
VB
方法2：一次性读 txtTest.Text ＝ "" Open "MYFILE.TXT" For Input As #1 txtTest.Text = Input( LOF(1),1) Close #1 方法3：一个个字符读 Dim InputData as String*1 txtTest.Text ＝ "" Open "MYFILE.TXT" For Input As #1 Do While Not EOF(1) InputData= Input(1,#1) txtTest.Text ＝ txtTest.Text + InputData Loop Close #1