"Не удалось привести тип объекта "System.Int32" к типу "System.String"." - Visual Basic .NET

Imports System.Data.SqlClient
 
Public Class Form1
    Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
    Private myConn As SqlConnection
    Private myCmd As SqlCommand
    Private myReader As SqlDataReader
    Private results As String
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
        query1 As String
        Dim db As DAO.Database
        Dim res1 As DAO.Recordset
        Dim qdf1 As DAO.QueryDef
        Dim J As String
        Dim CommandText As String

        myConn = New SqlConnection("Data Source=DESKTOP-0REFT5S\SQLEXPRESS;Integrated Security=SSPI;Initial Catalog=InOrders")

        myCmd = myConn.CreateCommand
        myCmd.CommandText = "SELECT TOP (1) id FROM [Order] ORDER BY id DESC"
 
        myConn.Open()
 
        myReader = myCmd.ExecuteReader()
 
        Do While myReader.Read()
            results = results & myReader.GetString(0) & vbTab & '- Ошибка возникает сдесь
        myReader.GetString(1) & vbLf
        Loop
End Sub
End Class