请高手们帮我改一个代码

ipxf

这个代码要是搜索内容在后面的话就没问题 但是在中间的话就会多出一个空格
像这样的搜索串http://www.youdao.com/search?q=内容&ue=gbk&keyfrom=163index
帮我修改一下

Dim $I, $str
If $CmdLineRaw = "" Then
        Exit
Else
        $CmdNub = StringSplit($CmdLineRaw, " ")
        Switch $cmdline[1]
                Case "a"
                        For $I = 2 To $CmdNub[0]
                                $str &= $cmdline[$I] & " "
                        Next
                        ShellExecute("http://translate.google.cn/translate_t?hl=zh-CN#en|zh-CN|" & $str)
                Case "b"
                        For $I = 2 To $CmdNub[0]
                                $str &= $cmdline[$I] & " "
                        Next
                        ShellExecute("http://translate.google.cn/translate_t#zh-CN|en|" & $str)
                Case "c"
                        For $I = 2 To $CmdNub[0]
                                $str &= $cmdline[$I] & " "
                        Next
                        ShellExecute("http://www.youdao.com/search?q=" & $str & "&ue=gbk&keyfrom=163index")
        EndSwitch
EndIf

ipxf

没人回复...

ipxf

就是这个意思 像有道这样关键字在中间的话就有个空格
这行代码能不能简化一点啊 像这样 把后面的 ClipGet()  改一下行不行

Switch $CmdLine[1]
        Case "a"
                ShellExecute("http://translate.google.cn/translate_t?hl=zh-CN#en|zh-CN|" & ClipGet())
        Case "b"
                ShellExecute("http://translate.google.cn/translate_t#zh-CN|en|" & ClipGet())
        Case "c"
                ShellExecute("http://translate.google.cn/translate_t?hl=zh-CN#auto|zh-CN|" & ClipGet())
EndSwitch