Code:
    Sub insCard(ByVal strSet As String, ByVal strName As String, ByVal strColor As String, ByVal strCost As String, ByVal strType As String, ByVal strPowtgh As String, ByVal strRules As String, ByVal strFlavor As String, ByVal strRarity As String, ByVal strArtist As String)
        Dim connectionString As String = "server='(local)'; trusted_connection=true; database='DNScards'"
        Dim dbConnection As System.Data.IDbConnection = New System.Data.SqlClient.SqlConnection(connectionString)

        Dim queryString As String = "INSERT INTO [tblCardlist] ([strSet], [strName], [strColor], [strCost], [strType]," & _
            " [strPowtgh], [strRules], [strFlavor], [strRarity], [strArtist]) VALUES (@strSet" & _
            ", @strName, @strColor, @strCost, @strType, @strPowtgh, @strRules, @strFlavor, @s" & _
            "trRarity, @strArtist)"
        Dim dbCommand As System.Data.IDbCommand = New System.Data.SqlClient.SqlCommand
        dbCommand.CommandText = queryString
        dbCommand.Connection = dbConnection

        Dim dbParam_strSet As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strSet.ParameterName = "@strSet"
        dbParam_strSet.Value = strSet
        dbParam_strSet.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strSet)
        Dim dbParam_strName As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strName.ParameterName = "@strName"
        dbParam_strName.Value = strName
        dbParam_strName.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strName)
        Dim dbParam_strColor As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strColor.ParameterName = "@strColor"
        dbParam_strColor.Value = strColor
        dbParam_strColor.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strColor)
        Dim dbParam_strCost As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strCost.ParameterName = "@strCost"
        dbParam_strCost.Value = strCost
        dbParam_strCost.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strCost)
        Dim dbParam_strType As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strType.ParameterName = "@strType"
        dbParam_strType.Value = strType
        dbParam_strType.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strType)
        Dim dbParam_strPowtgh As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strPowtgh.ParameterName = "@strPowtgh"
        dbParam_strPowtgh.Value = strPowtgh
        dbParam_strPowtgh.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strPowtgh)
        Dim dbParam_strRules As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strRules.ParameterName = "@strRules"
        dbParam_strRules.Value = strRules
        dbParam_strRules.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strRules)
        Dim dbParam_strFlavor As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strFlavor.ParameterName = "@strFlavor"
        dbParam_strFlavor.Value = strFlavor
        dbParam_strFlavor.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strFlavor)
        Dim dbParam_strRarity As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strRarity.ParameterName = "@strRarity"
        dbParam_strRarity.Value = strRarity
        dbParam_strRarity.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strRarity)
        Dim dbParam_strArtist As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
        dbParam_strArtist.ParameterName = "@strArtist"
        dbParam_strArtist.Value = strArtist
        dbParam_strArtist.DbType = System.Data.DbType.StringFixedLength
        dbCommand.Parameters.Add(dbParam_strArtist)

        dbConnection.Open()
        Try
            dbCommand.ExecuteNonQuery()
        Finally
            dbConnection.Close()
        End Try
    End Sub
So im passing this all the right variables, but its falling over any ideas why guys? please help this is almost mission critical