Tùy chọn
NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
- NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
-
NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 29-01-24, 03:49 PM
Xin chào các bạn.
Mình đang làm dò tìm dữ liệu như sau: Forms![F-TIM]![TUKHOA]
Nhập từ khóa tìm kiếm trong textbox name “TUKHOA”
table DSHOCSINH có các trường LOP10, LOP11, LOP12
Code tìm [LOP10] như sau:
Private Sub TIM_Click()
Dim DK As String: DK = Space(0)
TUKHOA = "*" & TUKHOA & "*"
DK = DK & "[LOP10] like Forms![F-TIM]!TUKHOA"
If DK = Space(0) Then
DoCmd.ShowAllRecords
Else
DoCmd.ApplyFilter , DK
DoCmd.Requery
TUKHOA = Left(TUKHOA, Len(TUKHOA) - 1)
End If
End Sub
Khi mình nhập TUKHOA là Nguyễn Văn A thì nó lọc tất cả Nguyễn Văn A của lớp 10
Trong khi LOP11 và LOP12 vẫn có trùng tên Nguyễn Văn A thì nó không có lọc
Vừa rồi mình có đọc trên diễn đàn nầy, thấy Ongke0711 nói có cú pháp lọc tìm bất kỳ cột nào trong table. Mình thấy mừng quá, nên nhờ Ongke0711 và các bạn chỉ giúp:
Mình chỉ gõ từ khóa Nguyễn Văn A, nó sẽ tìm cùng lúc trong cả LOP10, LOP11, LOP12
Cảm ơn rất nhiều./. -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
ongke0711 > 29-01-24, 08:29 PM
Bạn sửa lại chuỗi tìm kiếm thử xem.
Mã:DK = DK & "[LOP10] like Forms![F-TIM]!TUKHOA OR [LOP11] like Forms![F-TIM]!TUKHOA OR [LOP12] like Forms![F-TIM]!TUKHOA" -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 31-01-24, 08:29 PM
Cảm ơn Ongke0711, code của bác mình áp dụng nó chạy chính xác, tuy nhiên vẫn chưa hài lòng lắm, mấy hôm nay mình mò tiếp nhưng không được. Thế nầy:
Cột [LOP10] Nguyễn Văn A nằm ở record thứ 1
Cột [LOP11] Nguyễn Văn A nằm ở record thứ 8
Cột [LOP12] Nguyễn Văn A nằm ở record thứ 20
Như vậy danh sách nó lọc ra mỗi cột gồm 20 người, mỗi cột đều có Nguyễn Văn A và 19 người lạ quắc. Điều nầy bất tiện, lỡ như [LOP12] mà Nguyễn Văn A nằm ở vị trí 100 thì nó lọc ra 100 record.
Nhờ Ongke0711 và các bạn giúp dùm làm sao cho cột [LOP10], [LOP11], [LOP12] nó chỉ lọc đưa ra mỗi cột chỉ duy nhất một record là Nguyễn Văn A.
Cảm ơn rất nhiều. -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
Xuân Thanh > 01-02-24, 07:40 PM
Trong code của ongke thay từ khóa OR bằng AND -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 01-02-24, 10:17 PM
Thay từ khóa OR bằng AND thì nó không search được bạn Xuân Thanh ơi.
Chỉnh sửa theo Ongke thì bây giờ nó lọc được cả 3 cột có Nguyễn Văn A và chỉ tổng cộng 3 record thôi, nhưng nằm ở 3 hàng khác nhau. Như vậy mỗi cột vẫn còn 2 người lạ, phải chi nó nằm trên cùng 1 hàng (1 record) thì hay quá.
Code:
Private Sub TIM_Click()
Dim DK As String: DK = Space(0)
TUKHOA = "*" & TUKHOA & "*"
DK = DK & "[LOP10] like Forms![F-TIM]!TUKHOA OR [LOP11] like Forms![F-TIM]!TUKHOA OR [LOP12] like Forms![F-TIM]!TUKHOA”
If DK = Space(0) Then
DoCmd.ShowAllRecords
Else
DoCmd.ApplyFilter , DK
DoCmd.Requery
TUKHOA = Left(TUKHOA, Len(TUKHOA) - 1)
End If
End Sub
(Mình không biết tải hình lên diễn đàn) -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
ongke0711 > 03-02-24, 12:32 PM
Có file mẫu thì dễ xử lý hơn nhé.
- Nếu ra 3 dòng cùng một hàng thì nó còn ý nghĩa gì không bạn? Bạn lấy được thông tin gì của một hàng?
- Trong code bạn có dùng "TUKHOA": bạn nên đặt tên cho rõ nó là tên biến hay tên trường? Nếu là tên textbox thì làm sao phân biệt nó là trường hay textbox --> Access sẽ loạn lên một lúc nào đó dẫn đến xử lý sai. Vd: là tên Textbox thì đặt txtTuKhoa ở thuộc tính Name. Lập trình phải chính xác, tránh để Access tự suy diễn.
Muốn post hình lên diễn đàn thì bạn upload hình lên mấy trang úp ảnh free, lấy link bbcode rồi dán lên đây. Flick, imgur,.... -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 14-02-24, 09:26 PM
Năm mới xin chúc Ban quản trị và các bạn Mạnh khỏe, Thành công trong sự nghiệp, Gia đình Hạnh phúc.
Chủ đề nầy mình còn nhờ Ongke0711 và các bạn giúp thêm dùm
Mình gửi link file mẫu:
https://app.box.com/s/nq4sufdi8x7yhbanuqcd5f4gzidc4pik
Trong danh sách Lớp 10, 11, 12 đều có Nguyễn Văn A, mong muốn khi gõ tìm Nguyễn Văn A thì sẽ lọc ra trên cùng 1 hàng
Và đồng thời tổng hợp danh sách tìm được vào 1 textbox (theo hình mẫu)
https://upanh.tv/image/y947UQ
Cảm ơn rất nhiều.
-
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 16-02-24, 10:57 AM
Năm mới xin chúc Ban quản trị và các bạn Mạnh khỏe, Thành công trong sự nghiệp, Gia đình Hạnh phúc.
Chủ đề nầy mình còn nhờ Ongke0711 và các bạn giúp thêm dùm
Mình gửi link file mẫu:
https://app.box.com/s/nq4sufdi8x7yhbanuqcd5f4gzidc4pik
Trong danh sách Lớp 10, 11, 12 đều có Nguyễn Văn A, mong muốn khi gõ tìm Nguyễn Văn A thì sẽ lọc ra trên cùng 1 hàng
Và đồng thời tổng hợp danh sách tìm được vào 1 textbox (theo hình mẫu)
https://upanh.tv/image/y947UQ
Cảm ơn rất nhiều. -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
ongke0711 > 16-02-24, 01:47 PM
(16-02-24, 10:57 AM)vansunhuy58 Đã viết: Trong danh sách Lớp 10, 11, 12 đều có Nguyễn Văn A, mong muốn khi gõ tìm Nguyễn Văn A thì sẽ lọc ra trên cùng 1 hàng
Và đồng thời tổng hợp danh sách tìm được vào 1 textbox (theo hình mẫu)
Sự thật mất lòng, chứ thực ra khi nhìn cái Table bạn thiết kế là không muốn làm rồi vì nó sai quá sai cho việc lưu dữ liệu danh sách học sinh.
Nếu mọi thứ như query, form làm theo table này sẽ xử lý cái sai bằng những giải pháp sai để cho ra bằng được kết quả nhưng cuối cùng tôi chắc chắc, nếu bạn đi tiếp thì cuối cùng bạn sẽ đập bỏ toàn bộ xây lại chứ sẽ không đi đến đâu.
Tôi nói mấy bài trước rồi, Access là cơ sở dữ liệu chứ không phải bảng tính trải rộng như Excel nên không làm giống Excel được.
Có mấy câu hỏi để bạn dựa trên cái Table DSHOCSINH trả lời xem có được không?
- Muốn truy vấn học sinh LOP10 (hoặc 11,12) của năm học 2020 thì dựa vào trường nào để móc dữ liệu ra?
- Học sinh Tên "Nguyễn Văn A" qua 5 năm học có lên đến 20 học sinh trùng tên vậy bạn muốn tìm Nguyễn Văn A của năm học 2023- 2024 thì dựa vào thông tin cột (field) nào của table DSHOCSINH?
- Học sinh Tên "Nguyễn Văn A" ở LOP10, 11, 12 điều có người trùng tên vậy (giả định là trong cùng một năm học) vậy với cái tên "Nguyễn Văn A" là sao bạn phân biệt ông "A" Lớp 10 hay ông "A" này của lớp 12? để truy xuất các thông tin liên quan (như lý lịch, điểm...).
- Giáo viên nhập liệu ông "Nguyễn Văn A" của lớp 12 dư một khoảng trắng vậy khi truy vấn dữ liệu dựa trên "Nguyễn Văn A" thì làm sao trả về kết quả đầy đủ đây?
Nói chung khi bạn thiết kế một Table nào đó bạn phải phân tích hết các tình huống phát sinh, nếu có thì lưu thông tin đó vào cột nào? nếu muốn truy vấn một thông tin gì đó thì dựa vào đâu để móc nối dữ liệu??? thiết kế table như vậy có thuận tiện cho việc nhập liệu không, nhập liệu có dễ sai sót không, khi muốn xóa dữ liệu vừa mới nhập thì dựa trên cái thông tin khóa nào để phân biệt rồi xóa....??
Bên dưới là ứng dụng QLHS tôi làm lúc trước cho một giáo viên ngoài Bình Thuận.
Bạn tham khảo cách xây dựng các Table để lưu trữ thông tin, các Relationship giữa các table để móc nối dữ liệu, các mã khóa chính....
![[Hình: N8Cwh1h.png]](https://i.imgur.com/N8Cwh1h.png)
![[Hình: z61ql8R.png]](https://i.imgur.com/z61ql8R.png)
Tóm lại tôi có thể hỗ trợ bạn một phần trong việc xây dựng các Table liên quan đến Danh sách học sinh nếu bạn cung cấp thêm các thông tin khác cho việc quản lý học sinh.
Bảng hiện tại thì nên bỏ đi nhe. -
RE: NHỜ NÂNG CẤP CODE TÌM DỮ LIỆU
vansunhuy58 > 18-02-24, 06:28 PM
Cảm ơn ongke0711 đã góp ý.
Mục đích chủ đề nầy là mình muốn học hỏi thêm về cú pháp (code) nâng cao về tìm kiếm, trích lọc dữ liệu để bổ sung vào chương trình mình đang thực hiện.
Việc tạo bảng, trường, thiết lập mối quan hệ, ...thì mình đã làm và chạy ổn, Tuy không được quy mô như những phần mềm khác nhưng được cái là "tương thích với công việc", đây là yếu tố quan trọng của tất cả các loại phần mềm.
File chạy chương trình của mình là .ACCDE được link dữ liệu từ 4 file .ACCDB và một số file Excel khác, triển khai trong mạng LAN có tổng cộng 8 máy sử dụng (dự kiến sẽ link qua SQL 2008 thay cho các .ACCDB)
Vì bất tiện nên mình không thể up nguyên file chương trình lên được, khi đó sẽ loãng chủ đề, tạo ra sự rườm rà và các bạn khó theo dõi nội dung mình cần hỏi, do đó mình chỉ trích ra phần nào cần hỏi thôi
Cảm ơn đã góp ý.
![[Hình: y947UQ]](https://upanh.tv/image/y947UQ)