Private Sub Command1_Click() Open "c:\a.txt" For Binary As #1 Text1.Text = Input(LOF(1), #1) '指定读取的字节数就可以读取相应的内容 Close #1 End Sub
Input#语句一次可以读入一项或多项内容:
input #1,a 一次给一个变量读入一个值。
input #1,a,b,c 一次给三个变量分别读入各自的值。
在读数时,用定界符引起来就算一个数据。input #1,s 就可以。但如果去掉了双引号,就是两个数据。I am a student ,I love VB
syc正解,回答很详细