如何将vb中的字符串转换成ascii码
答案:1 悬赏:40
解决时间 2021-01-19 11:13
- 提问者网友：孤凫
- 2021-01-18 11:13
如何将vb中的字符串转换成ascii码
最佳答案
- 二级知识专家网友：笑迎怀羞
- 2021-01-18 11:42
Dim i As Integer, str As String, ascstr As String
str = InputBox("请输入字符串")
For i = 1 To Len(str)
ascstr = ascstr & CStr(Asc(Mid(str, i, 1)))
Next i
Print ascstr
str = InputBox("请输入字符串")
For i = 1 To Len(str)
ascstr = ascstr & CStr(Asc(Mid(str, i, 1)))
Next i
Print ascstr
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息