insert into sql database

jeg har følgende kode den kommer ikke med fejl men insætter ingenting i databasen, hvilket jeg undrer mig lidt over

        Dim str As String
        Dim strinsert As String
        Dim cmdinsert As SqlCommand

        strinsert = "INSERT INTO Main_Categories( Main_CatName ) Values ('test1000')"
        cmdinsert = New SqlCommand(strinsert, SqlConnection1)
        SqlConnection1.Open()
        cmdinsert.ExecuteNonQuery()
        SqlConnection1.Close()

det er en sql server, jeg bruger som database