主题：[求助]

大侠：

     我建了一张“项目跟踪表”，其中有一字符型字段“团队”，要加载“团队”内容为"公司业务拓展二部" 的记录，运行以后没有任何记录，不知是什么原因？（表中是有若干条符合条件的记录的），有关代码如下，请您指点。谢谢！

Dim fil As String
Dim na As String =  "公司业务拓展二部" 
fil = " [团队] = ' & na  &  ' "
DataTables("项目跟踪表").loadfilter = fil
DataTables("项目跟踪表").load()

谢谢！

老师：

      运行了以下代码，出现了“无效列名‘sjriqi2’” ,请问如何修改？谢谢！

    Dim sjrq As Date = cdate(sjriqi2)              'sjriqi2的格式是yyyy-mm-dd
    Dim cmd As new SQLCommand
    cmd.CFONT-FAMILY: 宋体; mso-ascii-font-family: Verdana; mso-hansi-font-family: Verdana">公司管理"             '使用的是sql server 2008数据源
    cmd.CommandText = "Delete f rom {公司存款明细} where CONVERT(varchar(100), [日期], 23) = sjriqi2 "             '[日期]是DATE型字段
    cmd.ExecuteNonQuery()

老师：

      运行了以下代码，出现了“无效列名‘sjriqi2’” ,请问如何修改？谢谢！（以此提问为准）

    Dim sjrq As Date = cdate(sjriqi2)              'sjriqi2的格式是yyyy-mm-dd
    Dim cmd As new SQLCommand
    cmd.CFONT-FAMILY: 宋体; mso-ascii-font-family: Verdana; mso-hansi-font-family: Verdana">公司管理"             '使用的是sql server 2008数据源
    cmd.CommandText = "Delete f rom {公司存款明细} where CONVERT(varchar(100), [日期], 23) = sjriqi2 "             '[日期]是DATE型字段
    cmd.ExecuteNonQuery()

老师：

      运行了以下代码，出现了“无效列名‘sjriqi2’” ,请问如何修改？谢谢！ 第三行变了内容，以以下为准。

    Dim sjrq As Date = cdate(sjriqi2)              'sjriqi2的格式是yyyy-mm-dd
    Dim cmd As new SQLCommand
    cmd.Con nection Name = "公司管理"             '使用的是sql server 2008数据源
    cmd.CommandText = "Delete f rom {公司存款明细} where CONVERT(varchar(100), [日期], 23) = sjriqi2 "             '[日期]是DATE型字段
    cmd.ExecuteNonQuery()

请教：

      在窗口建了一个ComboBox控件，其绑定了一个数据表的日期型字段，点击该控件后显示的日期最早的内容，如果要选择最近的日期需要拖动滚动条，

请问如何点击该控件后显示日期最近的内容，而不要拖动滚动条。

       谢谢！