若要实现在某记录的最后一个控件上按下Tab键后,光标会移至下一个记录的第一个文本框,则应在窗体
A.记录锁定
B.记录选定器
C.滚动条
D.循环
A.记录锁定
B.记录选定器
C.滚动条
D.循环
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内[说明]
设有一张学生成绩表scores存放在Access数据库Student中,其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用ADO Data和DataGrid控件实现了对成绩数据的基本管理,其操作包括:
(1)添加新记录:单击“添加”按钮,光标将指向最后一条数据记录,在其后编辑好新的数据记录后,再单击“更新”按钮,该数据即被加入成绩表;
(2)删除记录:单击“删除”按钮将删除当前所指记录,其后的数据记录依次上移;
(3)更新记录:直接编辑某条已有记录,再单击“更新”按钮将更新成绩表;
(4)记录排序:选中单列字段后,单击“排序”按钮,记录集将按该字段升序排列。
程序的运行界面为:
在开发过程中,数据库连接对象使用了名为Adodc1的ADO Data控件,数据显示区域使用了名 DataGnd1的DataGrid控件,界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、CmdUpdate、 CmdRefresh、CmdSort和CmdExit。
[Visual Basic代码]
Dim conn, database, table As String
Private Sub Form_Load()
database ="E:\Student.mdb" ’设置要访问的数据库
conn ="Provider=Microsoft.Jet.OLEDB.4.0;Data Souse=" & database
Adodc1.ConnectionString=conn ’设置连接字符串
table = "scores"
Adode1. (1)= table ’设置所要访问的数据表
Set DataGrid1. (2)= Adodc1
End Sub
Private Sub CmdAdd_Click() ’“添加”按钮的单击事件响应过程
Adodc1.Recordset. (3)
End Sub
Private Sub CmdDel_Click() ’“删除”按钮的单击事件响应过程
Adodc1.Recordset.Delete
Adodc1.Reeordset.MoveNext
End Sub
Private Sub CmdUpdate_Click() ’“更新”按钮的单击事件响应过程
Adode1.Reeordset.UpdateBatch adAffectAll
End Sub
Private Sub CmdRefresh_Cliek() ’“刷新”按钮的单击事件响应过程
Adodc1.Refresh
End Sub
Private Sub CmdSort_Cliek() ’“排序”按钮的单击事件响应过程
If DataGrid1.SelStartCol < 0 Or DataGridl. SelStartCol (4) DataGrid1. SelEndCol Then
MsgBox “请选择某一字段(列)!”
Exit Sub
End If
Adodc1. RecordSource = "SELECT * FROM" & table & "order by" & _
DataGrid1. Columns((5)).DataField
Adodc1.Refresh
End Sub
Private Sub CmdExit_Click() ’“退出”按钮的单击事件响应过程
End
End Sub
A.自定义动画
B.幻灯片切换
C.超链接
D.动作路径
A、如果要选定多张连续幻灯片,在幻灯片浏览视图下,单击选定第一张幻灯片,按下SHIFT键并单击最后要选定的幻灯片。
B、若要选定多张不连续幻灯片,在幻灯片浏览视图下,单击选定第一张幻灯片,按CTRL键单击其余各张幻灯片。
C、在幻灯片窗格中,也可以选定多个幻灯片。
D、在幻灯片窗格中,要选择多个对象,可以单击选中一个对象后,按住SHIFT键,再单击其他对象
触发事件过程则实现在 Text1 文本框中动态显示当前日期和时间。请补充完整。
Private Sub Form_Load()
Me.TimerInterval =1000
End Sub
Private Sub 【 12 】
Me!text1 = Now()
End Sub
A.公元前2世纪初
B.公元前3世纪初
C.公元前3世纪末
D.公元前2世纪末
(2)在数据库“学生管理”中建立视图“view1”,显示学生表中的所有记录,并按“出生日期”升序排序。建立表单“bd1”,在表单上添加“表格”控件显示新建立的视图的记录。