如何删除文本内带"."号后面的字节
如题:
有两个文本
如:text1.text=12345.456789
则
text2.text=12345
如:text1.text=abcdef.g则
text2.text=abcdef
即是所有带"."后的字节全部删除
问题点数：20、回复次数：3Top
1 楼Jameszht（湖泊）回复于 2002-11-12 11:43:30 得分 5
dotPos=instr(text1.text)
text2=left(text1.text,dotPos-1)Top
2 楼Rogal（俊逸）回复于 2002-11-12 12:01:50 得分 5
dim i as integer
i = instr(1,text1.text,".")
text2.text=lenft(text1.text,i)
Top
