你的是sql server吧?
应该是
Dim cmd As new SQLCommand
cmd.C onnec tion Name="rsgl"
cmd.CommandText="s ele ct count(*) f rom [基本信息] where 出生时间<='10/31/1995'"
output.show(cmd.ExecuteScalar())
Access的话:
Dim cmd As new SQLCommand
cmd.C onnec tion Name="rsgl"
cmd.CommandText="s ele ct count(*) f rom [基本信息] where 出生时间<=#10/31/1995#"
output.show(cmd.ExecuteScalar())