Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
CODE CHUONG TRINH KIEM PHIEU DOAN THANH NIEN
#1
MỌI NGƯỜI ƠI, CÓ CODE CHƯƠNG TRÌNH KIỂM PHIẾU ĐOÀN THANH NIÊN KHÔNG CHO MÌNH XIN VỚI?HIX HIX
Chữ ký của dtcomsystem Xin chào, mình là dtcomsystem, Tham gia http://thuthuataccess.com/forum từ ngày 07-12 -13.
Reply
Những người đã cảm ơn
#2
(12-12-13, 04:09 PM)dtcomsystem Đã viết: MỌI NGƯỜI ƠI, CÓ CODE CHƯƠNG TRÌNH KIỂM PHIẾU ĐOÀN THANH NIÊN KHÔNG CHO MÌNH XIN VỚI?HIX HIX

Chào bạn,

- Bạn xem code bên dưới, điều chỉnh một chút cho thích hợp với mục đích của mình.
- Bạn tạo form gồm: 1 listbox (bỏ qua phần rowsource), 1 textbox (có thể nhiều hơn nếu bạn muốn thêm điều kiện tìm kiếm "vd: tìm kiếm theo mã phiếu và tên đoàn viên", 1 nút command
- Nhập đoạn code bên dưới cho nút command

Mã:
Private Sub timkiem_Click()

Dim s, s1 As String

s = "SELECT [danh_sach].[stt], [danh_sach].[ma_phieu] ... (Nếu danh sách của bạn nhiều mục, muốn hiện những mục nào thì liệt kê ra)  FROM [danh_sach]WHERE (1=1"

s1 = " AND (([danh_sach].[ma_phieu]) like '" & "*" & [textbox1] & "*" & "')"
.... (Nếu có nhiều điều kiện thì liệt kê ra như trên)

If IsNull(Trim(textbox1)) = False Then
    s = s + s1
End If
.... (Nếu có nhiều điều kiện thì liệt kê ra như trên)

Me.listbox.RowSource = s & ") ORDER BY [danh_sach].[stt]; "
Me.listbox.Requery

Chúc bạn thành công !
Chữ ký của dinh_trong_hoa
Reply
Những người đã cảm ơn
#3
1/ Nhắc bạn lần 2 : Tiêu đề bài viêt và nội dung bài viết không được viết chữ hoa toàn bộ và phải viết tiếng Việt có dấu. Lần sau còn như thế này nữa thì bài viết bị move vào thùng rác
2/ Bạn vào Thư viện ứng dụng để tải file về nghiên cứu
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
(13-12-13, 03:03 PM)Xuân Thanh Đã viết: 1/ Nhắc bạn lần 2 : Tiêu đề bài viêt và nội dung bài viết không được viết chữ hoa toàn bộ và phải viết tiếng Việt có dấu. Lần sau còn như thế này nữa thì bài viết bị move vào thùng rác
2/ Bạn vào Thư viện ứng dụng để tải file về nghiên cứu
Thân mến

Cảm ơn Bạn Xuân Thanh. Mình sẽ rút kinh nghiệm. Tại mình không để ý, bạn thông cảm, cảm ơn chương trình của bạn rất nhiều. Chân Thành Cảm Ơn
Chữ ký của dtcomsystem Xin chào, mình là dtcomsystem, Tham gia http://thuthuataccess.com/forum từ ngày 07-12 -13.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Click đúp chuột hiện form và cập nhật dữ liệu theo số phiếu Ranju 1 133 05-10-16, 11:02 AM
Bài mới nhất: lmthu
Lightbulb Hướng Dẫn Tạo form tìm kiếm theo nhiều tiêu chí khác nhau khanhduycsgt 18 8,690 04-08-16, 10:29 PM
Bài mới nhất: huuduy.duy
  Tạo form phiếu nhập kho Ranju 4 271 20-07-16, 12:02 AM
Bài mới nhất: ongke0711
  [Lỗi] Lỗi code event! toancvp 18 1,040 07-07-16, 01:36 AM
Bài mới nhất: maidinhdan
  [Help] Tạo nút xác nhận: Bạn có muốn đóng chương trình không ? nam8384 6 423 26-06-16, 08:10 AM
Bài mới nhất: nam8384

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ