Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #72.7K
|
Private Sub CreateChart() Dim time2, tp As String Try Dim sr2 As New StreamReader("D:\Temp\datalogger\" & date1.ToString & "\int_sma_" + date1.ToString + ".txt") Dim line7 = sr2.ReadLine Dim tn = timeNow() Do While Not line7 Is Nothing 'loop until end of file If IsNumeric(line7.Chars(0)) Then If Directory.Exists("D:\Temp\datalogger\" & date1) Then If …
|