Rem 输入字符zifu=InputBox("请输入字符")If zifu = "" Then Goto 输入字符End IfMessageBox zifu 把 MessageBox zifu 换成 SayString zifu 即可