3、综合应用题
（3）Private Sub Form_Load() '设置窗体标题
'************************* Add4 ************************ Me.Caption = tTitle.Caption
'************************* Add4 ************************ End Sub
（4）
Private Sub cItem_AfterUpdate()
'将Ldetail标签显示内容设置为所选项目名加上\内容:\
'************************* Add1 ************************* Ldetail.Caption = CItem & \内容:\
'************************* Add1 *************************
Private Sub CmdList_Click() '显示全部记录
'************************* Add2 ************************* fDetail.Form.RecordSource = \
'************************* Add2 ************************* End Sub
Private Sub CmdRefer_Click()
If Trim(Me![TxtDetail]) <> \
fDetail.Form.RecordSource = \* from tStud where \LTrim(Me.[CItem]) & \ Else
'设置提示框
'************************* Add3 ************************* MsgBox \查询项目或查询内容不能为空!!!\注意\'************************* Add3 ************************* End If End Sub
Private Sub Form_Load()
& '设置窗体标题
'************************* Add4 ************************ Me.Caption = tTitle.Caption
'************************* Add4 ************************ End Sub
第12套
1、基本操作题
（1）
（2）
（3）选定“照片”字段-删除 （4）查找-删除 （5）默认值：23 （6）