Thinker

Personal e-notepad


    【常用VB6 TO VB.NET】方法

    Aueeins
    Aueeins
    水面上的小草

    帖子数 : 173
    积分 : 3539
    威望 : 0
    注册日期 : 2011-09-08
    地点 : SG

    【常用VB6 TO VB.NET】方法 Empty 【常用VB6 TO VB.NET】方法

    Post by Aueeins on 30/09/11, 09:38 am

    If .EOF Then
    Call MsgBox("FILTER NOT FOUND!", vbCritical)
    txtsStaffId.SetFocus()
    Else
    DataGrid.SetFocus()
    End If

    True:是结尾,后面没数据
    False:不是结尾,后面有数据

    Recount(Ds) >0 不是结尾,还有数据
    <=0 是结尾,后面没数据

    Ds.EOF -> RowCount(Ds) <= 0
    Ds.EOF = False -> RowCount(Ds) >0

      Current date/time is 05/06/20, 07:53 pm