msgbox "Wellcome", _
VbOkCancel+VbInformation,"歡迎"
x=(Msgbox("你知道我喜歡你嗎?") _
,VbYesNo+32,"確定身份")
If x = VbYes Then
Msgbox "寶貝，我真的好愛你" & _
"我願意永遠的愛你，" & _
"不論風吹與打，天搖地動，" & _
"只要你在我身邊就好‧‧‧"
Else
Msgbox "我喜歡你ㄛ!!",64+0, _
"我喜歡你"
Msgbox "寶貝，我真的好愛你" & _
"我願意永遠的愛你，" & _
"不論風吹與打，天搖地動，" & _
"只要你在我身邊就好‧‧‧"
End If
End Sub
文章定位：
