复制代码 代码如下:
x=InputBox(“请输入字符“,”提示”,”Test”)
If Len(x)<>0 then
For i=1 To Len(x)
WScript.echo “字符 [” & Mid(x,i,1) & “] ansi代码为: ” & Asc(Mid(x,i,1))
Next
Else
MsgBox “请输入英文字符”,64,”提示”
End if
您可能感兴趣的文章:
- ACCESS的参数化查询,附VBSCRIPT(ASP)和C#(ASP.NET)函数
- vbs版IP地理位置查询小偷
- vbs版sql查询分析器lcx作品
- 可以查询系统用户名sid的vbs
- QueryCode.vbs 文本文件编码查询工具
- 通过IIS自带工具Iisapp.vbs查询哪个w3wp.exe站点占用资源(cpu或内存)
- VBS实现查询服务的制造商
声明：本站（华域联盟www.cnhackhy.com）所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。
评论(0)