超简单问题,送分 string()

follyfour 2004-04-28 11:28:21

'1、下面这句是不是定义了一个string的数组?
Dim ls() As String
’这句没有错误
ls = CType(share.Item("IPAddress"), String())
’奇怪的是这句能执行,然后报错:未将对象引用设置到对象的实例。
MsgBox(ls.Length)

其实说白一点,我现在好象不太会用这种数组,msdn中我没找到string()的相关资料,哪儿有个说明呢?谢谢!
...全文
29 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
follyfour 2004-04-29
  • 打赏
  • 举报
回复
问题找到了出在for each ... next循环上。
结贴,送分:)
follyfour 2004-04-28
  • 打赏
  • 举报
回复
最新的代码,还是报同样的错。

'获取网卡的详细信息
Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")
Dim share As New ManagementObject
Dim strIPInfo As String()

'调用指定的 WMI 查询并返回结果集合
For Each share In searcher.Get()

'严格的类型转换操作,DirectCast要求对象变量的运行时类型与指定的类型相同。
' strIPInfo(0) = DirectCast(share.Item("IPAddress"), String())(0).ToString()
Dim ls As String
ls = share.Item("IPAddress").GetType().ToString
MsgBox(ls)
Next share
timiil 2004-04-28
  • 打赏
  • 举报
回复
是不是要ls = CType(share.Item("IPAddress"), "System.String")
还是
ls = CType(share.Item("IPAddress"), System.Type.String)

反正差不多吧。。。把VB.NET都忘了。。。

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧