以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]“UserCode”的类型初始值设定项引发异常  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=191863)
--  作者：洮沙
--  发布时间：2024/5/12 8:01:00
--  [求助]“UserCode”的类型初始值设定项引发异常
BeforeOpenProject  中用以下代码在启动项目时报以下错误，同样代码命令窗口测试正常？麻烦老师帮忙看一下，谢谢！

\'利用正则表达式获取IP地址
Dim a As String = "当前 IP：27.224.226.159 来自于：中国 甘肃 定西 电信"
Dim rs As String = "\\b(\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3})\\b" 
Dim rgx2 As New RegularExpressions.Regex(rs)
Dim match2 As Match = rgx2.Match(a)
Dim ipv4 As String
If match2.Success Then
    ipv4 = "【" & match2.Value & "】" 
End If 


“UserCode”的类型初始值设定项引发异常。
未将对象引用设置到对象的实例。
[此贴子已经被作者于2024/5/12 8:07:53编辑过]
--  作者：有点蓝
--  发布时间：2024/5/12 20:17:00
--  
说明不是这些代码的问题，检查其它代码