VFP中如何将表的中某一字段相同属性值合并,其他字段属性保留生成不同结构的新表。急急急!
表A:
姓名 序号 科目
王 1 数学
王 2 语文
李 3 英语
李 4 化学
杨 5 物理
表B:
姓名 科目1 科目2 科目 3 序号1 序号2 序号3 序号4
王 数学 语文 空 1 2 空 空
李 英语 化学 空 3 4 空 空
杨 物理 空 空 5 空 空 空 展开
你这格式好像不对
如果是我下面两图的情况,那么,代码送上
代码如下:
Create Cursor lsb (dw c(6),dm c(4),sj N(5))
Insert Into lsb Values ([学生A],[语文],100)
Insert Into lsb Values ([学生A],[数学],200)
Insert Into lsb Values ([学生A],[英语],300)
Insert Into lsb Values ([学生A],[物理],400)
Insert Into lsb Values ([学生A],[化学],500)
Insert Into lsb Values ([学生B],[语文],600)
Insert Into lsb Values ([学生B],[数学],700)
Insert Into lsb Values ([学生B],[英语],800)
Insert Into lsb Values ([学生B],[物理],900)
Insert Into lsb Values ([学生B],[化学],970)
brow
Select dw,Sum(Iif(dm=[语文],sj,0)) As 语文,Sum(Iif(dm=[数学],sj,0)) As 数学,;
SUM(Iif(dm=[英语],sj,0)) As 英语,Sum(Iif(dm=[物理],sj,0)) As 物理,;
SUM(Iif(dm=[化学],sj,0)) As 化学 From lsb ;
GROUP By dw
你又是科目又是序号,你用EXCEL表格的形式描述清楚点吧,我上面的代码你删一行记录,比如我里面的学生A的任一科应该也能返回,只是那科是空值
怎么写呢。。。
create table 表B(姓名 c(8),科目1 c(10),科目2 c(10),序号c(5),序号2 c(5),序号3 c(5),序号4 c(5))
use 表A in 0
select 表A
index on 姓名 to a1
do while !eof()
xm = 姓名
select 表B
append blank
replace 姓名 with 表A.姓名
select 表A
i = 1
do while !eof() and 姓名=xm
j=alltrim(str(i))
select 表B
replace 科目&j with 表A.科目,序号&j with 表A.序号
select 表A
skip
i = i+1
enddo
enddo