把c=inputbox("悄然代号","提示","是")及以后的代码改为:dim idoc=inputbox("悄然代号","提示","是")select case ccase 1i = msgbox("你是嘻嘻",1+32,"")case 2msgbox "你是嘻嘻",1+32,""end selectloop while i = 2