Viết bởi: Noname 06-08-10, 12:59 PM Chuyên mục: Thư viện thủ thuật - Bài trả lời (6) |
hungtan Đã viết:bạn tạo 1 table T2, tạo field có tên là userTime, kiểu number
Khi user mở starup form, ở sự kiện open của form, bạn viết 1 đoạn code mở table trên và edit thêm sự kiện như sau:
Private Sub Form_Open(Cancel As Integer)
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("T2")
With rs
.MoveFirst
.Edit
!UserTime = !UserTime + 1
.Update
End With
rs.Close
End Sub
Viết bởi: Noname 06-08-10, 12:54 PM Chuyên mục: Thư viện thủ thuật - Bài trả lời (2) |
ndtoan123 Đã viết:Mình cho vd nhé: Giả sử bạn có bảng nhân viên(MaNV;TenNV) bây giờ tại Form: Frmnhanvien bạn có 1 combobox(tên là Cboma) để gõ mã nhân viên và 1 Textbox(tên là txttenNV) để hiển thị tên nhân viên ứng với mã NV đã chọn. VD khi gõ vào combobox mã nhân viên NV01 thì textbox sẽ hiển thị là Nguyễn Văn A; khi gõ vào nhân viên NV02 thì textbox hiển thị là Nguyễn văn B...Cách 2:
Muốn vậy tại textbox trên Form frmnhanvien: chọn Text txttenNV gõ vào công thức:
=Dlookup("tenNV","nhanvien","nhanvien!maNV=[Forms]![frmNhanvien]![Cboma]")
thì bạn sẽ có được kết quả ngay nhưng nhớ đặt thuộc tính Looked= Yes cho Textbox txttenNV (Mục đích là textbox này chỉ để hiển thị kết quả, không cho sửa đổi)
pinkair Đã viết:Ví dụ bạn có Table la NhanVien gồm hai trường MaNV, TenNV
Bạn tạo Form có 1 Combo la CmbMaNV; 1 Text Box là txtTenNV
Source của CmbMaNV là table NhanVien trên.
Đoạn code như sau:
Private Sub cmbMaNV Click()
Me.txtTenNV.Value = Me.cmbMaNV.Column(1)
End Sub
Mình đã làm rồi, rất là OK bạn ah, bạn có thể sử dung
Viết bởi: Noname 06-08-10, 12:42 PM Chuyên mục: Thư viện thủ thuật - Không có hồi đáp |
Format(0.25,"Percent") ==>kết quả sẽ cho ra : 25.00%
Viết bởi: Noname 06-08-10, 12:11 AM Chuyên mục: Thông báo - Bài trả lời (3) |
Viết bởi: Noname 05-08-10, 11:22 PM Chuyên mục: Chức năng diễn đàn - Bài trả lời (2) |
[you]
[you] nhớ thanks cho tớ nhé
Chủ đề Mới nhất |
Tạo query tổng hợp dữ liệ... -Chuyên mục: Query-Đăng bởi lần cuối: ongke0711-19-12-24, 07:58 PM- » Bài trả lời: 1- » Lượt xem: 41 |
Test phần mềm QUẢN LÝ TÀI... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: AnNguyen-19-12-24, 05:33 PM- » Bài trả lời: 44- » Lượt xem: 5,189 |
A Bold Move to Expand the... -Chuyên mục: Query-Đăng bởi lần cuối: nigelbdhmp-19-12-24, 04:55 PM- » Bài trả lời: 0- » Lượt xem: 7 |
Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: danhson2007-19-12-24, 03:54 PM- » Bài trả lời: 56- » Lượt xem: 3,086 |
Dòng Video Youtube Ngâm N... -Chuyên mục: Góc Thơ -Đăng bởi lần cuối: Nguyễn Thành Sáng-19-12-24, 01:21 PM- » Bài trả lời: 43- » Lượt xem: 374 |
[Demo p2] Tìm kiếm và tô ... -Chuyên mục: Thủ thuật VBA-Đăng bởi lần cuối: ledangvan-06-12-24, 02:53 PM- » Bài trả lời: 17- » Lượt xem: 1,944 |
File Sổ Quỹ Tiền Mặt cho ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: giauvnd-05-12-24, 04:35 PM- » Bài trả lời: 30- » Lượt xem: 3,681 |
Hỏi về Crosstab Query: Lu... -Chuyên mục: Query-Đăng bởi lần cuối: feeling-04-12-24, 07:24 PM- » Bài trả lời: 7- » Lượt xem: 270 |
Demo_Code Xuất Lý lịch 2C... -Chuyên mục: Tương tác Chương trình ngoài-Đăng bởi lần cuối: shangyi-02-12-24, 02:18 PM- » Bài trả lời: 19- » Lượt xem: 2,598 |
Label không hiện dữ liệu ... -Chuyên mục: Report-Đăng bởi lần cuối: AnNguyen-29-11-24, 10:09 AM- » Bài trả lời: 6- » Lượt xem: 136 |
Diễn đàn Thống kê |
» Thành viên: 5,083 » Thành viên mới nhất: carloogbuyNeern » Các chủ đề diễn đàn: 9,878 » Các bài viết diễn: 48,656 Thống kê đầy đủ |