Visual Basic.NET - Consecutivo

Hola
Mi duda es la siguiente:
Tengo un campo de una tabla en SQL SERVER 2005 que es autonumérico
Como hago en VB.net para capturar el último consecutivo, ya que si deseo borrar un registro éste no me dañe el consecutivo.
Gracias

Puse en el google: obtener ultimo valor de campo identity

Me dice: Select IDENT_CURRENT(‘tablename’)

Mas informacion:
http://www.onglasses.net/default.aspx?articuloid=7

Salu2!