vb.net Function使用
Public Function colour(ByVal Code As Int16) As Color'顏色 Select Case Code Case 1 colour = Color.White'白色 Case 2 colour = Color.Yellow'黃色 ...
