# 将text1存档的问题.

Posted by kkcheung on April 13, 1999 at 23:33:45:

Private Sub Command1_Click()
Open "c:\dfile\test.txt" For Output As #1
Text2 = Text1.Text
Write #1, Val(Text1.Text), Val(Text2.Text), Val(Text1.Text) + Val(Text2.Text)
Close #1
End Sub

上面的程式,在text1输入12,text2输入34,按command1,text2会立即变12,输出的文字档亦是 12,12,24
为什么不是 12,34,46

Follow Ups:

- 34早已不复存在了 纪文和 00:01:39 4/14/99 (1)
  - 谢谢你!我太大意了.(无内文) kkcheung 11:07:35 4/14/99 (0)