最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
VBS 中 Space 函数的应用
时间:2022-07-02 23:25:30 编辑:袖梨 来源:一聚教程网
很多时候我们需要生成 重复的 N 个字符
一般人都会使用这样的方法
<%
Dim i, n, subString
n = 10
For i = 0 TO n
subString = subString & " "
Next
Response.Write(subString)
%>
其实是忽略了 VBS 里一个极有用的函数 Space
下面我用 Space 和 Replace 来实现上例功能
<%
Dim n, subString
n = 10
subString = Space(n)
subString = Replace(subString, " ", " ")
Response.Write(subString)
%>
如果你想更简单点的话 可以自己写个函数 比如
<%
Function SpacePlus(ByRef repeatString, ByRef repeatNumber)
SpacePlus = Replace(Space(repeatNumber), " ", repeatString)
End Function
Response.Write(SpacePlus(" ", 10))
%>
一般人都会使用这样的方法
<%
Dim i, n, subString
n = 10
For i = 0 TO n
subString = subString & " "
Next
Response.Write(subString)
%>
其实是忽略了 VBS 里一个极有用的函数 Space
下面我用 Space 和 Replace 来实现上例功能
<%
Dim n, subString
n = 10
subString = Space(n)
subString = Replace(subString, " ", " ")
Response.Write(subString)
%>
如果你想更简单点的话 可以自己写个函数 比如
<%
Function SpacePlus(ByRef repeatString, ByRef repeatNumber)
SpacePlus = Replace(Space(repeatNumber), " ", repeatString)
End Function
Response.Write(SpacePlus(" ", 10))
%>
相关文章
- poipiku网站如何打开-poipiku官网网页版访问入口 01-06
- uc网盘网页版官方入口-UC网盘网页版快捷登录 01-06
- 全免费影视软件哪个最好用-全免费电视电影软件推荐 01-06
- 悟空浏览器怎样直接打开网页-悟空浏览器一键直达网页技巧分享 01-06
- 谷歌google官方入口-Google官方网站入口 01-06
- 漫画天堂最新版本下载入口-漫画天堂官方正版下载入口汇总 01-06