Foxtable(狐表)用户栏目专家坐堂 → [讨论]這種用法:字符作數值用,能否放心?


  共有4913人关注过本帖平板打印复制链接

主题:[讨论]這種用法:字符作數值用,能否放心?

帅哥哟,离线,有人找我吗?
don
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
[讨论]這種用法:字符作數值用,能否放心?  发帖心情 Post By:2013/6/11 12:30:00 [只看该作者]


如以下字符作數值用,能否放心?是否只有VB才支持這種用法(好像C是不支持的)?

Dim s1,s2 As String
Dim lst As String() ={"PH1001","PH-208"}

For Each s1 In lst
    s2 = s1.Replace("PH","")
    If s2 < 0 Then s2 =-s2      '===>  正規寫法:  s2 =s2.Replace("-","")
    s2 = "208-" &  Format(s2*1,"000000")  '===>  正規寫法: s2 = "208-" &  Format(Val(s2),"000000")  
    Output.Show(s2)
Next

'結果:
'208-001001
'208-000208
[此贴子已经被作者于2013-6-11 14:14:22编辑过]

 回到顶部