问题 单项选择题

在其他情况相同的条件下,商业银行减少贷款、增加债券投资,能有效( )。

A.提高银行资产的流动性

B.降低银行资产组合的风险

C.提高银行资产组合的信誉水平

D.提高银行资产组合的收益率

答案

参考答案:B

单项选择题
问答题

[说明] 设有一张学生成绩表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 StringPrivate 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) = Adodc1End SubPrivate Sub CmdAdd_Click() ’“添加”按钮的单击事件响应过程 Adodc1.Recordset. (3) End SubPrivate Sub CmdDel_Click() ’“删除”按钮的单击事件响应过程 Adodc1.Recordset.Delete Adodc1.Reeordset.MoveNextEnd SubPrivate Sub CmdUpdate_Click() ’“更新”按钮的单击事件响应过程 Adode1.Reeordset.UpdateBatch adAffectAllEnd SubPrivate Sub CmdRefresh_Cliek()’“刷新”按钮的单击事件响应过程 Adodc1.RefreshEnd SubPrivate Sub CmdSort_Cliek()’“排序”按钮的单击事件响应过程 If DataGrid1.SelStartCol < 0 Or DataGridl. SelStartCol (4) DataGrid1. SelEndCol ThenMsgBox “请选择某一字段(列)!”Exit Sub End If Adodc1. RecordSource = "SELECT * FROM" & table & "order by" & _DataGrid1. Columns( (5) ).DataField Adodc1.RefreshEnd SubPrivate Sub CmdExit_Click() ’“退出”按钮的单击事件响应过程 EndEnd Sub