避免控件变量在赋值前被使用?!

angelayang 2009-02-28 03:12:40
你们怎样避免控件变量在赋值前被使用?
又不给进行Nothing 判断,象下面这样还是被警告的。

Dim A As GroupBox
If A IsNot Nothing and GroupBox.name="MyGroupBox" Then
'some thine
End If
结果我就添加了一个完全没有使用的空的GroupBox。名为“EMPTYGroupBox"

再这么干:
Dim A As GroupBox
A=EMPTYGroupBox
If GroupBox.name="MyGroupBox" Then
'some thine
End If

除此有什么高招吗?


...全文
99 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
pjagz 2009-03-03
  • 打赏
  • 举报
回复
Dim A As GroupBox = Nothing
If A IsNot Nothing And A.Name = "MyGroupBox" Then
'some thine
End If
'------------------------------
Dim A As New GroupBox
If A.Name = "MyGroupBox" Then
'some thine
End If
yuxi007 2009-02-28
  • 打赏
  • 举报
回复
楼主定义了A来引用EMPTYGroupBox,但是EMPTYGroupBox本身并没有初始化,这样,不单是警告,运行时还要出错的

而且看楼主的代码有些混乱啊
xue1234567890 2009-02-28
  • 打赏
  • 举报
回复
1楼说的正确。。。
不初始化会报错的。。。
Bullatus 2009-02-28
  • 打赏
  • 举报
回复
Dim A As GroupBox 这样是没有初始化的,Dim A As New GroupBox 就不会了

16,549

社区成员

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

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