I need to convert the following code from VB to Cbasic. The Function, FTgetJulian() retrieves a date and a corresponding price from a stock price database. I don't expect someone to complete this for me I just need some direction. Thanks.
For i = start To maxnumdays
If (i - 1) Mod 25 = 0 Then
DoEvents
Demo.Cls
Demo.Print "Index Date Price"
Demo.Print "========================================"
End If
julian = FTgetJulian(i)
Demo.Print Format$(i, "@@@@@ ") & _
Format$(julian, "mmm dd, yyyy (") & _
Format$(julian) & _
Format$(Format$(prices(i), "0.00"), ") @@@@@@@@@@")
Next
A quick search on the forum give this URL: http://www.ionicwind.com/forums/index.php/topic,2529.0.html
The ruoutines discussed there are for EmergenceBasic, but I don't think you should have any difficulties converting the Julian Date subroutines into Creative Basic code.
Good luck!