vbscript 三個數比較大小的實現代碼

    代碼如下:
    dim a,b,c
    a =inputbox ("請輸入0-99的整數且不能重復更不要用漢字和字母")
    b =inputbox ("請輸入0-99的整數且不能重復更不要用漢字和字母")
    c =inputbox ("請輸入0-99的整數且不能重復更不要用漢字和字母")
    if not(IsNUmberic(a) and IsNUmberic(b) and IsNUmberic(c)) then
    msgbox "不乖哦>_<"
    else
    if a<b then
    d=b
    b=a
    a=d
    end if
    if c>b then
    d=b
    b=c
    c=a
    end if
    if a<b then
    d=b
    b=a
    a=d
    end if
    msgbox a & " " & b & " " & c
    end if
    由于樓主只是三個數,所以不用復雜的冒泡排序法來排序,直接三個數比較就行了!tjoy7d的方法就是所謂的冒泡排序法,雖然代碼簡單,但是實際上電腦執(zhí)行起來要循規(guī)很多次,運行速度會受到影響!