21481.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 23 行

HTML
23
字号
<html>  <head>    <title>Re: 中文字内码</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 中文字内码</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:6796@geocities.com">Nelson</a> on November 20, 1999 at 10:06:29:<p>In Reply to: <a href="21474.html">Re: 中文字内码</a> posted by 纪文和 on November 19, 1999 at 19:19:09:<p>: 用三个 TextBox / 一个 CommandButton 来做练习<br>: 在 Text1 中输入一个中文,按下 Command1<br>: 在 Text2 及 Text3 显示内码<p>: Private Sub Command1_Click()<br>:   Dim bcode() As Byte<br>:   bcode = StrConv(Text1.Text, vbFromUnicode)<br>:   Text2 = bcode(0)<br>:   Text3 = bcode(1)<br>: End Sub<p>: <a href="http://www.ruentex.com.tw/vbguide" target="_blank">VB入门网</a><p><br>太感谢您了...<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 21481--></ul><!--end: 21481--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?