OperationBuffer = Chr("&H" & CodeLength)提示“type mismatch”

Question

写了一条语句如下
OperationBuffer = Chr("&H" & CodeLength)OperationBuffer 定义为string型，CodeLength为两个字符，例如“26”我想把两个字符“26”当十六进制的26使用，之后转成字符。使用上面的语句单步执行后，把鼠标放到CodeLength上可到CodeLength=我想要的字符，但提示错误“type mismatch”。如上所诉，如何实现呢？

Answer 1

OperationBuffer = Chr(Val(("&H" & CodeLength)))

Answer 2

谢谢！
我还想问一个问题  我用一个ado控件连接数据库与DataGrid,现在要实时刷新datagrid中的信息,不用datagrid.refresh,因为没有效果. 
  我采用刷新ado的方法,代码如下: 
  当我单步执行时,没问题.连续运行就提示"无法为更新定位行,一些值可能已在最后一次读取后已更改". 
每次只有一行更新   
  问题出在Adodc1.Refresh上,如果单步执行,速度不时很快,就没问题. 是不是用了Adodc1.RecordSet.MoveNext ,后面再用Adodc1.Refresh不行啊? 
  
  Private Sub Command1_Click() 
    Do While Adodc1.RecordSet.EOF = False 
              Adodc1.RecordSet.Fields("Status").Value = 1 
              Adodc1.RecordSet.MoveNext 
              Adodc1.Refresh 
    Loop 
    Unload Me 
  End Sub