ASCII码
Posted bignine
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了ASCII码相关的知识，希望对你有一定的参考价值。
Private Sub CommandButton1_Click()
Dim s, str As String
Dim i, j, k As Long
s = Trim(Sheet1.Cells(1, 1))
str = ""
For i = 1 To Len(s)
str = str & Asc(Mid(s, i, 1)) & ","
Next i
Sheet1.Cells(2, 1) = str
End Sub
以上是关于ASCII码的主要内容，如果未能解决你的问题，请参考以下文章