2012-07-07

VBScript函數--字元字串處理--Left取得指定字串自左算起指定字元數長度的字串

Left → 取得指定字串自左算起的指定字元數長度的字串
語法:Left(string,length)

函數字串字元數執行函數寫法結果訊息
Left123003Left("12300",3)123
Left
(如無法正常測試,建議使用IE瀏覽器)
<script language="vbscript">
  <!--
    sub run_Left()
        document.all("lblLeft").innerHTML = ""
        if isNumeric(trim(document.all("Left2").value))  then
            if CDBL(trim(document.all("Left2").value)) >=0  then
                document.all("Left3").innerHTML = "Left(" & chr(34) & document.all("Left1").value & chr(34) &_
                "," & trim(document.all("Left2").value) & ")"
                document.all("Left4").value = Left(document.all("Left1").value,trim(document.all("Left2").value))
                document.all("lblLeft").innerHTML = "已取得字串!"
            else
                document.all("lblLeft").innerHTML = "字元數=" & document.all("Left2").value & ",請輸入≧0的整數!"
                document.all("Left3").innerHTML = ""
                document.all("Left4").value = ""
                document.all("Left2").value = ""
                document.all("Left2").focus
            end if
        else
            document.all("lblLeft").innerHTML = "字元數=" & document.all("Left2").value & ",請輸入≧0的整數!"
                            document.all("Left3").innerHTML = ""
                document.all("Left4").value = ""
                document.all("Left2").value = ""
                document.all("Left2").focus
        end if
    end sub
  -->
</script>
<br />
<table>
<tbody>
<tr>
    <td>函數</td><td>字串</td><td>字元數</td><td>執行</td><td>函數寫法</td><td>結果</td><td>訊息</td>
</tr>
<tr>
    <td>Left</td>
    <td><input id="Left1" name="Left1" type="text" style="width:80px"/></td>
    <td><input id="Left2" name="Left2" type="text" style="width:25px"/></td>
    <td><input id="btnLeft" name="btnLeft" onclick="run_Left()" type="button" value="Run" /></td>
    <td><label id="Left3" name="Left3"></label></td>
    <td><input id="Left4" name="Left4" type="text" style="width:80px" readonly/></td>
    <td><label id="lblLeft" name="lblLeft"></label></td>
</tr>
</tbody> 
</table>

沒有留言:

張貼留言