Case后多个表达式写法

Select Case iPID
    Case "11","21","31"
        mainstrs="one"
    Case "12","22","32"
        mainstrs="two"
    Case "13","23","33"
        mainstrs="three"
    Case "14","24","34"
        mainstrs="four"
    Case else
        mainstrs=""
End Select

Case后多个表达式只在学VB时见过,还没真正去写过,今天一下子写不出来,问了同事才知道,贴出来加深下记忆^_^

评论: 0 | 引用: 0 | 查看次数: 5130
发表评论
登录后再发表评论!