VB中case用法

''            Select Case .Process
''                Case "AOI"
''                    varData(0, 1, 0) = IIf(.GdNg = "Y", "Pass", "NG")
''                    varData(0, 0, 1) = .WrkStation
''                Case "ICTATE"
''                    varData(1, 1, 0) = IIf(.GdNg = "Y", "Pass", "NG")
''                    varData(1, 0, 1) = .WrkStation
''                Case "FI"
''                    varData(2, 1, 0) = IIf(.GdNg = "Y", "Pass", "NG")
''                    varData(2, 0, 1) = .WrkStation
''                Case "FCT"
''                    varData(0, 1, 0) = IIf(.GdNg = "Y", "Pass", "NG")
''                    varData(0, 0, 1) = .WrkStation
''            End Select

posted @ 2020-10-21 09:10  它的眼角开过光  阅读(1438)  评论(0编辑  收藏  举报