返回列表 发帖

主题
0 
积分
854 
贝壳
854 个 
性别
男 
来自
贵州遵义 
注册时间
2005-3-26 
最后登录
2011-2-26 

技术勋章热情勋章勤劳勋章
楼主 跳转到 »
chinanic发表于 2007-9-9 01:14 | 显示全部帖子
  1. sub LastReceived(someone)

  3. select case time

  5.      case 上午:replace(最后回帖人,*,'流浪的逍遥'）
  6.      case 下午:replace(最后回帖人,*,'小草')
  7.      case 晚上:replace(最后回帖人,*,'烟霞')

  9.      default:replace(最后回帖人,*,someone)

  11. end select
  12. end sub

  14. Call LastReceived("chinanic")
复制代码
天行健，君子以自强不息
地势坤，君子以厚德载物
黑色海岸线欢迎您
QQ群：7212260
致力于探索WEB技术精髓：http://www.bitechcn.com
点这里加我！

TOP

返回列表 回复 发帖