关于连接数据库显示汉字问题

请教一下高手！
 声明，小弟我是初学者，我想用VB连接MYSQL。起初我用的是DATA控件连接ODBC，用TEXTBOX绑定DATA显示数据表中的一项汉字！可是返回的是“？？？？”。也就是说，不能显示汉字。我该怎么设置？
  还有一个问题，我在CSDN上下载了源码！连接上了MYSQL，用的是mysql-connector-odbc-5.1.6。但是我想用data控件绑定我已经连接的数据库，请问data的connect怎么写？
  我的连接代码如下：
' 定义并创建数据库连接和访问对象
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset' 定义数据库连接字符串变量
Dim strCn As String' 定义数据库连接参数变量
Dim db_host As String
Dim db_user As String
Dim db_pass As String
Dim db_data As String' 定义 SQL 语句变量
Dim sql As String' 初始化数据库连接变量
db_host = Text1.Text
db_user = Text3.Text
db_pass = Text4.Text
db_data = Text5.Text
strCn = "DRIVER={MySQL ODBC 5.1 Driver};" & _
         "SERVER=" & db_host & ";" & _
         "DATABASE=" & db_data & ";" & _
         "UID=" & db_user & ";PWD=" & db_pass & ";" & _
         "OPTION=3;stmt=SET NAMES GB2312"' stmt=SET NAMES GB2312
' 这句是设置数据库编码方式
' 中文操作系统需要设置成 GB2312
' 这样中文才不会有问题
' 版本要求 mysql 4.1+' 连接数据库
cn.Open strCn
' 设置该属性, 使 recordcount 和 absolutepage 属性可用
cn.CursorLocation = adUseClient' 访问表users
'sql = "select * from item_template"
'rs.Open sql, cn
'MsgBox rs.RecordCountEnd Sub
还请大家赐教！谢谢