none
For Next RRS feed

  • Pergunta

  • Em um gridView ligado em datasource, criei um nova coluna onde incluí um checkbox. Criei dois botões, btn_MarcarTudo e btn_LimparTudo.
    No evento click dos botões, chamo um procedimento e passo como parametro "True" ou "False" até aí tudo funciona muito bem.

    Ao entrar no procedimento e ler a primeira linaha de comando do laço FOR Next é que ocorre o problema, ou seja, após ler ele está indo para o final do procedimento, sem executar o as instruções do FOR.

    Nota: O valor de grvNS.Rows.Count é maior que zero.

    Protected

     

    Sub setCheckBox(ByVal mySet As Boolean)
    Dim i As Integer = 0

    For
    i = 0 To i < grvNS.Rows.Count
    Dim cb As CheckBox = CType(grvNS.Rows(i).Cells(2).FindControl("cb_Analisar"), CheckBox)
    cb.Checked = mySet
    Next i

     

     

    End Sub


    Sergio Ivanenko

    • Editado Ivanenko terça-feira, 22 de dezembro de 2009 22:56
    terça-feira, 22 de dezembro de 2009 18:54

Respostas

  • Resolvi assim.

     

    Dim cb As CheckBox
    Dim i As Integer = 0

     

    For Each row As GridViewRow In grvNS.Rows
    cb =
    CType(grvNS.Rows(i).Cells(2).FindControl("cb_Analisar"), CheckBox)
    cb.Checked = mySet
    i += 1
    Next

    Eu gostaria de saber porque o o For Next não está funcionando.


    Sergio Ivanenko
    • Marcado como Resposta Ivanenko quarta-feira, 23 de dezembro de 2009 10:51
    terça-feira, 22 de dezembro de 2009 22:55

Todas as Respostas

  • Resolvi assim.

     

    Dim cb As CheckBox
    Dim i As Integer = 0

     

    For Each row As GridViewRow In grvNS.Rows
    cb =
    CType(grvNS.Rows(i).Cells(2).FindControl("cb_Analisar"), CheckBox)
    cb.Checked = mySet
    i += 1
    Next

    Eu gostaria de saber porque o o For Next não está funcionando.


    Sergio Ivanenko
    • Marcado como Resposta Ivanenko quarta-feira, 23 de dezembro de 2009 10:51
    terça-feira, 22 de dezembro de 2009 22:55
  • Ivanenko...

    Poderia ser assim também.

    For
    Each row As GridViewRow In
    grvNS.Rows
    Dim cb As CheckBox
    cb =
    CType(row.FindControl("cb_Analisar"
    ), CheckBox)
    cb.Checked = mySet
    Next


    Seu Loop estava errado, no For Next ele não aceita comparações  (X < Y) etc...

    Dessa forma deu certo:

    Protected

     

    Sub setCheckBox(ByVal mySet As Boolean)

     

    For i As Integer = 0 To GridView1.Rows.Count - 1

     

         Dim cb As CheckBox = CType(GridView1.Rows(i).Cells(2).FindControl("cb_Analisar"), CheckBox)
         cb.Checked = mySet

     

    Next

     

    End Sub

    []´s



     




    quarta-feira, 23 de dezembro de 2009 11:40
  • Alves,

    Obrigado pela informação.


    Sergio Ivanenko
    sexta-feira, 1 de janeiro de 2010 13:33