从品牌网站建设到网络营销策划,从策略到执行的一站式服务
在该按纽的单击事件编写代码:
创新互联公司拥有一支富有激情的企业网站制作团队,在互联网网站建设行业深耕10多年,专业且经验丰富。10多年网站优化营销经验,我们已为千余家中小企业提供了成都网站制作、做网站解决方案,按需求定制网站,设计满意,售后服务无忧。所有客户皆提供一年免费网站维护!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
在VB6的时候,使用:Unload me
在VB.NET里使用:Me.Close()
既然是VB.NET,那么,窗体关闭的事件,是.net framework提供的,是FormClosed事件。也是两个参数,一个object sender这个是object基类,整个.net framework都是从它派生的,一个 EventArgs e,事件处理基类,一切事件是从EventArgs基类派生出来的。
在退出按钮的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 Form2_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed
End '退出后关闭软件
End Sub
'点击关闭按钮时弹出对话框判断是否退出
Private Sub Form2_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
'经典判断关闭法
If MessageBox.Show("是否退出?", "确认", MessageBoxButtons.OKCancel, MessageBoxIcon.Question,
MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.Cancel Then
e.Cancel = True
Else
e.Cancel = False
End If
End Sub
你把该过程内的代码复制到别的地方先保存。然后把这个单击过程删除。重新点击按钮 进入事件,粘贴刚才的代码
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图