Hatalı Textbox veya comboboxa gitme

[hsayar]

Sorum kodların arasındaki 'kırmızı satırlarda
yardımlarınız için teşekkür ederim

Private Sub CommandButton19_Click()

If cb_isl.Value = "T" And cb_stk.Value <> "T" Then
MsgBox "Stok Kodunuda ""T"" Yapınız"
[color="red"]'burada cb_stk comboboxuna gidecek[/color]
Exit Sub
End If

If Txt_Tut.Value = "" Or Txt_Tut.Value < 1 Then
MsgBox "İşlem Tutarı Hatalı veya Boş bırakılamaz"
[color="red"]'burada txt_tut textboxuna gidecek[/color]
Exit Sub
End If

 

[Haluk]

[COLOR=red]cb_stk.setfocus

[/COLOR]

 

[hsayar]

teşekkür ederim hocam