Ultimo id

[eduardo2009]

[QUOTE=gnzsoloyo;3915543]En esencia, la idea es obtnener el máximo que haya:

Código MySQL:

SELECT MAX(id) maximo
FROM tabla;
 

Y luego usarlo para bloquearla:

Código MySQL:

SELECT * FROM tabla WHERE id >(VALORMAXIMO-1) 
FOR UPDATE;
 

Estoy intentando hacerlo de esta manera pero no se como asignar el valor maximo del id a un textbox para que de ahi pueda utilizarlo???

intento con este codigo no se si estoy haciendolo bien o me estoy equivocando

Private Sub Obtener_ID()
Try
Dim cad As New MySqlConnection("Database=Pacientes;Data Source=localhost;User Id=root;Password=utan")
cad.Open()
Dim sql As String = "SELECT MAX(id) FROM generales order by id"
Dim cmd As New MySqlCommand(Sql, cad)
Dim dr As MySqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
While dr.Read
Dim value As Object = dr.Item("id")
If value IsNot DBNull.Value Then TextBox22.Text = CStr(value)
End While
dr.Close()
Catch ex As MySqlException
MessageBox.Show("Error:" & ex.Message)
Catch ex As Exception
MessageBox.Show("Error:" & ex.Message)
End Try
End Sub

Saludos y gracia spro la ayuda