be no 名词:VB编程问题
来源:百度文库 编辑:查人人中国名人网 时间:2024/10/06 14:49:44
VB6.0报表数据环境中的connection对象的commandtext查询语句用代码怎样写?
我要在报表设计中调用form窗体返回的全局变量值。
高手们帮帮忙啊
谢谢
我要在报表设计中调用form窗体返回的全局变量值。
高手们帮帮忙啊
谢谢
如果隔时间不长,txt文件不大,txt文件内容不变:
Private index As Long, strLines(1000) As String, n As Long
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
Open App.Path & "\try.txt" For Input As #1
Do Until EOF(1)
Line Input #1, strLines(n)
n = n + 1
Loop
Close #1
End Sub
Private Sub Timer1_Timer()
Text1 = strLines(index)
index = index + 1
If index = n Then Timer1.Enabled = False
End Sub