中英对译问题

Question

我现在有一份资料表，表的内容是某项用料的中文名和用文名。由于系统比较特殊，也就是不管任何操作用户当他输入中文用料名后自动译英文，当他输入英文名自动译英文，请问如何做？

Answer 1

if asc(left(text1.text,1)) > 0 then '输入的是英文
   '搜索英文字段
   '**********************
   '**********************
else  '输入的是中文
   '搜索中文字段
   '**********************
   '**********************
end if