none
Me deja la variable en blanco y no puedo cogerla en otro momento RRS feed

  • Pregunta

  • buenas 

    me lee bien el codigo pero cuando le voy a meter mano a la variable que la llamo desde otro form

    esta en blanco o vacia

    gracias

    Public Shared Codigo_Estilo_Cerveza As String 'VARIABLE PUBLICA
    
    
    Sub Codigo_Bjcp()
            Try
    
                Dim _Value = Convert.ToString(DataGridView1.CurrentRow.Cells(2).Value)
                Dim Codigo_Estilo_Cerveza = String.Empty 'Declarar e inicializar
                For Each Row As DataGridViewRow In Receta_Nueva.Dgv_Tabla_Estilos.Rows
                    If Convert.ToString(Row.Cells(0).Value).Contains(_Value) Then
                        Codigo_Estilo_Cerveza = String.Concat(Row.Cells(3).Value, " ", Row.Cells(4).Value)
                        Exit For
                    End If
                Next
    
                If Codigo_Estilo_Cerveza = String.Empty Then
                    MessageBox.Show("No está definido como estilo")
                Else
                    Button13.Text = Codigo_Estilo_Cerveza
                   
                End If
    
                
    
                   
    
            Catch ex As Exception
                MsgBox(ex.ToString())
            End Try
        End Sub

    sábado, 9 de diciembre de 2017 21:48

Respuestas

  • Nota que el valor que recuperas, dentro del procedimiento Sub 'Codigo_Bjcp', lo asignas a la variable 'Codigo_Estilo_Cerveza' que declaras dentro del procedimiento, no a la variable Shared que declaras -entiendo- en un módulo.

    Es claro, no debes declarar una nueva variable, sólo asignar un valor de inicio.

    Dim _Value = Convert.ToString(DataGridView1.CurrentRow.Cells(2).Value)
    Dim Codigo_Estilo_Cerveza = String.Empty

    • Propuesto como respuesta Alberto PoblacionMVP domingo, 10 de diciembre de 2017 8:28
    • Marcado como respuesta JETET domingo, 10 de diciembre de 2017 14:31
    sábado, 9 de diciembre de 2017 22:08

Todas las respuestas

  • Nota que el valor que recuperas, dentro del procedimiento Sub 'Codigo_Bjcp', lo asignas a la variable 'Codigo_Estilo_Cerveza' que declaras dentro del procedimiento, no a la variable Shared que declaras -entiendo- en un módulo.

    Es claro, no debes declarar una nueva variable, sólo asignar un valor de inicio.

    Dim _Value = Convert.ToString(DataGridView1.CurrentRow.Cells(2).Value)
    Dim Codigo_Estilo_Cerveza = String.Empty

    • Propuesto como respuesta Alberto PoblacionMVP domingo, 10 de diciembre de 2017 8:28
    • Marcado como respuesta JETET domingo, 10 de diciembre de 2017 14:31
    sábado, 9 de diciembre de 2017 22:08
  • la verdad que no probe eso que comentas vaya tonteria

    gracias

    domingo, 10 de diciembre de 2017 9:20