Foxtable(狐表)用户栏目专家坐堂 → String 型数据怎么转换成 Integer 型数据


  共有2974人关注过本帖树形打印复制链接

主题:String 型数据怎么转换成 Integer 型数据

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


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
String 型数据怎么转换成 Integer 型数据  发帖心情 Post By:2015/9/24 21:55:00 [只看该作者]

Dim ip_Cut As String() = (e.Form.Controls("TB_IPInput").Value).split(".")

For i As Integer = 0 To ip_Cut.Length - 1
    Messagebox.show("IP 地址段为: " &  Format(ip_Cut(j),"0000"))   '自己测试代码用
    If ( Format(ip_Cut(i),"0000")) > 255 Or ( Format(ip_Cut(j),"0000")) < 0 Then
      Messagebox.show("IP 格式错误")
      Return
    End If
Next

测试,Format(ip_Cut(i),"0000")  结果出来的全是 0000,根本不能同 数字 0 和 数字255 进行比较。
求指点,如何将String型的数据转换成Integer型.
[此贴子已经被作者于2015/9/24 22:09:23编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
15986720145
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
  发帖心情 Post By:2015/9/24 22:20:00 [只看该作者]

自己搜索,已经解决!
使用 数据转换函数,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/24 22:21:00 [只看该作者]


Dim str As String = "192.168.1.108"
Dim reg As new System.Text.RegularExpressions.Regex("^((?:(?:25[0-5]|2[0-4]\d|((1\d{2})|([1-9]?\d)))\.){3}(?:25[0-5]|2[0-4]\d|((1\d{2})|([1-9]?\d))))$")
If reg.IsMatch(str) Then
    msgbox("正确ip")
Else
    msgbox("错误ip")
End If 

 回到顶部
帅哥哟,离线,有人找我吗?
15986720145
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:146 积分:1243 威望:0 精华:0 注册:2015/8/7 16:22:00
  发帖心情 Post By:2015/9/24 22:41:00 [只看该作者]

上面的代码,看不大懂! 还是谢谢了!

 回到顶部