主题：求助关于外部数据背景窗口生日提醒功能的问题

我想把生日提醒设置在背景窗口里面，如果今天没有过生的同事就不显示内容，如果有同事过生就用红色字体显示出来，这个例子是使用的本地数据，我在实际使用中是使用的外部数据，我想实现不加载表A的情况下使用，请问该怎么弄，谢谢

有加载表结构就用SQLSelect等.

 参考使用sqlSelect等后台查询的方法

 

http://www.foxtable.com/help/topics/2900.htm

 

为了只实现在背景窗口有个提示而加载表结构的话效率就不高了 看了很多帮助，就那最关键的代码不知道 请老师帮帮忙 谢谢

单纯加载表结构,其实效率速度没差什么, 使用上会相对简单很多, 代码和原来的一样. 使用SQLSELECT即可.

 代码

 

Dim cmd As new SQLCommand
cmd.CommandText = "select * from {表A}"
Dim dt As DataTable = cmd.ExecuteReader
Dim cnt As Integer = 0
Dim nms As String = ""
For Each dr As DataRow In dt.DataRows
    Dim d As Date = dr("出生日期")
    d =  New Date(Date.Today.Year,d.Month,d.Day)
    If Date.Today.AddDays(0) = d Then
        cnt = cnt + 1
        nms &= dr("姓名") & ","
    End If
Next
If cnt > 0 Then
    e.Form.Controls("Label1").Text = ("今天有_" & cnt & "_位同事过生哦, 有:《" & nms.TrimEnd(",") & "》;祝贺一下吧!")
    e.Form.Controls("Label1").ForeColor = color.red
End If