VFP大神啊……最后我再问一道……表单修改forma的题目……
发布网友
发布时间：2022-07-17 18:00
共1个回答
热心网友
时间：2023-10-08 01:59
第1题
1. SELECT Xs.xh, Xs.xm, AVG(Cj.cj) AS pjcj, MIN(Cj.cj) AS zdcj;
FROM sjk!xs INNER JOIN sjk!cj ;
ON Xs.xh = Cj.xh;
GROUP BY Xs.xh;
HAVING pjcj >= 80;
AND zdcj >= 65;
ORDER BY 3 DESC
2.（1）表单的Autocenter设置为.T.
表单的Caption设置为”My form”
表单的showwindow设置为2
（2）把文本框的Value设置为Date()，把文本框的Readonly设置为.T.
（3）SELECT DISTINCT Xs.jg FROM sjk!xs INTO CURSOR temp001
（4）this.parent.list1.rowsource='select xm from xs where jg=this.value into cursor temp002'
第2题
1. SELECT Jc.cbsmc, COUNT(Jc.isbn) as jczs, AVG(Jc.dj) as pjdj;
FROM jxsj!jc;
WHERE Jc.cbnf >= "2000";
GROUP BY Jc.cbsmc;
ORDER BY 2 DESC;
TO SCREEN
2.
（1）表单的Autocenter设置为.T.
将表单的MinButton设置为.F.，将表单的MaxButton设置为.F.
表单的showwindow设置为2
（2）两行语句分别为
if mod(i,2)=1
endfor
（3）将表格第一列（Column1）的Header1的caption设置为“学号”，并将header1的Alignment设置为“2-居中”
（4）将Command1的caption设置为” 退(\<X)出”，Click事件代码为：thisform.release
