ʱ : xx年四川职教高考信息一类高考题 - 百度文库ϿʼĶ
Уݡѡе óѧġֶΣʵִԶʾݱݡ ۺӦ ͼ8ʾĴʵ¹ܣ
?δѯѧţжաťͼ9ʾϢ ?ѧѧţжաťͼ10ʾϢ ?ȷѧţжաťͼ11ͼ12ʾϢ 벹شʵܡ עաӦıΪBirthжաťFindButtonѯѧѧţֺıΪSno ͼ8
ͼ9 ͼ10 ͼ11 ͼ12
Private Sub FindButton_ Sno. A= If A=\\
MsgBox \\ѧѧ\\ Else
Dim db As Database
set db=CurrentDb 'ɼ()Ҳɲ
SQL=\\ from ѧ where ѧ='\\ if (SQL). =0 then
2016ȫ¾Ʒ-ȫ¹ķ-ȫָд Cԭ
9 / 17
MsgBox \\ѧѧŲڣ룡\\Else B=(SQL).Fields(0) C=Weekday(B)
SQL2=\\ Ա\\ set rs=(SQL2) While Not MsgBox &\\ͬѧ\\\\ Wend case C Case vbSunday
MsgBox \\ѧ\\ͬѧ \\ Case vbmonday
MsgBox \\ѧ\\ͬѧ һ\\......'˴ȥжյ Case vbSaturday
MsgBox \\ѧ\\ͬѧ \\ End Select End If End If End Sub 96.ҳۺӦ
ͼ13һÿܼʵֵҳ뽫HTML벹ʵͼ13ʾЧ ͼ13
ǿʾĴҳHTML룬벹
2016ȫ¾Ʒ-ȫ¹ķ-ȫָд Cԭ
10 / 17
ǿʾεֵҳHTML룬ʾЧ
Ҫ˵ҳʹCSSʽַʽ 97.ۺӦ⡣
֪һ˫߰߷ʽһ˵Ϊ̰ס̡Ȱססȡذסأһ˵Ϊ
֪ijBַΪõַӦ
98.ۺӦ
ijְѧУ⽨4ÿ60̨֪ѧУѷ䵽һCIPַΪ⽫4ֵ4ͬLAN1~LAN4Уش⣺
ҪӦΪ 4ÿһеĵַΧǣ LAN1: ~; LAN2: ~; LAN3: ~; LAN4: ~; 4ڣȫΪ ʾַȫΪ ʾ㲥ַ
2016ȫ¾Ʒ-ȫ¹ķ-ȫָд Cԭ
11 / 17
ܡⲢʹǰ
ĴʡxxͨУְʦʺְԿͳһ
Ϣһרҵۺ
Ծֵڢ͵ڢ֡ڢ17ҳڢ816ҳ350֡ʱ150ӡԽԾʹһء ڢ ע
1.ʹ2BǦڴϽѡ𰸶ӦͿڡ 2.ڢ⣬75С⣬xxֶεȡֵΧΪ1518ֶ꣬εġЧԹԿ롣 A.>=15 OR =18 AND =15 AND =18 OR 26.ѧвѧΪ0102м¼ڲѯͼӦ롣
A.\\ (\\ C.=\\ D.=(\\27.ʹáظѯѯĽȷǡ
A.ֻʾظֵֶ B.ֶܻظ C.Զֶβɾظֵ¼ D.ֶܰ 28.Select??FromУʡԺŴΪ
2016ȫ¾Ʒ-ȫ¹ķ-ȫָд Cԭ
12 / 17