其实，要统计哪一天的住店人数不需要另外建表，只要两行语句就可实现。一是得到要统计的日期（这个变量可以从日期控件或者从文本框控件获取），二是统计这一天的住店人数（可以把这条命令放到按钮控件的Click事件中）。例如：
TJRQ=CTOD("2010.05.22")
SELECT COUNT(姓名) 住店人数 FROM 表一 WHERE 入住日期<=TJRQ AND 离店日期>TJRQ

受各位高手指导指点的启发，俺用非常非常老土老土的编程办法，处理表一（b01）单月发生的订房问题，以b02表作为过渡表，产生最后b03表，b01表结构是 (ss n(4),xm c(10),rz d(8),ld d(8)),b02表的结构是b02 (ss n(4),xm c(10),rz d(8),ld d(8)ms1 n(1),ms2 n(1).......ms31 n(1))。现把代码呈现，请各位高手指导：
close all
  clear
  use b03
  dele
  pack
  use b02
  dele all
  pack
  copy stru to b03
  close all
  use b01
  repl all ss with 0
  go top
  scan
  i=1
  do while .not. eof( )
  skip
  repl ss with i+1
  i=i+1
  enddo
  endscan
  go top
  repl ss with 1
    
  close all
  clear
    
  use b01
  FOR K=1TO 50（可以根据条目数量调整）
    
  use b02
  dele all
  pack
  append from b01 for ss=K  
    
  use b02   
  FOR i=day(rz)to (day(ld)-1)
  repl ms01 with 1 for i=1
  repl ms02 with 1 for i=2
  repl ms03 with 1 for i=3
  repl ms04 with 1 for i=4
  repl ms05 with 1 for i=5
  repl ms06 with 1 for i=6
  repl ms07 with 1 for i=7
  repl ms08 with 1 for i=8
  repl ms09 with 1 for i=9
  repl ms10 with 1 for i=10
  repl ms11 with 1 for i=11
  repl ms12 with 1 for i=12
  repl ms13 with 1 for i=13
  repl ms14 with 1 for i=14
  repl ms15 with 1 for i=15
  repl ms16 with 1 for i=16
  repl ms17 with 1 for i=17
  repl ms18 with 1 for i=18
  repl ms19 with 1 for i=19
  repl ms20 with 1 for i=20
  repl ms21 with 1 for i=21
  repl ms22 with 1 for i=22
  repl ms23 with 1 for i=23
  repl ms24 with 1 for i=24
  repl ms25 with 1 for i=25
  repl ms26 with 1 for i=26
  repl ms27 with 1 for i=27
  repl ms28 with 1 for i=28
  repl ms29 with 1 for i=29
  repl ms30 with 1 for i=30
  repl ms31 with 1 for i=31
  endfor
  use b03
  append from b02
  endfor
  use b03
  brow
    

请各位朋友继续讨论,发表高见,谢谢.

你好.我是全职网赚工作者.
如果你有时间有电脑.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ908889846