Tengo una tabla en SQLite:

CREATE TABLE "EventType" 
(
[EventTypeID] INTEGER PRIMARY KEY, 
[EventTypeName] VARCHAR(50) NOT NULL UNIQUE
);

Since EventTypeID es un número entero y una clave principal, que automáticamente lo convierte en una columna de incremento automático, y que funciona bien.

Me gustaría insertar una fila en la tabla y obtener el valor recientemente incrementado de VB6.

Dim oRs as Recordset
dim oCmd as new Command

oCmd.ActiveConnection = GetConnection()
oCmd.Source = "insert into EventType (EventTypeName) values ('blah')"
oCmd.Execute

¿Existe una forma automática de recuperar el EventTypeID recién creado sin tener que emitir otra consulta (seleccione max (EventTypeID) de EventType)?

Parece que recuerdo de VB6 días hace mucho tiempo, que había una manera de hacerlo.