
4个回答
2013-04-16
展开全部
在退出按钮的Click事件中用Unload Me就可以关闭窗体。
Private Sub Command1_Click()
Unload Me
End Sub 答案补充 代码就是我回答那些了,双击按钮把代码输入进去就行了。对了,你的是VB6还是VB.Net啊?VB6就是用Unload Me,如果是VB.Net应该用Me.Close()。
这个是VB.Net的代码:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
Private Sub Command1_Click()
Unload Me
End Sub 答案补充 代码就是我回答那些了,双击按钮把代码输入进去就行了。对了,你的是VB6还是VB.Net啊?VB6就是用Unload Me,如果是VB.Net应该用Me.Close()。
这个是VB.Net的代码:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
展开全部
退出按钮?指的是关闭按钮么?就是窗体最右上角的X?
Sub Form_Unload()
End Sub
Form 改成你自己的form名儿。。。。
Sub Form_Unload()
End Sub
Form 改成你自己的form名儿。。。。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-04-16
展开全部
哦 这个我知道 的就在里面写 Application.Exit();这个是推出整个程序的
this.Visible是隐藏当前页还是存在的 答案补充 还有就是 thi.close 是关闭当前页
this.Visible是隐藏当前页还是存在的 答案补充 还有就是 thi.close 是关闭当前页
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Form_Unload(Cancel As Integer)Dim s As Integer
s = MsgBox("是否退出?", vbYesNo)
If s = 7 Then '点击否
Cancel = 1
End If
End Sub
是这个意思?
s = MsgBox("是否退出?", vbYesNo)
If s = 7 Then '点击否
Cancel = 1
End If
End Sub
是这个意思?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询