VB中sendkeys怎么让它只执行一次？
写自制记事本的撤销功能，代码如下：PrivateSubmnuUndo_Click()SendKeys"^z"EndSub执行以后就会不断重复撤销重做，怎么让它只撤销一次...
写自制记事本的撤销功能，代码如下： Private Sub mnuUndo_Click() SendKeys "^z" End Sub 执行以后就会不断重复撤销重做，怎么让它只撤销一次
展开
展开全部
自定义一个变量啊，用过就不执行就行了。
Dim undo As Integer
Private Sub Form_Load()
undo = 0
End Sub
Private Sub mnuUndo_Click()
If undo = 0 Then
SendKeys "^z"
undo = 1
End If
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
