【正文】 (alltrim()) and bamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==成績(jī) =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==考試時(shí)間 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 otherwise =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 endcase case alltrim()==考試時(shí)間 do case case alltrim()==選擇查詢類(lèi)別 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==姓名 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and bamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==成績(jī) =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and aamp。ziduan2amp。fuhao2+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==考試時(shí)間 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and aamp。ziduan2amp。fuhao2+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 otherwise =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and aamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 endcase otherwise do case case alltrim()==選擇查詢類(lèi)別 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==姓名 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+alltrim() and bamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==成績(jī) =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 case alltrim()==考試時(shí)間 =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 otherwise =39。sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp39。 endcaseendcase endif if _tally=0 ?? chr(7) =messagebox(對(duì)不起，無(wú)相關(guān)記錄！,48,信息窗口) endif成績(jī)查詢表單的打印預(yù)覽按鈕的click事件代碼：do case case alltrim()==姓名 do case case alltrim()==選擇查詢類(lèi)別 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where bamp。ziduan1amp。fuhao1+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==成績(jī) sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where bamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==考試時(shí)間 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where bamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp otherwise sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where bamp。ziduan1amp。fuhao1+alltrim() and aamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp endcase case alltrim()==成績(jī) do case case alltrim()==選擇查詢類(lèi)別 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==姓名 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and bamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==成績(jī) sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+val(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==考試時(shí)間 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp otherwise sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+val(alltrim()) and aamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp endcase case alltrim()==考試時(shí)間 do case case alltrim()==選擇查詢類(lèi)別 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==姓名 sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。ziduan1amp。fuhao1+ctod(alltrim()) and bamp。ziduan2amp。fuhao2+alltrim() and a學(xué)號(hào)==b學(xué)號(hào) into cursor tmp case alltrim()==成績(jī) sele a學(xué)號(hào),b姓名,a科目,a成績(jī),a考試時(shí)間,a班級(jí) from 成績(jī) a,學(xué)生基本情況 b where aamp。