请解释一下这个VB语句中switch的作用与Do while语句的用法。
VB\u4e2d\u5173\u4e8e: for ...to,\u548cDO WHILE....LOOP\u8bed\u53e5\u7684\u7528\u6cd5for ...to,\u7528\u5728\u77e5\u9053\u5faa\u73af\u6b21\u6570\u7684\u65f6\u5019\u6bd4\u8f83\u65b9\u4fbf
DO WHILE....LOOP \u7528\u5728\u5728\u5faa\u73af\u65f6\u5224\u65ad\u6761\u4ef6\uff0c\u6761\u4ef6\u6ee1\u8db3\u6267\u884c\uff0c\u4e0d\u6ee1\u8db3\u5c31\u9000\u51fa
\u4f8b\u5982\u4f60\u8981\u8ba1\u7b971\uff0b2\uff0b3\uff0b...+100\u7684\u503c\u5219\u7528for to
\u8981\u8ba1\u7b971\uff0b2\uff0b3\uff0b4\uff0b5\uff0b...\u4ec0\u4e48\u65f6\u5019\u5927\u4e8e1000\uff0c\u5e76\u8fd4\u56de\u6700\u540e\u4e00\u4e2a\u6570\u65f6\u7528DO WHILE....LOOP
VB \u91cc\u7684 select \u8bed\u53e5\u548c C++ \u91cc\u7684 switch \u8bed\u53e5\u76f8\u540c\uff0c\u4e0d\u8fc7 \u6bcf\u4e00\u4e2a"Case"\u7ed3\u675f\u65f6\u65e0\u9700 \u3002
\u76f8\u5bf9\u4e8e if \u8bed\u53e5\u800c\u8a00\uff0cswitch \u8bed\u53e5\u53ef\u4ee5\u66f4\u65b9\u4fbf\u5730\u5e94\u7528\u4e8e\u591a\u4e2a\u5206\u652f\u7684\u63a7\u5236\u6d41\u7a0b\u3002C89 \u6307\u660e\uff0c\u4e00\u4e2a switch \u8bed\u53e5\u6700\u5c11\u53ef\u4ee5\u652f\u6301 257 \u4e2a case \u8bed\u53e5\uff0c\u800c C99 \u5219\u8981\u6c42\u81f3\u5c11\u652f\u6301 1023 \u4e2a case \u8bed\u53e5\u3002\u7136\u800c\uff0c\u5728\u5b9e\u9645\u5f00\u53d1\u73af\u5883\u4e2d\uff0c\u4e3a\u4e86\u7a0b\u5e8f\u7684\u53ef\u8bfb\u6027\u4e0e\u6267\u884c\u6548\u7387\uff0c\u5e94\u8be5\u5c3d\u91cf\u51cf\u5c11 switch \u8bed\u53e5\u4e2d\u7684 case \u8bed\u53e5\u3002\u9664\u6b64\u4e4b\u5916\uff0cswitch \u8bed\u53e5\u4e0e if \u8bed\u53e5\u4e0d\u540c\u7684\u662f\uff0cswitch \u8bed\u53e5\u53ea\u80fd\u591f\u6d4b\u8bd5\u662f\u5426\u76f8\u7b49\uff0c\u56e0\u6b64\uff0ccase \u8bed\u53e5\u540e\u9762\u53ea\u80fd\u662f\u6574\u578b\u6216\u5b57\u7b26\u578b\u7684\u5e38\u91cf\u6216\u5e38\u91cf\u8868\u8fbe\u5f0f\uff1b\u800c\u5728 if \u8bed\u53e5\u4e2d\u8fd8\u80fd\u591f\u6d4b\u8bd5\u5173\u7cfb\u4e0e\u903b\u8f91\u8868\u8fbe\u5f0f\u3002
\u6269\u5c55\u8d44\u6599
\u5728 switch \u8bed\u53e5\u4e2d\uff0cdefault \u8bed\u53e5\u4e3b\u8981\u7528\u4e8e\u68c0\u67e5\u9ed8\u8ba4\u60c5\u51b5\uff0c\u6216\u8005\u5904\u7406\u9519\u8bef\u60c5\u51b5\uff0c\u5982\u4e0b\u9762\u7684\u793a\u4f8b\u4ee3\u7801\u6240\u793a\uff1a
default:
printf("error\n");
break;
\u5982\u679c\u5728 switch \u8bed\u53e5\u4e2d\u53bb\u6389 default \u8bed\u53e5\uff0c\u90a3\u4e48 switch \u8bed\u53e5\u5c06\u5931\u53bb\u5bf9\u9ed8\u8ba4\u60c5\u51b5\u4e0e\u9519\u8bef\u60c5\u51b5\u7684\u5904\u7406\u80fd\u529b\u3002\u6240\u4ee5\uff0c\u5949\u529d\u5927\u5bb6\u4e0d\u8981\u5077\u61d2\uff0c\u8001\u8001\u5b9e\u5b9e\u628a\u6bcf\u4e00\u79cd\u60c5\u51b5\u90fd\u7528 case \u8bed\u53e5\u6765\u5b8c\u6210\uff0c\u800c\u628a\u771f\u6b63\u5bf9\u9ed8\u8ba4\u60c5\u51b5\u7684\u5904\u7406\u4ea4\u7ed9 default \u8bed\u53e5\u6765\u5b8c\u6210\u3002\u5373\u4f7f\u7a0b\u5e8f\u771f\u7684\u4e0d\u9700\u8981 default \u5904\u7406\uff0c\u4e5f\u5e94\u8be5\u4fdd\u7559\u6b64\u8bed\u53e5\uff1a
default:
break;
\u8fd9\u6837\u505a\u5e76\u975e\u753b\u86c7\u6dfb\u8db3\uff0c\u53ef\u4ee5\u907f\u514d\u4ee4\u4eba\u8bef\u4ee5\u4e3a\u662f\u5fd8\u8bb0\u4e86 default \u5904\u7406\u3002
用法如下：
Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])
在串列中，最先为 TRUE的值 会被返回。expr必要参数，要加以计算的 Variant 表达式。value 必要参数。如果相关的表达式为 True， 则返回此部分的数值或表达式，没有一个表达式为 True， Switch 会返回一个 Null值。
与Do while语句是作为循环语句用的。
Do {while |until} condition ' while 为当型循环， until为直到型循环，顾名思义，不多说啦
Statements
Exit do
Statements
Loop 或者使用下面语法 Do ' 先 do 再判断，即不论如何先干一次再说
Statements
Exit do
Statements
Loop {while |until} condition
绛旓細Call 璇彞 灏嗘帶鍒舵潈杞Щ鍒颁竴涓 Sub 杩囩▼锛孎unction 杩囩▼锛屾垨鍔ㄦ佽繛鎺ュ簱 (DLL)杩囩▼銆傝娉 [Call] name [argumentlist]Call 璇彞鐨勮娉曞叿鏈変互涓嬪嚑涓儴鍒嗭細閮ㄥ垎 鎻忚堪 Call 鍙夊弬鏁帮紱鍏抽敭瀛椼傚鏋滄寚瀹氫簡杩欎釜鍏抽敭瀛楋紝鍒 argumentlist 蹇呴』鍔犱笂鎷彿锛屼緥濡傦細Call MyProc(0)name 蹇呰鍙傛暟锛岃璋冪敤鐨勮繃绋嬪悕绉般
绛旓細濡傛灉涓涓猚ase鏍囩鍐呯殑绋嬪簭涓嶅寘鍚玝reak璇彞锛岄偅涔堢▼搴忓湪鎵ц瀹杩欎釜case鏍囩鍐呯殑璇彞鍚庡皢鎺ョ潃鎵ц涓嬩竴涓猚ase鏍囩鍐呯殑璇彞銆傜瓑浠蜂簬if璇彞涓鐨別lse缁撴瀯鐨勬槸default鏍囩锛宒efault鍐呯殑璇彞灏嗚鎵ц锛屽鏋滄病鏈変换浣曚竴涓猚ase鏍囩琚尮閰嶆墽琛屻傛暣缂栧湪瑙ｉ噴switch缁撴瀯/璇彞鐨勭敤娉曪紝闅忎究鎵炬湰涓枃C璇█缂栫▼鐨勪功锛屾煡switch鐨...
绛旓細鍦ㄥ奖鐗囦腑鍙劅鐨勮搴﹀緢澶氥傚氨涓閮ㄥ奖鐗囪岃█锛屽彲浠ヤ粠涓婚銆佷汉鐗┿佺粏鑺傘佸満闈璇█绛夋柟闈㈠叆鎵嬶紱灏卞閮ㄥ奖鐗囨潵璇达紝鏈夌殑渚ч噸浜庢濇兂鍐呭锛屾湁鐨勪晶閲嶄簬琛ㄧ幇褰㈠紡锛屾湁鐨勬埅鍙栧奖鐗囩殑鏌愪釜鍦洪潰銆佹煇涓簨浠躲傗滄劅鐐光濈殑閫夋嫨锛屽悇鍏风壒鑹诧紝鍙祫鍊熼壌銆傚啓鐢靛奖瑙傚悗鎰燂紝瑕侀夋嫨濂借搴︺備竴绡囧嚑鐧惧瓧鐨勮鍚庢劅锛屽閲忓緢灏忥紝鑰屼竴閮ㄧ數...
