回 帖 发 新 帖 刷新版面

主题:vbscript 循环

大家好 看一下这个程序哪儿有错误
<form name="form1">
<input type="text" name="text1">
<input type="button" name="bas" value="almashtur">


</form>
<script language="vbscript">
sub bas_onclick()
dim a
a=document.form1.text1.value
for i=65 to 97
a=replace(a,Chr("&i&"),"!",1,20,1)
msgbox(a)
next
end sub

</script>

我想把输入的每一个字母换掉"!"
大家看一下!~!

回复列表 (共2个回复)

沙发

a=replace(a,Chr(i),"!",1,20,1)

板凳

谢谢~~~~~~~~我为什么没有改改那个地方 啊~~???

我来回复

您尚未登录,请登录后再回复。点此登录或注册