| 发表于:2007-02-16 19:26:426楼 得分:5 |
祝楼主:祝楼主及各位vb朋友新年快乐,万事如意! if instr(属相, "猪 ")> 0 then goto 酒楼 else goto 农家乐 endif 酒楼: mainmenu= "米饭 "& "酒 "& "饺子 " submenu(1)= "猪头 " submenu(2)= "猪身 " submenu(3)= "猪身 " submenu(4)= "猪尾 " submenu(5)= "鱼 "& "虾 "& "螃蟹 "& "鸡 "& "鸭 "& "香肠 "& "腊肉 "& "others " for hours=1 to 24 麻将=麻将+1 地主=地主+1 双扣=双扣+1 围棋=围棋+1 唱歌=唱歌+1 跳舞=跳舞=1 . . . next hours exit sub 农家乐:mainnenu= "红米饭 "& "南瓜汤 "& "野菜 " submenu= "土豆烧牛肉 " exit sub | | |
|