直接键入文本SayString "dkfhuuh36h"可以么?
测试过了,这个方式可以
Dim str
str = "dkfhu--uh36h"
length=Len(str)
for i=1 to length
KeyPress mid(str,i,1),1
next
你的意思应该是只输出前面的和后面的,中间的“——”不输出对吧?
那可以这样:
Dim str
str = "dkfhuuh36h"
length=Len(str)
for i=1 to length
if mid(str,i,1)<>"-" then
KeyPress mid(str,i,1),1
end if
next
温馨提示:答案为网友推荐,仅供参考