ledangvan > 31-10-15, 11:45 AM
tranthanhan1962 > 31-10-15, 06:28 PM
Private Sub GroupFooter1_Format(Cancel As Integer, FormatCount As Integer)
If Len(MSTK.Value) = 5 Then
GroupFooter1.Visible = True
Else
GroupFooter1.Visible = False
End If
End Sub
Private Sub GroupHeader1_Format(Cancel As Integer, FormatCount As Integer)
If Len(MSTK.Value) = 4 Then
GroupHeader1.Visible = True
Else
GroupHeader1.Visible = False
End If
End Sub
ledangvan > 31-10-15, 07:02 PM
(31-10-15, 06:28 PM)tranthanhan1962 Đã viết: Có phải ý của bạn là nếu MSTK=MSTK cấp 1 (có nghĩa là MSTK có số ký tự là 4) sẽ bị ẩn chứ gì?
Nếu như vậy bạn viết code tại group hiển thị của nó như sau:
Ví dụ trên report của bạn nó là GroupFooter1
Mã:Private Sub GroupFooter1_Format(Cancel As Integer, FormatCount As Integer)
If Len(MSTK.Value) = 5 Then
GroupFooter1.Visible = True
Else
GroupFooter1.Visible = False
End If
End Sub
Tương tự nếu bạn muốn ẩn luôn tài khoản đó khi nó bằng tài khoản cha (Tài khoản có 3 ký tự)
Mã:Private Sub GroupHeader1_Format(Cancel As Integer, FormatCount As Integer)
If Len(MSTK.Value) = 4 Then
GroupHeader1.Visible = True
Else
GroupHeader1.Visible = False
End If
End Sub
* Bạn phải cần tạo một textbox MSTK tại một group nào đó hoặc detail cũng được. Nếu không muốn nhìn thấy textbox này set Visible cho nó bằng false
tranthanhan1962 > 31-10-15, 11:30 PM
Private Sub GroupFooter1_Format(Cancel As Integer, FormatCount As Integer)
If Len(NHOM2.Value) = True Then
GroupFooter1.Visible = True
Else
GroupFooter1.Visible = False
End If
End Sub