Visual Basic - Problema al autogenerar

Hola a todos, soy nueva en esto y estoy utilizando SQL Server como BD en la aplicación VB y el problema que tengo es al momento de hacer clic en mi cmdnuevo, quisera que mi nuevo código se autogenere sólo, yo coloco esto :
CargarRegistros rscot, "Cotizacion"
Dim NCOD As String
NCOD = "select max(codcotizacion) + 1 from cotizacion"
Set rscot = cn.Execute(NCOD)
pero me sale error...cuando trabajo con el recordcount, me sale ok..pero no quisiera trabajar con el recordcount por algunos motivos...quisiera que me ayuden por favor a autogenerar un código nuevo mediante la sentencia arriba mostrada.

Gracias de mamera anticipada

strCmd = "SELECT MAX(codcotizacion) FROM cotizacion "
rst.CursorLocation = adUseClient
Set rst = cn.Execute(strCmd)

b = rst(0) + 1
'acá tenemos el valor del próximo registro, que se guardará en otro recordset

Gracias Fernando por él código....me ayudaste...uffff...un montón.....te pasaste..!!!...si necesitas algo también avísame plss...me gustaría ayudarte también..;-)..hasta pronto.