Question

vb textbox显示数字问题

比如textbox输入159.365，然后按一下command按钮后textbox里面去除小数点，只显示159365（不管小数点在什么位置，只去除小数点）

Answer 1

a=text1.text
s=len(a)
b=instr(a,".")
c=left(a,b-1)+right(a,s-b)
text1.text=c

Answer 2

for i =1 to len(textbox.text)
k = mid (textbox.text,i,1)
if k = "." then k = ""
s =s & k
next i
textbox.text = s