VB 输出所有Ascii字符和对应的编码
问题描述:
VB 输出所有Ascii字符和对应的编码
前面是这样,后面不会了..请指教
private sub form_click()
for i =33 to 127
print tab (j*8+1)
print chr(i)&"-"&i
.
答
Private Sub Picture1_Click()Dim asc As Integer, i%Picture1.Print "ASC码对照表"For asc = 32 To 126Picture1.Print Tab(8 * i + 2); Chr(asc); "="; asc; '8表示每...