调用剪贴板,在原来的剪贴板内数字里加1
//此次写输入数字2016001,然后选择目标数字,按键Ctl+C组合键将数字复制到剪贴板,按键回车。
Dim i
Clipboard = Plugin.Sys.GetCLB()
i = Round(Clipboard,0) + 1
Call Plugin.Sys.SetCLB(i)
//此次写按键Ctl+V组合键将数字粘贴到某位置,然后按键回车
//此次写输入数字025001,然后选择目标数字,按键Ctl+C组合键将数字复制到剪贴板,按键回车。
Dim i
Clipboard = Plugin.Sys.GetCLB()
i = Round(Clipboard,0) + 1
Call Plugin.Sys.SetCLB(i)
//此次写按键Ctl+V组合键将数字粘贴到某位置,然后按键回车
if Clipboard = “2016500”Then
//此处写结束
End If