首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

一个简单的MsgBox有关问题

2012-02-24 
一个简单的MsgBox问题我想在添加的时候(command1为不可用),单击check的时候进行如下询问:就是如果是排空车

一个简单的MsgBox问题
我想在添加的时候(command1为不可用),单击check的时候进行如下询问:就是如果是排空车,就切换到另一个界面,如果不是(就是他点错了,就还是这个界面,这个check的value值也不被选中),代码如下:
If Command1.Enabled = False Then
 i = MsgBox("是排空车吗?", 1 + 32 + 0, "警告")
  If i = 1 Then
  Unload Me
  paikongche.Show
  Else
  Check1.Value = 0
  exit sub
  End If
End If
End Sub
可是这个时候,当用户选择"否"的时候,我的本意是想,还是这个界面,check1仍然没有被选中,可是如果写了如上代码,当我令Check1.Value = 0时,又触发了一次If Command1.Enabled = False Then,所以它弹出两次询问对话框.怎么才能只询问一次,并且如果我选"否",它的check不被选中呢?

 


[解决办法]

VB.NET code
Static b As BooleanIf b Then b = Not b: Exit SubIf   Command1.Enabled   =   False   Then   i   =   MsgBox("是排空车吗?",   1   +   32   +   0,   "警告")         If   i   =   1   Then         Unload   Me         paikongche.Show         Else         Check1.Value   =   0         b = Not b        exit   sub         End   If End   If End   Sub 

热点排行