Question

"There is no row at position 0." Hi I keep on getting this error message.

If mytable.Rows.Count >= 0  then
dim  myid = dt.Rows(0).Item(6).ToString
End if

在这方面,请帮助我,我永远不会再看到这一信息。谢谢大家。

qry_Sql = qry_Sql + " select SRNO,EMPNO,ATTN_YR,ATTN_MONTH,"
    qry_Sql = qry_Sql + " GRP,TOT_HRS,MY_ID "
    qry_Sql = qry_Sql + " from ATTD_HRS  "
    qry_Sql = qry_Sql + " ORDER BY EMP_NO "

    If mytable.Rows.Count <= 0 Then
    mygrp = dt.Rows(0).Item(5).ToString ---------------------
    myid = dt.Rows(0).Item(6).ToString 
    End If

Answer 1

Probably because mytable has no row at position 0, (rows(0) part). You should check if there are rows/items before using them.

Answer 2

您应检查您的表格是否载有任何段落。

If mytable.rows.Count > 0 then
    If mytable.rows(0).items(2) >= 0 then
        dim  myid = dt.Rows(0).Item(6).ToString
    End if
End if

友情链接