VB怎样选择读取文本框中的数据？

来源：百度知道 编辑：UC知道 时间：2024/05/26 16:56:57
如:文本框的内容为(12时08分)怎样将12赋值给EHour,8赋值给EMin
我记得有一个函数，含什么left right从某个字符左边 右边 读取，但具体函数记不清了！

dim iHour%
iHour = instr(文本框.text,"时")
if iHour <> 0 then
EHour = val(left(文本框.text,iHour-1))
EMin = val(Replace(mid(文本框.text,iHour+1),"分",""))
end if

dim s as string,ehour as integer,eminute as interge
s=text1.text
ehour=val(left(s,2))
eminute=val(right(s,2))