I know how to do this in VB. But can anyone teach me how to archieve this in VC++?
Code:Option Explicit Private Type sData ID As String Age As Integer Name As String End If Private sd As sData Private Sub ReadFile() Dim Ptr As Long Open "C:\1.dat" For Binary As #1 Ptr = 0 Do While Not EOF(1) Get #1, (Ptr * Len(sd)) + 1, sd Debug.Print sd.ID Debug.Print sd.Age Debug.Print sd.Name Ptr = Ptr + 1 DoEvents Loop Close #1 End Sub




Reply With Quote