VB编写自动按键

先按Z两下中间间隔1秒然后按空格再间隔一秒按回车然后停顿5秒然后一直循环很简单的请高手们帮我写个代码!!~谢谢!我没分就帮我一个忙吧能不能。。发代码... 先按Z两下 中间间隔1秒 然后按空格 再间隔一秒按回车 然后停顿5秒 然后一直循环 很简单的
请高手们帮我写个代码 !!~谢谢!我没分 就帮我一个忙吧
能不能。。发代码
展开
 我来答
a65702300
2009-07-01 · TA获得超过260个赞
知道小有建树答主
回答量:826
采纳率:0%
帮助的人:289万
展开全部
在窗体上放一个文本框text1,其multiline 属性值设为True,scrollbars属性值设为2,然后再放3个定时器控键timer1,timer2,timer3,代码如下,你看这样行不

Option Explicit: Dim kaiguan1 As Boolean, a As String, kaiguan2 As Boolean

Private Sub Form_Load()
Timer1.Interval = 5000
Timer2.Interval = 1000
Timer3.Interval = 1000
Text1 = ""
End Sub

Private Sub Timer1_Timer()
a = a & "zz"
Text1 = a
kaiguan1 = True
End Sub

Private Sub Timer2_Timer()
If kaiguan1 = True Then
a = a & " "
Text1 = a
kaiguan1 = False
kaiguan2 = True
End If
End Sub

Private Sub Timer3_Timer()
If kaiguan2 = True Then
a = a & vbCrLf
Text1 = a
kaiguan2 = False
End If
End Sub
AiPPT
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图... 点击进入详情页
本回答由AiPPT提供
djy443fx13
2009-07-01 · TA获得超过762个赞
知道小有建树答主
回答量:324
采纳率:0%
帮助的人:219万
展开全部
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByValdwMilliseconds As Long) 'Sleep的API申明
________________________________
代码部分
sendkeys "z"
sleep 1000
sendkeys "z"
sleep 5000
sendkeys "{enter}"
_________________________________
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
meiren777
2009-07-01 · 超过81用户采纳过TA的回答
知道小有建树答主
回答量:448
采纳率:0%
帮助的人:314万
展开全部
我有一个vb做的现成的键盘按键模拟软件,你说的功能全部能在我那个软件里面找到,安逸得很qq358378880发给你
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
chenxfsoft
2009-07-01 · TA获得超过1381个赞
知道大有可为答主
回答量:2418
采纳率:0%
帮助的人:1879万
展开全部
sendkeys
sleep
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式