combobox

[JonathanB]

Es esto lo que necesitas?

Código vb:

Private Sub Command1_Click()
    Dim iRespuesta As Integer
    
    iRespuesta = MsgBox("Algo", vbYesNo)
    If iRespuesta = vbYes Then
        'Click en Si
    Else
        'Click en No
    End If
 
End Sub