主题：ComboBox的问题??(已解决)

通过单元格输入与通过ComboBox的输入得到的结果是不同的...
表After.Edit里这段代码在ComboBox里应该如何表达?
if e.col.name = "入院诊断" then
 if e.row("入院诊断") > "" then
   dim a as string
   a = e.row("入院诊断")
    if a.indexof(":") > -1 then
      dim b as integer
         b = a.indexof(":")
         a = a.substring(b+1)
     e.row("入院诊断")  = a
    end if
 end if
end if


此主题相关图片如下：001.jpg


此主题相关图片如下：002.jpg


此主题相关图片如下：003.jpg


此主题相关图片如下：004.jpg

改成这样放哪里啊?好象哪里都会报错....
dim a as string = e.form.Controls("ComboBox1").value
    if a.indexof(":") > -1 then
      dim b as integer
         b = a.indexof(":")
         a = a.substring(b+1)
e.form.Controls("ComboBox1").value = a
         end if