整型数据判断及数据库'自动编号'数据类型处理问题?

Question

各位大虾,请问,我如何能够判断用户在Text中输入的数据是整型数据?另外,我的Access数据库的一张表中有一个'序号'字段,该字段定义为'自动编号'数据类型,可是数据库经常添加删除，导致序号非常紊乱，应该如何处理才能保证该字段永远是从小到大顺序排列呢?

Answer 1

Text中的内容用VAL转换，自然就变成LONG型
///自动编号'数据类型,可是数据库经常添加删除 ，
在此列上定义一个递增的索引

Answer 2

    If Not IsNumeric(Text1.Text) Then
        MsgBox "不是数值"
    ElseIf CDbl(Text1.Text) <> CLng(Text1.Text) Then
        MsgBox "不是整型"
    Else
        MsgBox "整型"
    End If'序号'字段做主键。