VBScript函數--字元字串處理--asc取得ascii值

asc → 取得ASCII值(如果參數值帶入一字串，只取字串的第一個字元轉成ASCII值)

函數	參數	執行	函數寫法	函數值	訊息
asc	a		asc("a")	97
asc

(如無法正常測試，建議使用IE瀏覽器)

<script language="vbscript">
  <!--
    sub run_func()
            document.all("txt2").value = "asc(" & chr(34) & document.all("txt1").value & chr(34) & ")"
            document.all("txt3").value = asc(document.all("txt1").value)
            document.all("lbl").innerHTML = "執行成功！"
    end sub
  -->
</script>
<br />
<table>
<tbody>
<tr>
    <td>函數</td><td>參數</td><td>執行</td><td>函數寫法</td><td>函數值</td><td>訊息</td>
</tr>
<tr>
    <td>asc</td>
    <td><input id="txt1" name="txt1" size="3" type="text" /></td>
    <td><input id="btn1" name="btn1" onclick="run_func()" type="button" value="執行" /></td>
    <td><input id="txt2" name="txt2" size="10" type="text" readonly /></td>
    <td><input id="txt3" name="txt3" size="5" type="text" readonly /></td>
    <td><label id="lbl" name="lbl"></label></td>
</tr>
</tbody></table>