[AP] messagebox

If (Messagebox("請確認是否要同步?", 36, "Warning") <> 6) Then
'//選擇 no ，就會執行exit sub
Exit Sub
End If

boxType& = 4+32
answer% = Messagebox("請問您是否確定要將此單據作廢?", boxType&, _ 
"Are you sure?")
If answer% = 7 Then
Exit Sub
End If