有这样一段程序
Private Sub joinRZ()
Open (App.Path & "\系统日志.ini") For Input As #1
Do While Not EOF(1)
Line Input #1,
Intext TStr =
TStr +
Intext + Chr(13) + Chr(10)
Loop
Close #1
If ETemp = 0 Then '添加修改信息日志
TStr =
TStr + " "+ "修改票号" + Text1(0).Text + Chr(13) + Chr(10)
ElseIf ETemp = 1 Then '添加删除信息日志
TStr =
TStr + " "+ "删除票号" + Text1(0).Text + Chr(13) + Chr(10)
End If
Open (App.Path & "\系统日志.ini") For Output As #1
Print #1, TStr
Close #1
End Sub
我用
dim Intext
dim TStr
定义这两个变量与没定义直接使用这两个变量出来的结果是两种,这里加黑的(Intext与TStr)两个变量应该怎么定义呢?
高手帮忙呀,正在研究程序的过程中,谢谢1