1
use a1
index to 学号 tag xh
use b1
index to 学号 tag xh
clear all
use a1 in 1 order xh
use b1 in 2 order xh
set rela to xh into b1
?a1.学号,a1.姓名,a1.性别,b1.指导老师,b1.论文题目
2
use 学生
index to 学号 to xuehao
index to 姓名 tag xm
index to 入学成绩 tag rxcj
3
do a1.mpr
do a2
do form a3
REPORT FORM a4 PREVIEW
4
insert into 学生 value("20061001","张三","男",18,"08国际贸易1班")
5
sum=0
k=0
for i=1 to 100
if i % 5=0
sum=sum+i
k=k+1
endif
endfor
?"k=",k
?"sum=",sum
&&我做第5题
sum=0
k=0
for i=1 to 100
if i % 5=0
sum=sum+i
k=k+1
endif
endfor
?"k=",k
?"sum=",sum
RETURN