select switch语句总是搞混，总结如下
类C：c c++ c# java ： 比较 ==
switch(expression) {
case constant-expression :
statement(s);
break; /* optional */
case constant-expression :
statement(s);
break; /* optional */
default :
statement(s);
}
vb vba 比较 =
Select [ Case ] testexpression
Case expressionlist
statements
Case Else
elsestatements
End Select
delphi 比较 =
Case expression of
constant-expression :
begin
end;
constant-expression :
begin
end;
else
begin
end;
end;
