如何写段代码查看ASCII码?

架构之路 2005-05-25 09:41:47
就用信息显示出来,代码应该如何写?

马上结贴
...全文
67 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
唐古拉山 2005-05-25
  • 打赏
  • 举报
回复


'Text1.MultiLine = True
'Text1.ScrollBars = 2

Private Sub Command1_Click()
Dim i As Integer
Text1.Text = ""
For i = 0 To 127
Text1.Text = Text1.Text & "ASCII " & i & " 为" & " " & Chr(i) & vbCrLf
Next
End Sub


Wenking003 2005-05-25
  • 打赏
  • 举报
回复
Asc(string)--返回一个 Integer,代表字符串中首字母的字符代码.

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧