Aktivere en Button-funktion med Enter i en Textbox

Sæt knappens default-egenskab til true. Så er det den der aktiveres ved enter.

mvh
kaffe

Fedt nok... Tak for \"Kaffe\"

Hvad nu hvis der er flere knapper ??? Giver der ikke problemer ????

Der kan kun være en default-knap. De andre knapper må du aktivere med musen.
Du kan også lave det på denne måde:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode = 13 Then Command1_Click
End Sub

Private Sub Command1_Click()
  MsgBox Text1.Text
End Sub

Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then Command2_Click
End Sub

Private Sub Command2_Click()
  MsgBox Text2.Text
End Sub

Keycode 13 er Enter. Så kan du selv bestemme hvad der skal ske når der trykkes på enter.

mvh
kaffe