标题：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

Validating事件中
dim a as string = e.Sender.Value 
if  a.indexof(":") > -1 then
    dim b as integer
    b = a.indexof(":")
    a = a.substring(b+1)
    e.Sender.Value  = a
    e.Cancel = False
else
    e.Cancel = True
 end if