【正文】
屬性窗口進行設置 (2) 可在代碼中進行設置或修改五、操作題(本大題共4小題,共35分)98.看圖操作題(4分) (1)右擊“我的電腦”,出現(xiàn)快捷圖標;(2)單擊“屬性”;出現(xiàn)“系統(tǒng)屬性”對話框;(3)選擇“自動更新”選項卡;(4)選擇“下載更新,但是由我來決定什么時候安裝”,單擊“應用”。9操作填空:(6分)收件人: 文本域( 單行) 主題: 文本域( 單行) 添加附件: 文件域 正文: 文本域(多行) 發(fā)送: 提交按鈕 重置: 重置按鈕 100.設有如下結(jié)構(gòu)的“學校易耗品登記”數(shù)據(jù)表,寫出實現(xiàn)以下要求的SQL語句(,共15分)1)select * from 學校易耗品登記 where 部門=”計財辦” and year(領(lǐng)取時間)=2009 (2)select count(*) as 領(lǐng)取人次 from 學校易耗品登記 where 部門=”計財辦” (3)select 部門,sum(數(shù)量*單價) as 總金額 from 學校易耗品登記 group by 部門 (4)select 部門, sum(數(shù)量) as 領(lǐng)取數(shù)量 from 學校易耗品登記 where 物品名=“紅筆芯” group by 部門 (5)insert into 學校易耗品登記 values(“雙面膠”,2,”應杰”,”汽修辦”,10/28/2009) (6)update 學校易耗品登記 set 單價= where 物品名=”垃圾袋”101. 根據(jù)以下網(wǎng)頁顯示效果和要求,用HTML語言設計一個網(wǎng)頁文件。(10分)htmlheadtitle網(wǎng)頁學習/title/headbodyh1 align=”center”font face=”楷體_gb2312” color=”red”學習安排表/font/h1p align=”center”img src=”img/” width=”100” height=”60”/phr align=”center” size=”2” width=”60%”table align=”center” width=”60%” border=”2”tr align=”center” tdfont face=”黑體” size=”4”課程/font/td tdfont face=”黑體” size=”4”課時/font/td tdfont face=”黑體” size=”4”任課教師/font/td/trtr align=”center” td rowspan=”2”ASP網(wǎng)站設計br(動態(tài)網(wǎng)頁)/td td rowspan=”2”10/td tda href=”mailto: lilaoshi@”李老師/a/td/trtr align=”center” td趙老師/a/td/tr/table/body/html六、VB設計題(本大題共3小題,共35分)102. (8分)(1)設計應用程序界面:新建工程,在窗體繪制1個標簽,2個框架和2個控件數(shù)組,并將對象調(diào)整至合適大小和位置。(2)設置對象屬性(具體如下表)對象名稱屬性名屬性值對象名稱屬性名屬性值Label1captionVisual Basic 程序設計Form1Caption字體修飾font二號數(shù)組option1Caption粗體/斜體數(shù)組check1Caption宋體/楷體Frame1Caption字體樣式Frame2Caption字體(3)編寫代碼Private Sub Check1_Click(Index As Integer)If Index = 0 Then = Not If Index = 1 Then = Not End SubPrivate Sub Option1_Click(Index As Integer)If Index = 0 Then = 宋體If Index = 1 Then = 楷體_gb2312End Sub103. (12分)(1)設計應用程序界面:新建工程,在窗體繪制2個命令按鈕、1個標簽、1個時鐘,并將對象調(diào)整至合適大小和位置。(2)設置對象屬性(具體如下表)對象名稱屬性名屬性值對象名稱屬性名屬性值Command1caption開始Command2caption開始Label1left0enabledfalsecaption祝您考試成功Timer1interval100font楷體、粗體、二號enabledfalseforecolor紅色Form1caption字幕滾動(3)編寫代碼Private Sub Command1_Click() = True = False = TrueEnd SubPrivate Sub Command2_Click() = False = True = FalseEnd SubPrivate Sub Timer1_Timer() = + 100If Then = 0End Sub104.(15分)(1) 新建工程(2)添加窗體Form1(3)屬性設置如下:對象名屬性名稱屬性值Command1nameCmd1caption計算Command2NameCmd2caption清空Text1text“”Text2text“”Text3text“”multilinetruescrollbars2Lable1Caption至Label2caption間的素數(shù)為程序代碼如下:通用段: Private Sub Cmd1_Click()Dim x As IntegerDim y As Integerx = y = If x y Then x = t: t = y: y = x For i = x To y flag = 1 For j = 2 To i 1 If i Mod j = 0 Then flag = 0 Next j If flag = 1 Then = amp。 i amp。 vbCrLf Next i End SubPrivate Sub Cmd2_Click() = = = End Sub