用VB如何找到数据库里的最后一条记录或txt文件里的最后一行数据？

数据库：执行查询语句后得到一个Recordset，使用RecordSet.MoveLast属性可以找到最后一条记录。

TXT文件：Open

StrPath

For

Input

As

#1

Do

While

Not

EOF(1)

Line

Input

#1,

TXTCon

i

=

i

+

1

Loop

Close

#1

以上是读取txt文件的方法，当close后i的值就是txt文件的总行数。然后再运行下面的方法

Open

StrPath

For

Input

As

#1

Do

While

Not

EOF(1)

Line

Input

#1,

TXTCon

If

j=

iThen

msgbox

TXTCon

'这个就是最后一行记录

Close

#1

Exit

Sub

End

If

j=

j

+

1

Loop

Close

#1

StrPath

是txt文件的路径+文件名

SQL Server 查询最后一条记录有两种方法，一种是使用TOP命令，一种是使用LIMIT命令，具体方法如下：

1、使用TOP

SELECT TOP 1 * FROM user

SELECT TOP 1 * FROM user order by id desc

2、 使用LIMIT

SELECT * FROM user LIMIT 1

SELECT * FROM user ORDER BY id ASC LIMIT 1

SELECT * FROM user ORDER BY id DESC LIMIT 1

扩展资料：

SQL函数

1、算数函数

ABS (数值)，绝对值

MOD (被除数, 除数)，求余

ROUND (对象数值, 保留小数的位数)，四舍五入

2、字符串函数

CONCAT (字符串1, 字符串2, 字符串3)，拼接

LENGTH (字符串)，字符串长度

LOWER (字符串)，小写

UPPER (字符串) ，大写

REPLACE (对象字符串，替换前的字符串，替换后的字符串)，替换

SUBSTRING（对象字符串 FROM 截取的起始位置 FOR 截取的字符数），截取

参考资料来源：百度百科-SqlServer

---