我们用那张年前老乡单位发的价值一百元的超市购物卡（年后才领回来的）去超市买了很多做饭用的必备品，第二天便开始做饭。

　　前两天由老乡当大厨（有点夸张噢~~），做了一顿炖土豆、一顿炖豆腐，炖土豆味道还可以，可是炖豆腐白瞎了，不好吃。

　　后来一直是我掌勺，其实我也不会做饭，在家的时候倒是做过简单的饭菜，可是那都是好几年以前的事儿了，最近这四年多我还没做过饭呢，到目前为止我做过的饭菜有炖茄子、木须柿子、白菜炖粉条等，尤其是昨天晚上做的那个白菜炖粉条，嘿，那叫一个美呀，超好吃。

　　接下来打算买本菜谱，看看人家名厨是咋做出可口的饭菜的。

　　努力，继续努力……

function strleach(str)'过滤非法字符函数
dim tempstr
if str="" then exit function
tempstr=replace(str,chr(34),"")' "
tempstr=replace(tempstr,chr(39),"")' '
tempstr=replace(tempstr,chr(60),"")' <
tempstr=replace(tempstr,chr(62),"")' >
tempstr=replace(tempstr,chr(37),"")' %
tempstr=replace(tempstr,chr(38),"")' &
tempstr=replace(tempstr,chr(40),"")' (
tempstr=replace(tempstr,chr(41),"")' )
tempstr=replace(tempstr,chr(59),"")' ;
tempstr=replace(tempstr,chr(43),"")' +
tempstr=replace(tempstr,chr(45),"")' -
tempstr=replace(tempstr,chr(91),"")' [
tempstr=replace(tempstr,chr(93),"")' ]
tempstr=replace(tempstr,chr(123),"")' {
tempstr=replace(tempstr,chr(125),"")' }
strleach=tempstr
end function

直接引用函数即可！