Đánh giá chủ đề:
  • 1 Votes - 2 Average
  • 1
  • 2
  • 3
  • 4
  • 5
GIẢI THÍCH CÁC LỆNH KHI VIẾT CODE
21-05-12, 10:51 AM
Bài viết: #1
GIẢI THÍCH CÁC LỆNH KHI VIẾT CODE
Các bạn Pro ơi cho mình hỏi tí nhé. Mình vừa giải một bài tập Access. Ở phần hướng dẫn tạo Form, khi chuyển một text box sang combo box, người ta hướng dẫn như sau: "...chọn thẻ Event, chọn After Update, Code builder, nhập đoạn code sau vào giữa Private sub và End sub:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[MATHE] = '" & Me![MATHE] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Khi mình copy và dán vào như hướng dẫn thì Form hoạt động tốt, nhưng mình không hiểu gì về đoạn code trên cả.
Bạn nào rành về cách viết code trong Access thì giải thích giùm mình tại sao lại viết như vậy? (nếu bạn giải thích cụ thể từng thành phần của đoạn code trên thì càng tốt). Mình cảm ơn nhiều nhé.

Chữ Ký của huynhbahocXin chào, mình là huynhbahoc, Tham gia http://thuthuataccess.com/forum từ ngày 06-05 -12.
Trả lời
21-05-12, 11:45 AM
Bài viết: #2
RE: GIẢI THÍCH CÁC LỆNH KHI VIẾT CODE
Đoạn code trên thường được dùng trong các form tìm kiếm. ý nghĩa của nó là
Mã:
Dim rs As Object ' khai báo một đối tượng tên là rs
Set rs = Me.RecordsetClone ' Gán đối tượng đó bằng record source của Form hiện hành
rs.FindFirst "[MATHE] = '" & Me![MATHE] & "'" ' Tìm trong cột mã Thẻ xem có mã nào khớp với textbox MaThe không,
If Not rs.EOF Then Me.Bookmark = rs.Bookmark ' Nếu khớp thì nhảy con trỏ của form tới vị trí được tìm thấy trên đối tượng rs.

Chữ Ký của Noname020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Trả lời
 Những người đã cảm ơn gialilama , huynhbahoc
23-05-12, 03:20 PM
Bài viết: #3
RE: GIẢI THÍCH CÁC LỆNH KHI VIẾT CODE
(21-05-12 11:45 AM)Noname Đã viết:  Đoạn code trên thường được dùng trong các form tìm kiếm. ý nghĩa của nó là
Mã:
Dim rs As Object ' khai báo một đối tượng tên là rs
Set rs = Me.RecordsetClone ' Gán đối tượng đó bằng record source của Form hiện hành
rs.FindFirst "[MATHE] = '" & Me![MATHE] & "'" ' Tìm trong cột mã Thẻ xem có mã nào khớp với textbox MaThe không,
If Not rs.EOF Then Me.Bookmark = rs.Bookmark ' Nếu khớp thì nhảy con trỏ của form tới vị trí được tìm thấy trên đối tượng rs.

Bạn Noname thật là pro. Cảm ơn bạn đã giải thích giúp mình nhé. Mình cảm ơn bạn nhiều nhiều...

Chữ Ký của huynhbahocXin chào, mình là huynhbahoc, Tham gia http://thuthuataccess.com/forum từ ngày 06-05 -12.
Trả lời

Tags: CODE, ACCESS, LỆNH,

Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Giúp đỡ] Cách xóa module khi viết code bị sai xachxo_vacxi 2 98 19-04-14 08:15 PM
Bài mới nhất: xachxo_vacxi
  [Hỏi] Code nút tìm trong access namleon 1 85 18-04-14 08:57 AM
Bài mới nhất: Xuân Thanh
  giúp mình tạo nút lệnh tìm kiếm trong form access 2003 với vân anh xinh 26 1,168 17-04-14 03:30 PM
Bài mới nhất: minhnq1710
  [Help] Tạo phím tắt hoặc gán lệnh di chuyển con trỏ qua lại các subform. gaubu117 1 121 15-02-14 05:20 PM
Bài mới nhất: trunghieu
  [Help] Nhờ hướng dẫn giúp code nút search wellngoc 17 786 26-12-13 12:51 PM
Bài mới nhất: Xuân Thanh

Chuyển nhanh:


Thành viên đang đọc chủ đề: 1 Khách

Liên hệ | Thủ Thuật Access | Lên trên | Nội dung | Bản rút gọn | Tin RSS