Dim a As Integer

a = MsgBox("Finestra di prova", vbYesNo, "Titolo della finestra di prova")

.... per queste domande sarebbe meglio andare a consultare l'help di VB, è tutto ben documentato..