segunda-feira, 29 de agosto de 2011

on

Dim sair As Integer
        sair = MsgBox("Tem certeza que deseja encerrar.", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Atenção")
        If sair = vbYes Then
            End
        Else
            e.Cancel = True
        End If

0 comentários:

Postar um comentário

:) :)) ;(( :-) =)) ;( ;-( :d :-d @-) :p :o :>) (o) [-( :-? (p) :-s (m) 8-) :-t :-b b-( :-# =p~ $-) (b) (f) x-) (k) (h) (c) cheer
Click to see the code!
To insert emoticon you must added at least one space before the code.