Ver Mensaje Individual
  #3 (permalink)  
Antiguo 13/12/2009, 12:07
chuchufuentes
 
Fecha de Ingreso: mayo-2008
Mensajes: 353
Antigüedad: 16 años
Puntos: 3
Pregunta de vb6 a vb.net Como??

No me explique bien o NO me entendiste. Primero esto no existe: "If e.KeyCode = 13 Then cmdmodificar_Click" en VB.net 2005 winform , es de esta manera

If e.KeyCode = 13 Then cmdmodificar.PerformClick()

esto es lo que quiero hacer

Private Sub cbproveedor_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles cbproveedor.KeyDown
If e.KeyCode = 13 Then
Database.Connection = New SqlConnection(Database.strConnectionString)
Database.Connection.Open()
Database.Command = New SqlCommand
With Database.Command
.Connection = Database.Connection
.CommandType = CommandType.Text
.CommandText = "SELECT * FROM c03proveedor where c03nombre = '" & cbproveedor.Text & "'"
End With
Reader = Database.Command.ExecuteReader(CommandBehavior.Clo seConnection)
If Reader.HasRows = True Then
MsgBox("Ya existe")
Else
MsgBox("Es nuevo")
End If

End If
End Sub

donde cbproveedor es un ComboBox, pero se quiere que cuando este(ComboBox) pierda el Focus (cursor) presionando la tecla Tab, ejecute lo mismo. La idea NO es repetir todo el codigo o hacer un procedimiento, la idea es usar los recursos de VB.Net

Hice esto pero genera un error

Private Sub cbproveedor_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles cbproveedor.KeyUp
If e.KeyCode = 9 Then
cbproveedor_KeyDown()
End If
End Sub

Please Ayuda