以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数值问题,请教下老师  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43128)

--  作者:mamuaiqing
--  发布时间:2013/11/30 2:09:00
--  数值问题,请教下老师
比如一个整数为:124565   ,不管这个整数几位数,它的最后一位都等于0,除非它的最后一位为0,这个代码要怎么写?
--  作者:Bin
--  发布时间:2013/11/30 8:54:00
--  
Dim s As String= "123456"
If s(s.length-1)="0" Then
  MessageBox.show(s)
Else
  MessageBox.show(s.Substring(0,s.length-1) & "0")
End If

--  作者:mamuaiqing
--  发布时间:2013/12/1 0:41:00
--  
感谢Bin老师