Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Điều khiển button ở Sub con và Sub cháu
#1
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
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#2
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 big green )

Vd : Forms!Main.Visible=False
Forms!Main.Textbox1="abc"
Forms!main.Textbox1.Enable=True
.............
Chữ ký của hoanglonglangtu Chiều tắt nắng trên con đường quen thuộc
Mưa rơi buồn qua ngõ vắng không em
Từng hạt ngọc rơi đùa qua kẽ lá
Những giọt tràn đầy ngõ ngách tâm tư
Em có biết chiều nay anh vẫn nhớ
Ở nơi nào em có nhớ chăng anh

Trên đời có quá nhiều chữ nếu,đáng tiếc là đều đã qua,việc đã xảy ra,hối hận cũng vô dụng
ღღღღღTài sản của hoanglonglangtu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
(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:
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
1. theo mình thì bạn cho mặc định các nút button mặc định Enable là false.
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.
Chữ ký của aichangbiet Gà mờ sad
Reply
Những người đã cảm ơn Noname
#4
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 !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#5
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
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#6
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 straight face
hướng dẫn = tay bo vậy đc thui
Chữ ký của aichangbiet Gà mờ sad
Reply
Những người đã cảm ơn Noname
#7
(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é.
Chữ ký của aichangbiet Gà mờ sad
Reply
Những người đã cảm ơn Minh Tiên


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Lọc có điều kiện ở listbox phiacuoiconduong 2 92 18-11-16, 06:40 PM
Bài mới nhất: ongke0711
  Lọc theo điều kiện trong listbox Ranju 3 177 06-10-16, 05:26 PM
Bài mới nhất: Ranju
  Thay đổi màu nền các dòng theo điều kiện trên form Continuous tranthanhan1962 9 1,699 27-09-16, 11:01 PM
Bài mới nhất: ongke0711
  Không cho phép điều chỉnh kích thước của Form ChiMai 1 126 18-09-16, 01:27 PM
Bài mới nhất: ongke0711
  [Hỏi] Cách hiện các record trong combo box theo điều kiện toancvp 5 334 02-07-16, 12:21 AM
Bài mới nhất: toancvp

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ơ