如题所述
单个扩展ASCII字符(128~255)以及个别控制字符在文本框中无法显示。
Private Sub Command1_Click()
Text1 = ""
For i = 0 To 255
Text1 = Text1 & Chr(i) & ":" & i & " "
If i Mod 10 = 9 Then Text1 = Text1 & vbCrLf
Next i
End Sub
温馨提示:答案为网友推荐,仅供参考
如题所述
单个扩展ASCII字符(128~255)以及个别控制字符在文本框中无法显示。
Private Sub Command1_Click()
Text1 = ""
For i = 0 To 255
Text1 = Text1 & Chr(i) & ":" & i & " "
If i Mod 10 = 9 Then Text1 = Text1 & vbCrLf
Next i
End Sub
本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网