jacky789 发表于 2007-3-26 00:36:00

[求助]按下何键？

<p>如何让cad vba中知道我连续二次按下"esc"钮..</p><p>而自动跳开funtion呢？？</p><p>&nbsp;</p>

wyj7485 发表于 2007-3-26 17:39:00

<p>关于该问题有个api函数</p><p>Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer<br/>Private Const VK_ESCAPE = &amp;H1B</p><p>.......</p><p>If GetAsyncKeyState(VK_ESCAPE) Then<br/>........</p><p>End If</p>

jacky789 发表于 2007-3-26 23:58:00

[讨论]

本帖最后由 作者 于 2007-3-27 0:03:44 编辑 <br /><br /> <p>我用了一下～～</p><p>key不能放於此第一行会无动作!</p><p>input integer 1</p><p>input integer 2</p><p>input integer 3</p><p>若放於第三行则在第一或第二行有esc key动作时查不出来仍继续执行下行</p><p>若想要1 or 2 or 3 行任一行有esc key时即动作要如何修改呢？？</p><p>不应是每行下都放一个吧？!!??</p><p></p>

wyj7485 发表于 2007-3-27 08:23:00

每行下都放一个
页: [1]
查看完整版本: [求助]按下何键？