1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
|
Private Sub gvFactures_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles gvFactures.RowDataBound
Dim row As GridViewRow = e.Row
Dim lblvg As Label
Dim lkbvg As LinkButton
Dim b As Boolean
'verifier que c''est une ligne de donné qui est créé'
If row.RowType = DataControlRowType.DataRow Then
'affecter le label "lblAnnuler" a la variable label "lblvg"'
lblvg = CType(row.FindControl("lblAnnuler"), Label)
'recuperer le contenu de la propriété Text (soit true soit false)'
b = lblvg.Text
'suivant le contenu recupérer barrer le text des cellules 1 et 2'
row.Cells.Item(1).Font.Strikeout = b
row.Cells.Item(2).Font.Strikeout = b
'affecter le linkbouton "lkbAnnuler" à la variable lkbvg'
lkbvg = CType(row.FindControl("lkbAnnuler"), LinkButton)
'rendre visible le linkbouton à l''inverse de la valeur contenu dans b'
lkbvg .Visible = Not b
'ainci de suite ...'
lkbvg = CType(row.FindControl("lkbRetablir"), LinkButton)
lkbvg .Visible = b
lblvg = CType(row.FindControl("lblDateVisaGF"), Label)
lblvg.Text = "Visa du " & lblvg.Text
end if
End Sub |