<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<link rel="stylesheet" href="../../style.css">
<title>
Gambas Documentation - How To Display a Chinese Character
</title>
</head>
<body>
<table class="none" width="100%" cellpadding="0" cellspacing="0" border="0">
<tr><td align="left">
<font size="-1">
<a href="../../help%3Fen"><img class="flag" alt="Home" border="0" src="../../img/lang/en.png" align="center"></a>&nbsp;&nbsp;
<a href="../howto%3Fen">Up</a>&nbsp;&nbsp;
<a href="../howto%3Fen">Previous</a>&nbsp;&nbsp;
<a href="compile%3Fen">Next</a>&nbsp;&nbsp;
</td></tr></table>
<div class="notab">
<h1>
How To Display a Chinese Character
</h1>
<div class="gray"><font color="white" size="-2"><b>Example</b></font></div>
<pre class="example">
PUBLIC SUB Button4_Click()
DIM i AS Integer
DIM k AS Integer
DIM m AS Integer
DIM c[7] AS Integer
DIM s AS String

s = &quot;&quot;
i = 20320 ' Code for the ni character in HTML = &20320;
k = 0
m = 0
IF i &lt; &amp;H00000080&amp; THEN
  c[0] = i + 0
  k = 1
  m = 0
ELSE
  IF i &lt; &amp;H00000800&amp; THEN
    m = &HC0
  ELSE
    IF i &lt; &amp;H00010000&amp; THEN
      m = &amp;HE0
    ENDIF
  ENDIF
  c[k] = i MOD 64
  k = k + 1
  i = i  64
  WHILE i &gt; 0
    c[k] = i MOD 64
    k = k + 1
    i = i  64
  WEND
ENDIF

k = k - 1
s = s &amp; Chr$(c[k] + m)
WHILE k > 0
  k = k - 1
  s = s &amp; Chr$(c[k] + 128)
WEND

' The character is now coded as a three byte UTF-8 Code

TextBox1.Text = s

END</pre>
<p>
<hr><b>See also</b><br>
<a href="../def/utf8%3Fen">UTF-8</a>&nbsp;&nbsp;

</div>
<hr>
</body>
</html>

