浙江省2009年高考方案信息

浙江省普通高校招生考试改革方案正式出台。

    从该方案看，高校招生的选拔模式，将实行在全科会考基础上的分类测试、分批选拔、综合评价、全面考核、择优录取的选拔模式。这一方案也将分步实施，平稳过渡。方案说，“为使中学和社会对分类测试的选拔模式有一个适应过程，确保平稳过渡，决定分步实施分类测试选拔模式，2009年起先实施二类和三类考试科目组，待条件成熟时再启动实施一类考试科目组。”

    所谓一类二类三类考试科目组，指高考的考试科目与内容的分类。具体内容是：

    一类：考试科目为 3（语数外）＋X（文科综合/理科综合）＋自选模块。其它评价项目为综合素质测试。

    二类：考试科目为 3（语数外）＋X（文科综合/理科综合）。其它评价项目为综合素质测试。

    三类：考试科目为 3（语数外）＋技术（信息技术/通用技术）。其它评价项目为综合素质测试。

Sdafs

……

情况是这样子的:
有一数据库里面存有每个月的收入账单,现在用ComboBox控件查询数据库,如:从1998年到1999年的,并大于100000以上的数据.在text里面显示出来.请高手指点怎么写代码?


主要是怎么用条件去查询数据库...

我的程序一部分希望对你有帮助
Private Sub Command4_Click()
Dim s As String
s = XPComboBox6.Text & "-" & XPComboBox7.Text & "-" & XPComboBox8.Text
If XPComboBox6.Text = "" Then
Label10.Caption = "请输入要查找的年份!"
ElseIf XPComboBox7.Text = "" Then
Label10.Caption = "请输入要查找的月份!"
Else
If s <> "" Then
Adodc1.RecordSource = "select * from data where date like '%" & s & "%'"
Adodc1.Refresh
……

我用如下语句
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cnn = New ADODB.Connection
Set rs = New ADODB.Recordset
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=XXX.mdb;Persist Security Info=False" 'XXX.mdb为你数据库名称
rs.CursorLocation = adUseClient
rs.Open "select * from XXX", cnn, adOpenDynamic, adLockPessimistic 'XXX为你的数据表
请问要是想让一个变量等于XXX表里的第一条记录怎么写？谢谢了！

通过【Data】控件访问数据库

http://www.cndw.com/tech/data/2006041339370.asp

（1）启动VB。
（2）出现如图10.12所示的新建工程的【新建】选项卡。

（3）出现如图10.13所示的VB主界面。

（4）如图10.14所示。
……

丽水中学博客系统已经进入试用阶段，欢迎各位老师前来注册使用！