Tùy chọn
Điều khiển button ở Sub con và Sub cháu
- Điều khiển button ở Sub con và Sub cháu
-
Điều khiển button ở Sub con và Sub cháu
Minh Tiên > 14-01-13, 02:57 PM
Xin các Pro chỉ giáo Code điều khiển Form Con và Cháu:
Bài toán:
Tôi có: 1 form Cha tên "frmDanhsachnhanvien" gồm 3 textbox: Stt, hoten, fone.
1 form Con tên "frmQuatrinhcongtac" gồm 2 button: btnNhap, btnXoa; 2 textbox: Tungay, Denngay
1 form Cháu tên "frmNoicongtac" (Là con của form "frmQuatrinhcongtac") gồm 2 button: btnNhapCT, btnXoaCTvà các textbox Noicongtac, ... (Như file đính kèm).
1. Làm cách nào để khi các textbox của form Cha chưa nhập số liệu thị nút button btnNhap và btnXoa của form Con ở trạng thái Enable= false để không cho nhập, xóa số liệu vào form Con. Ngược lại khi các textbox của form Cha có số liệu thì nút button btnNhap và btnXoa của form Con ở trạng thái Enable=True để nhập, xóa số liệu của form Con;
2. Khi các textbox của form Con ở trạng thái chưa có số liệu thì button btnNhapCT và btnXoaCT của Form Cháu ở trạng thái Enable=false để không cho nhập, xóa số liệu của form Cháu. Người lại khi textbox của form Con có số liệu thì button btnNhapCT và btnXoaCT của Form Cháu ở trạng thái Enable=true để nhập, xóa số liệu ở Form Cháu.
Xin cảm ơn !
File đính kèm -
RE: Điều khiển button ở Sub con và Sub cháu
hoanglonglangtu > 14-01-13, 03:42 PM
bạn dùng thử cú pháp : Forms!<tên form>.[tên control].[thuộc tính] để tác động đến các control ở form khác hoặc kiểm tra giá trị của các control đó. Thân !!! ( mình chưa xem file đính kèm tại chưa có thời gian
)
Vd : Forms!Main.Visible=False
Forms!Main.Textbox1="abc"
Forms!main.Textbox1.Enable=True
............. -
RE: Điều khiển button ở Sub con và Sub cháu
aichangbiet > 14-01-13, 04:18 PM
(14-01-13, 02:57 PM)tmtien261 Đã viết: Xin các Pro chỉ giáo Code điều khiển Form Con và Cháu:
1. theo mình thì bạn cho mặc định các nút button mặc định Enable là false.
Bài toán:
Tôi có: 1 form Cha tên "frmDanhsachnhanvien" gồm 3 textbox: Stt, hoten, fone.
1 form Con tên "frmQuatrinhcongtac" gồm 2 button: btnNhap, btnXoa; 2 textbox: Tungay, Denngay
1 form Cháu tên "frmNoicongtac" (Là con của form "frmQuatrinhcongtac") gồm 2 button: btnNhapCT, btnXoaCTvà các textbox Noicongtac, ... (Như file đính kèm).
1. Làm cách nào để khi các textbox của form Cha chưa nhập số liệu thị nút button btnNhap và btnXoa của form Con ở trạng thái Enable= false để không cho nhập, xóa số liệu vào form Con. Ngược lại khi các textbox của form Cha có số liệu thì nút button btnNhap và btnXoa của form Con ở trạng thái Enable=True để nhập, xóa số liệu của form Con;
2. Khi các textbox của form Con ở trạng thái chưa có số liệu thì button btnNhapCT và btnXoaCT của Form Cháu ở trạng thái Enable=false để không cho nhập, xóa số liệu của form Cháu. Người lại khi textbox của form Con có số liệu thì button btnNhapCT và btnXoaCT của Form Cháu ở trạng thái Enable=true để nhập, xóa số liệu ở Form Cháu.
Xin cảm ơn !
File đính kèm
khi các textbox Cha nhập dữ liệu xong. tại textbox cuối cùng - giả sử là fone. Bạn viết code cho textbox này ở Afterupdate. Bạn có thể thêm lệnh If để kiểm tra textbox rỗng hay không.
Private Sub Fone_AfterUpdate()
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]!btnNhap.Enabled = True
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]!btnXoa.Enabled = True
On Error GoTo AfterUpdate_Error
AfterUpdate_Exit:
Exit Sub
AfterUpdate_Error:
MsgBox "Loi"
Resume AfterUpdate_Exit
End Sub
Sub cháu làm tương tự.
Sau khi nhập xong ở sub cháu, bạn cho control tới 1 Nút nào đó (khác các nút cần khoá). Vì nó ko cho bạn khoá/ẩn nút đang làm việc => phải đưa control tới 1 nút khác sau khi đã nhập xong dữ liệu
Gõ code On Got Focus cho TênNút này để ẩn lại các Nút trên form con và cháu.
Private Sub TênNút_GotFocus()
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]!btnNhap.Enabled = False
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]!btnXoa.Enabled = False
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]![frmNoiCongTac]!btnNhapCT.Enabled = False
[Forms]![frmDanhsachnhanvien]![frmQuatrinhcongtac]![frmNoiCongTac]!btnXoaCT.Enabled = False
End Sub
Mình chưa test thử nhưng chắc là được. -
RE: Điều khiển button ở Sub con và Sub cháu
Minh Tiên > 17-01-13, 07:56 AM
Cảm ơn các sư huynh đã hướng dẫn. Xong vẫn chưa ổn. Nhờ các sư huynh xem file đính kèm và hướng dẫn giúp.
Cảm ơn nhiều ! -
RE: Điều khiển button ở Sub con và Sub cháu
Minh Tiên > 25-01-13, 10:56 PM
Các sư huynh ơi giúp với ! Sao không điều khiển được textbox hoặc button box ở form con và form cháu thế. Các sư huynh cho demo với ! Thanks -
RE: Điều khiển button ở Sub con và Sub cháu
aichangbiet > 25-01-13, 11:17 PM
bạn để ý đường dẫn textbox và button trong form con và cháu nhé.
Phải có dạng
[Forms]![Tên Form cha]![Tên form con]![Tên form cháu(nếu có)]!...[chắt chút chít]..! tên textbox/button/label.thuộc tính =
là như thế. Lưu ý: khi đang ở textbox/button/label nào thì ko thể thay đổi thuộc tính của textbox/button/label đó. phải đưa con trỏ tới textbox/button/label khác mới thiết lập thuộc tính được.
Form của bạn có cần sửa gấp ko? mình sắp mổ nên k rảnh ngay để làm
hướng dẫn = tay bo vậy đc thui -
RE: Điều khiển button ở Sub con và Sub cháu
aichangbiet > 26-01-13, 12:19 PM
(25-01-13, 10:56 PM)tmtien261 Đã viết: Các sư huynh ơi giúp với ! Sao không điều khiển được textbox hoặc button box ở form con và form cháu thế. Các sư huynh cho demo với ! Thanks
http://www.mediafire.com/?w6folq5e916n5ld
đây là 1 demo ẩn hiện với button của sub con và cháu - bạn xem và phát triển lên nhé.