與SELECT CASE和MOD

Question

工作請一些基本的語法

我需要做的是檢查由4

這種劃分的一些剩餘的聲明幫助是邏輯：

if the remainder of SOMETHING when divided by 4 is 1 then do this 
if the remainder of SOMETHING when divided by 4 is 2 then do this 
etc etc 

我可以得到這個SELECT CASE ..MOD格式請

Answer 1

我想是的，你可以這樣做：

Dim rem As Integer = number MOD 4 

Select Case rem 
    Case 0 
     '....' 
     Exit Select 
    Case -3, 1 
     '....' 
     Exit Select 
    Case -2, 2 
     '....'  
     Exit Select 
    Case -1, 3 
     '....'  
     Exit Select 
End Select