Tùy chọn
Tìm hiểu ý nghĩa nội dung code VBA về DSum
- Tìm hiểu ý nghĩa nội dung code VBA về DSum
-
Tìm hiểu ý nghĩa nội dung code VBA về DSum
tvn_hut > 11-06-13, 08:47 PM
Dear all, hiện tại mình gặp khó khăn để hiểu nội dung một đoạn lệnh VBA về Dsum như sau:
Private Sub Form_AfterUpdate()
Forms!downmain!Total = DSum("[tottime]", "Down", "[PackLine]='" & Me![PackLine] & "' and [PrdType]='" & Me![PrdType] & "' and [PackType]='" & Me![PackType] & "' and [D_DownDate]=#" & Format(Me![D_DownDate], "mm/dd/yyyy") & "# and [Shift]='" & Me![Shift] & "'")
End Sub
Theo mình nghĩ thì đây có phải update các thông tin ghi được từ form vào các trưởng trong bảng "Down" hay không? (trong bảng không có trường Total nào cả). Có ai hiểu thì giúp mình giải thuật mã code này với.
Thanks and best regards, -
RE: Tìm hiểu ý nghĩa nội dung code VBA về DSum
paulsteigel > 11-06-13, 10:39 PM
(11-06-13, 08:47 PM)tvn_hut Đã viết: Dear all, hiện tại mình gặp khó khăn để hiểu nội dung một đoạn lệnh VBA về Dsum như sau:
Private Sub Form_AfterUpdate()
Forms!downmain!Total = DSum("[tottime]", "Down", "[PackLine]='" & Me![PackLine] & "' and [PrdType]='" & Me![PrdType] & "' and [PackType]='" & Me![PackType] & "' and [D_DownDate]=#" & Format(Me![D_DownDate], "mm/dd/yyyy") & "# and [Shift]='" & Me![Shift] & "'")
End Sub
Theo mình nghĩ thì đây có phải update các thông tin ghi được từ form vào các trưởng trong bảng "Down" hay không? (trong bảng không có trường Total nào cả). Có ai hiểu thì giúp mình giải thuật mã code này với.
Thanks and best regards,
Cú pháp viết lệnh DSUM là DSUM ([Tên trường các nhau bằng dấu phẩy], [Tên vùng/ bảng/ tập hợp bản ghi], [Điều kiện]).
Lệnh này để tính tổng các trường trong một vùng cụ thể theo điều kiện đã cho.
Trên form của bạn có một textbox/ điều khiển để hiển thị tổng Tottime khi có thay đổi dữ liệu thôi.
Xin giải thích sơ bộ như vậy! -
RE: Tìm hiểu ý nghĩa nội dung code VBA về DSum
ngô đức mai > 02-11-13, 09:31 AM
minh rat thich bai nay
minh rat thich bai nay