请帮我看一下这段VB的代码

最新推荐文章于 2022-09-25 12:52:12 发布

Xujl008

最新推荐文章于 2022-09-25 12:52:12 发布

阅读量838

点赞数 1

文章标签： vb string byte

本文链接：https://blog.csdn.net/Xujl008/article/details/1331425

版权

Dim PurviewTimes As Byte
Dim strPurviewTimes As String
Dim strPurviewTimesAll As String

If lstTimes.Selected(0) = True Then PurviewTimes = &H1
If lstTimes.Selected(1) = True Then PurviewTimes = PurviewTimes Or &H2
If lstTimes.Selected(2) = True Then PurviewTimes = PurviewTimes Or &H4
If lstTimes.Selected(3) = True Then PurviewTimes = PurviewTimes Or &H8
If lstTimes.Selected(4) = True Then PurviewTimes = PurviewTimes Or &H10
If lstTimes.Selected(5) = True Then PurviewTimes = PurviewTimes Or &H20
If lstTimes.Selected(6) = True Then PurviewTimes = PurviewTimes Or &H40
If lstTimes.Selected(7) = True Then PurviewTimes = PurviewTimes Or &H80

这里的赋值怎么理解If lstTimes.Selected(1) = True Then PurviewTimes = PurviewTimes Or &H2,

Or 是什么意思呢?请高人回答?