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 SelectCase后多个表达式只在学VB时见过，还没真正去写过，今天一下子写不出来，问了同事才知道，贴出来加深下记忆^_^
评论（0）
暂无评论。