Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Hàm visible nút lênh
#1
Mã PHP:
Sub FlipVisibled(frmAny As FormctlAny As Control)
    
Dim ctl As Control
    
    ctlAny
.Visible True
    ctlAny
.SetFocus
    
    
For Each ctl In frmAny.Controls
        
If ctl.ControlType acCommandButton Then
            
If ctl.Name <> ctlAny.Name Then
                ctl
.Visible Not ctl.Visible
            End 
If
        
End If
    
Next ctl    
End Sub 


Cach goi ham
Call(ten form su dung, ten nut lenh)
Vi du khi click nut lenh cmdThem thi xuat hien nut cmdLuu call(me,cmdluu)
Luu y cmdLuu mac dinh visible la false nhe
Thuoc tinh enable thi tuong tu nhe cac ban
Mong giup ich cho cac ban

Xuân Thanh : Lần sau nhớ viết Tiếng Việt có dấu bạn nhé
Chữ ký của nauthna Xin chào, mình là nauthna, Tham gia http://thuthuataccess.com/forum từ ngày 29-01 -13.
Reply
Những người đã cảm ơn Noname , Xuân Thanh
#2
Thanks bạn đã chia sẻ! Nhưng chú ý viết tiếng Việt có dấu nhé bạn!
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
(22-02-13, 06:10 PM)Noname Đã viết: Thanks bạn đã chia sẻ! Nhưng chú ý viết tiếng Việt có dấu nhé bạn!

uhm lần sau mình rút kinh nghiệm
Chữ ký của nauthna Xin chào, mình là nauthna, Tham gia http://thuthuataccess.com/forum từ ngày 29-01 -13.
Reply
Những người đã cảm ơn
#4
(22-02-13, 02:12 PM)nauthna Đã viết:
Mã PHP:
Sub FlipVisibled(frmAny As FormctlAny As Control)
    
Dim ctl As Control
    
    ctlAny
.Visible True
    ctlAny
.SetFocus
    
    
For Each ctl In frmAny.Controls
        
If ctl.ControlType acCommandButton Then
            
If ctl.Name <> ctlAny.Name Then
                ctl
.Visible Not ctl.Visible
            End 
If
        
End If
    
Next ctl    
End Sub 


Cach goi ham
Call(ten form su dung, ten nut lenh)
Vi du khi click nut lenh cmdThem thi xuat hien nut cmdLuu call(me,cmdluu)
Luu y cmdLuu mac dinh visible la false nhe
Thuoc tinh enable thi tuong tu nhe cac ban
Mong giup ich cho cac ban

Cám ơn đã chia sẻ, nhưng hình như là thế này mới đúng
Function FlipVisibled(frmAny As Form, ctlAny As Control)
Dùng Function chứ không dùng Sub
Thâ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


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help]Tạo nút lệnh tiếp tục khanhnevn30 6 409 18-06-16, 08:39 PM
Bài mới nhất: maidinhdan
  Nho Giup Do Ve Cac Nut Lenh Trong Form duynghiep89 1 119 19-05-16, 01:18 AM
Bài mới nhất: ongke0711
  GIẢI THÍCH CÁC LỆNH KHI VIẾT CODE huynhbahoc 3 2,945 26-03-16, 09:19 PM
Bài mới nhất: phuc_thanhtien
  Xin hình các nút lệnh caytregiavn77 5 508 13-02-16, 09:21 PM
Bài mới nhất: ongke0711
  [Help] Làm sao ghi giờ khi mở form và nút lệnh thực hiện ghi giờ khi kết thúc form tronghieu9792 2 266 25-01-16, 11:30 AM
Bài mới nhất: tronghieu9792

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ơ