TC官方合作论坛

标题: 求那位大神改一个这个代码！ [打印本页]

作者: wiewie9 时间: 2013-3-5 20:18
标题: 求那位大神改一个这个代码！
按键精灵的代码，本人搞了半天也没换成TC的代码！TC新手！！

Dim a
a="991"
Rem aa
  Rem k
  Key = WaitKey()
   If Key = 27 Then //Ese键开始

SayString "TC"&a
Delay 200

  KeyPress "Tab", 1
Delay 200

SayString "998"
Delay 200
  KeyPress 13, 1
a = a + 1

   End If
      If key = 115 Then    //F4入上一次内容
      a=a-1
      SayString "TC"&a
   Delay 200

      KeyPress "Tab", 1
   Delay 200

      SayString "998"
   Delay 200

      KeyPress 13, 1
      a=a+1

   End If
   Goto k

  SayString "TC"&a
Delay 200
  KeyPress "Tab", 1
Delay 200
  SayString "998"
Delay 200
  KeyPress 13, 1
a = a + 1
Goto  aa

作者: honge10000 时间: 2013-3-5 20:28
哥们。。按键精灵没学过的有很多，你得把这每行的意思给表达出来。。

如果有懂按键的来翻译最好。。。。。。。。。

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)