Msgbox com foco no não

[ToPronto N'Area]

Seguinte pessoal tenho o código

If MsgBox("Deseja Imprimir o Pedido?", vbYesNo + vbQuestion, "Impressão") = vbNo Then

Unload Me

Else

'frmRelPedido.lblvalidade(6).Caption = "Orçamento válido por " & validade & " dias"

frmRelPedido.lbl_Titulo.Caption = "Pedido"

frmRelPedido.lblendereço.Caption = frmPedido.txtlclentrega.Text '

frmRelPedido.vnddr = frmPedido.txtcodigovendedor.Text

frmRelPedido.Config frmPedido.Txt(0).Text

Unload Me

End If

eu preciso q o foco venho no vbno e não no vbyes como é padrão do vb!

alguém pode me ajudar!

Valeu!

[Micheus]

eu preciso q o foco venho no vbno e não no vbyes como é padrão do vb!

ToPronto N'Area, experimente acrescentar a constante vbDefaultButton2 à informação dos botões:

If MsgBox("Deseja Imprimir o Pedido?", vbYesNo + vbQuestion +vbDefaultButton2, "Impressão") = vbNo Then

Para outras opções veja referência no msdn.

Abraços

[ToPronto N'Area]

cara muito obrigado, Valeu mesmo pela dica!

Abraços!