rút gọn lệnh Max

Trang chủ
rút gọn lệnh Max
rút gọn lệnh Max

nguyencongtru > 27-10-11, 09:54 AM

Trên form đang làm việc(table là banhang), tôi muốn biết stt nào lớn nhất tôi dùng code như sau:
Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("select max(stt) As MaxNum from banhang", dbOpenSnapshot)
MsgBox "Max Number is " & rst!MaxNum
rst.Close
Set rst = Nothing

Tuy vậy tôi cảm thấy lệnh quá dài. các bạn có cách nào làm cho ngắn lại, chứ chỉ có việc Max mà dùng đến 5 hàng thì fí quá
RE: rút gọn lệnh Max

Noname > 27-10-11, 10:18 AM

Thử như vầy xem:

Mã:
MsgBox DMax("[stt]", "banhang")
RE: rút gọn lệnh Max

nguyencongtru > 27-10-11, 11:34 AM

không được ban ơi
lỗi ngay table banhang
RE: rút gọn lệnh Max

Noname > 27-10-11, 01:36 PM

bạn post data của bạn lên xem nào! Cả câu lệnh mà bạn bị lỗi nữa
RE: rút gọn lệnh Max

nguyencongtru > 29-10-11, 11:23 PM

Noname: làm sao post file MDE lên được vậy bạn
RE: rút gọn lệnh Max

Noname > 30-10-11, 05:21 AM

(29-10-11, 11:23 PM)nguyencongtru Đã viết: Noname: làm sao post file MDE lên được vậy bạn

http://thuthuataccess.com/forum/thread-367.html
Bài trước Bài tiếp