有些網友可能看過一些範例,看見Xor運算符號,可是就不知是甚麼來的,讓我為大家寫個範例:
Private Sub Command1_Click()
If 1 + 1 = 2 Xor 1 + 1 = 11 Then
MsgBox "成立!"
Else
MsgBox "不成立!"
End If
End Sub
結果為成立!因為Xor的運算是當一邊為True,一邊為False的時候則通過
本站於二零零零年創辦,以分享VB6及API程式寫作的範例、技巧為宗旨。含Visual Basic教學範例、VB心得與範例、函數介紹、自製函數、API範例、VB Script及原程式碼下載等。雖然現在已經推出了較新的VB.NET,但本站依然以VB6編程為主。 站長Dictbene和副站長thomson現在都在工作,因此很少有時間作更新,但我們會盡可能維持現有既資料。 承蒙各網友支持,本站曾於二零零二年奪得Uhome.net網站之星第四名。 本站於二零零四年因伺服器供應公司倒閉問題而停辦,直至二零零八年重新成立。
沒有留言:
張貼留言