按键精灵 变量问题

我的代码如下

For 2  '循环两次

    z="" '新的一行，每一次循环之前，把输出的内容清空一下

    '获取剪贴板信息

    Clipboard = Plugin.Sys.GetCLB()
    Delay 20
    MsgBox "复制得到的内容：" & Clipboard

    '剪贴板上的文字去除=======================================

    '复制序列号的代码你自己写吧,假设这儿字符串赋给了x,下面是个例子,过滤掉中文和空格,你适当修改下,有问题就追问好了
    x=Clipboard '字符串包含数字,空格,符号,大小写字母,汉字
    n = Len(x)
    i = 1
    For n
        y = Mid(x, i, 1)'获取每一个字符
        m = Asc(y)'查询字符的asc码
        If m >0 and m<>32 Then '汉字的asc都小于0,空格的asc是32,此时不录入z
            z=z & y
        End If
        i=i+1
    Next
    MessageBox z '输出过滤后的字符串

Next  '循环结束

3行，添加一句清空

25行，输出的是z，而不是a，这个应该是你打印错误

希望对你有帮助 ^o^