VIP会员
购物车
私信
发表新帖
立即签到
关注
回复
支持(
反对( 首页上一页 1 下一页尾页 2 条记录 1/1页
Visual Basic数据库系统开发案例精选中“人力资源管理系统”中的问题
发表在VB答疑区
2006-11-17
是否精华
是
否
版块置顶:
是
否
我想问一个在“人力资源管理系统”中的问题。
在窗体main_fine中查询后要在main_gzgl_cfgl中显示查询结果，但main_gzgl_cfgl中显示结果的语句我不太明白。
Private Sub Form_Activate()
If sql1 <> "" Then
Adodc1.RecordSource = sql1
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
Else
MsgBox "没有找到符合条件的记录", , "提示窗口"
End If
End If
End Sub
上面的语句应该就是吧，在Then后面怎么没有语句就直接是Else呢，我按此代码查询后并没有在DataGrid中显示查询结果，而是所有数据。
该怎么解决这个问题呢？
谢谢！！！
在窗体main_fine中查询后要在main_gzgl_cfgl中显示查询结果，但main_gzgl_cfgl中显示结果的语句我不太明白。
Private Sub Form_Activate()
If sql1 <> "" Then
Adodc1.RecordSource = sql1
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
Else
MsgBox "没有找到符合条件的记录", , "提示窗口"
End If
End If
End Sub
上面的语句应该就是吧，在Then后面怎么没有语句就直接是Else呢，我按此代码查询后并没有在DataGrid中显示查询结果，而是所有数据。
该怎么解决这个问题呢？
谢谢！！！
分享到：
