vb.net og ms sql

hej
sidder lige og prøver at få en ms sql database til at snakke sammen med vb.net.

jeg kan godt usføre querys, men har nogle problemer med insert.
Jeg benytter følgende kode:

Try
            Dim cmd As New SqlCommand()
            cmd.CommandTimeout = 60
            cmd.Connection = conn
            cmd.CommandType = CommandType.Text
            'tæller antallet af poster før vi indsætter
            cmd.CommandText = "SELECT Count(*) FROM RHMtest3"
            conn.Open()
            If conn.State = ConnectionState.Open Then
                Dim objCount As Object = cmd.ExecuteScalar()
                Dim iCount As Integer = CInt(objCount)
                MsgBox("Count was succesfull")
                cmd.CommandText = "INSERT INTO RHMtest3 (simple_id, simple_text) VALUES (" + iCount + ",'" + strtext + "')"
                cmd.ExecuteScalar()
                MsgBox("Succesfully inserted the string")
            End If
        Catch exp As Exception
            MsgBox(exp.Message)
        Finally
            conn.Close()
        End Try

jeg forsøger at anvende resultatet af count som primærnøgle (jeg ved godt at det ikke er helt optimalt).

Problemet er at når jeg kører scriptet får jeg følgende fejl:

Cast form String "Insert Into RHMTest3(Simple_id," to type 'Double' is not valid

jeg er helt sikker på at simple_id er oprettet som integer. Og hvis jeg prøver at ændre icount til double får jeg samme fejl...

nogle ideer?