摘要: Function TestFun(Tstr) TStr = "Fun2"End FunctionSub TestSub(TStr) Tstr = "Sub2"End SubDim Fun, [Sub]Fun = "Fun1"Call TestFun(Fun)Msgbox Fun '打印出来 "Fun2"Fun = "Fun1"TestFun(Fun)Msgbox Fun ' 打印出来 "Fun1"[Sub] = "Sub1"Call Tes 阅读全文
posted @ 2013-10-17 19:59 EchoSong 阅读(861) 评论(0) 推荐(0) 编辑