标题:找不带变量
取消只看楼主
左左975
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2020-4-14
结帖率:0
已结贴  问题点数:20 回复次数:0 
找不带变量
各位大佬!我在做学校的成绩分析表单,运行表单的时候一直找不到变量 kcbh
在form1上:
Combo1 的click过程
public bjbh,kcbh
bjjc=
sele 班级号名
  bjbh=班级编号
kcmc=
sele 课程
  kcbh=课程编号
Combo2 的click过程:
public bjbh,kcbh
kcmc=
sele 课程
  kcbh=课程编号
命令按钮“确认”的click过程:
n=thisform.pageframe1.activepage &&n存放当前页面的页码
sele 学生选课
  set filter to substr(bjbh,2,8)=substr(学号,3,8) and kcbh=课程编号
*分段计算成绩  
count to s
count to  s_40 for 成绩<40
count to  s40_49 for 成绩>=40 and 成绩<50
count to s50_59 for 成绩>=50 and 成绩<60
count to s60_69 for 成绩>=60 and 成绩<70
count to s70_79 for 成绩>=70 and 成绩<80
count to s80_89 for 成绩>=80 and 成绩<90
count to s90_100 for 成绩>=90 and 成绩<=100
*统计各段百分比
if s#0
   bs_40=s_40/s*100
   bs40_49=s40_49/s*100
   bs50_59=s50_59/s*100
   bs60_69=s60_69/s*100
   bs70_79=s70_79/s*100
   bs80_89=s80_89/s*100
   bs90_100=s90_100/s*100
else
store 0 to bs_40,bs40_49, bs50_59,bs60_69,bs70_79,bs80_89, bs90_100
endif
do case
case n=1   &&当前页面若为第1页,则计算各分数段人数与百分比的数据
  *显示分段数量和百分比
  thisform.pageframe1.page1.text1.value=s_40
  thisform.pageframe1.page1.text3.value=s40_49
  thisform.pageframe1.page1.text5.value=s50_59
  thisform.pageframe1.page1.text7.value=s60_69
  thisform.pageframe1.page1.text9.value=s70_79
  thisform.pageframe1.page1.text11.value=s80_89
  thisform.pageframe1.page1.text13.value=s90_100
  thisform.pageframe1.page1.text2.value=round(bs_40,2)
  thisform.pageframe1.page1.text4.value=round(bs40_49,2)
  thisform.pageframe1.page1.text6.value=round(bs50_59,2)
  thisform.pageframe1.page1.text8.value=round(bs60_69,2)
  thisform.pageframe1.page1.text10.value=round(bs70_79,2)
  thisform.pageframe1.page1.text12.value=round(bs80_89,2)
  thisform.pageframe1.page1.text14.value=round(bs90_100,2)
case n=2
**暂不输入这里的程序段,留待Page2设计好后再增加
endcase

运行表单的时候一直显示找不到变量kcbh。跪求原因啊!!!
搜索更多相关主题的帖子: 成绩 for value count thisform 
2020-04-14 21:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-501046-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.108864 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved