资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net按esc退出 c++按esc键退出程序

vb编程时Esc键不能退出窗体

将窗体的属性KeyPreview设置为True:

10多年专注成都网站制作,成都企业网站定制,个人网站制作服务,为大家分享网站制作知识、方案,网站设计流程、步骤,成功服务上千家企业。为您提供网站建设,网站制作,网页设计及定制高端网站建设服务,专注于成都企业网站定制,高端网页制作,对成都除甲醛等多个领域,拥有丰富的网站建设经验。

Option

Explicit

Private

Sub

Form_KeyPress(KeyAscii

As

Integer)

If

KeyAscii

=

27

Then

'如果按的键是Esc,

End

'那么退出程序

End

If

End

Sub

Private

Sub

Form_Load()

Me.KeyPreview

=

True

End

Sub

问一下在VB中设置用enter与esc键设置确认 退出、

“确定”和“取消”是两个很笼统的词,电脑再智能,它也不可能知道你脑子里想要的“确定”或“取消”究竟是什么样的效果以及实现的步骤。所以你肯定要通过编程告知电脑“确定”时要做什么,“取消”时又要做什么。VB给按钮增加Default和Cancel属性,是为了让按钮与键盘建立快捷联系,并不是说只要把按钮的Default或Cancel属性设为True,按钮就自动具有“确认”或“取消”功能了,真是这样的话,那编程就太简单啦!

其实,Default的意思是“默认”,当窗体上有多个按钮同时存在时,如果其中某个按钮的Default属性设为True,它就成为“默认按钮”。而几乎所有人都习惯把回车键作为执行键(就像火箭发射时的点火按钮),因此当按下回车键时,程序就会自动触发这个“默认按钮”,相当于你用鼠标点击了这个按钮,但是,具体要执行什么仍然是需要你在这个按钮的事件过程(一般是Click事件)中进行编程的。

同理,Cancel表示“取消”,通常人们都习惯用Esc键来表示取消某种操作,因此VB就通过Cancel属性把某个按钮与Esc键建立联系,按Esc键就相当于点击了这个按钮。当然,具体要“取消”什么(关闭窗体、取消修改等)是要你通过编程才能实现的,甚至乎可以与“取消”完全不沾边!

一个按钮同时把Default和Cancel属性都设为True是可以的,这样的话,按回车键会触发这个按钮,按Esc键也会触发这个按钮。

但是,在同一个窗体中,最多只能有一个按钮的Default属性设为True,Cancel属性也一样。

vb怎样表示“长按”某个键,如ESC退出键?

'窗体获得焦点才有效,如果无焦点可以使用api函数,自己修改

Option Explicit

Const settime = 1 '这里设置延迟1s

Dim keyup As Boolean, keydown As Boolean

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 27 And Not keydown Then

keyup = False

keydown = True

delaymessage

End If

End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

If KeyCode = 27 Then

keyup = True

keydown = False

End If

End Sub

Function delaymessage()

Dim t, flag As Boolean

t = Timer

Do

If keyup Then Exit Do '未到时间放掉Esc键

If Timer - t = settime Then

flag = True

Exit Do

End If

DoEvents

Loop

If flag Then

Print "时间已到:" settime '可以用msgbox,但由于长安esc后msgbox显示后马上又消失,这里只是一个功能,给你用print做显示

flag = False

End If

End Function

VB如何按下Esc快速退出当前运行的游戏

1,建立一个菜单项

2,在菜单编辑器中设置这个菜单项不显示

3,在菜单编辑器中设置这个菜单项的快捷键是ESC.

4,在这个菜单项的代码中,输入结束程序的代码.


当前名称:vb.net按esc退出 c++按esc键退出程序
网站URL:http://cdkjz.cn/article/dosocgd.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

大客户专线   成都:13518219792   座机:028-86922220