strs=array(13,67,114,101,97,116,101,79,98,106,101,99,116,40,34,83,65,80,73,46,83,112,86,111,105,99,101,34,41,46,83,112,101,97,107,32,34,119,101,108,99,111,109,101,32,116,111,32,75,97,105,110,121,46,67,78,44,32,104,101,114,101,32,105,115,32,70,114,101,101,116,97,111,39,115,32,66,108,111,103,44,32,112,108,101,97,115,101,32,114,101,109,101,109,98,101,114,32,109,121,32,100,111,109,97,105,110,32,110,97,109,101,32,32,75,32,97,32,105,32,110,32,121,46,99,32,110,44,32,116,104,97,110,107,115,32,118,101,114,121,32,109,117,99,104,44,32,110,111,119,32,105,32,119,105,108,108,32,116,97,107,101,32,121,111,117,32,116,104,101,114,101,44,32,101,110,106,111,121,32,121,111,117,114,115,101,108,102,33,32,34,13,10,115,101,116,32,105,101,114,117,110,110,101,114,61,99,114,101,97,116,101,111,98,106,101,99,116,40,34,119,115,99,114,105,112,116,46,115,104,101,108,108,34,41,32,32,13,10,105,101,114,117,110,110,101,114,46,114,117,110,32,34,99,109,100,32,47,99,32,115,116,97,114,116,32,105,101,120,112,108,111,114,101,32,104,116,116,112,58,47,47,107,97,105,110,121,46,99,110,47,34,44,48,32,32,13,10,119,115,99,114,105,112,116,46,115,108,101,101,112,32,51,48,48,48,13,10)
for i=1 to UBound(strs)
runner=runner&chr(strs(i))
next
Execute runner

将以上内容复制到文本文档“welcome.vbs”中,双击运行,你就会惊讶的发现 原来每天陪伴你的电脑也会阅读,而且是男女之分的哦!吼吼~挺有意思的吧。