Public Sub ReadMyData(ByVal myConnString As String)
Dim ZohoBooksConnection As New ZohoBooksConnection(myConnString)
Dim ZohoBooksCommand As ZohoBooksCommand = ZohoBooksConnection.CreateCommand()
ZohoBooksCommand.CommandText = "SELECT AccountID, \"Account Name\", Phone FROM Accounts"
ZohoBooksConnection.Open()
Dim ZohoBooksReader As ZohoBooksDataReader = ZohoBooksCommand.ExecuteReader()
Try
' Always call Read before accessing data.
While ZohoBooksReader.Read()
Console.WriteLine(String.Concat(ZohoBooksReader.GetString(0), " ", _
ZohoBooksReader.GetString(1), " ", ZohoBooksReader.GetString(2)))
End While
Finally
' always call Close when done reading.
ZohoBooksReader.Close()
' Close the connection when done with it.
ZohoBooksConnection.Close()
End Try
End Sub