Posicion "fila/columna" Data Grid View - Visual Basic

[msnonlygames]

Hola a todos, queria saber como se puede sacar a un textbox la fila y la columna de un cierto numero almacenado en un data grid view, aca dejo una imagen para que capten la idea:



Por el momento uso el siguiente codigo para llenar los numeros aleatoriamente

Código PHP:

  Public Class Ejercicio2Matrices
    Const filas = 10, colum = 10 
   

Código PHP:

  Dim matriz(filas, colum) As Short
    Sub llenar()
        Randomize()
        For x As Short = 1 To filas
            For y As Short = 1 To colum
                matriz(x, y) = CInt(Rnd() * 20)
            Next
        Next
    End Sub 
   

Código PHP:

  Sub mostrar()
        dgvlista.RowCount = filas
        dgvlista.ColumnCount = colum
        For x As Short = 1 To filas
            For y As Short = 1 To colum
                dgvlista.Rows(x - 1).Cells(y - 1).Value = matriz(x, y)
            Next
        Next
    End Sub 
   

[Aquaventus]

Que quieres hacer de eso especificamente? Hallar el numero mayor? y la posicion de su columna y fila?. Saludos!.

[msnonlygames]

asi es exactamente, no se me ocurre otro modo de sacar la fila y la columna mas que por ese medio asi que lo puse asi

[Aquaventus]

Ok es sencillo.... solo tienes que recorrer el datagridview por fila y columna :

Código vb:

'Se declaran 3 Variables en las cuales se almacenaran las posiciones
        'del numero mayor, la fila y columna
        Dim numero As Integer = 0
        Dim fila As Integer = 0
        Dim columna As Integer = 0
 
        'La variable f representara las filas y se recorreran
        For f As Integer = 0 To DataGridView1.Rows.Count - 1
            'La variable c representara las columnas y se recorreran
            For c As Integer = 0 To DataGridView1.Columns.Count - 1
                'Si el valor de la celda es mayor a la variable numero
                If Convert.ToInt32(DataGridView1.Rows(f).Cells(c).Value.ToString()) > numero Then
                    'Guardo el numero, su fila y columna
                    numero = Convert.ToInt32(DataGridView1.Rows(f).Cells(c).Value.ToString())
                    fila = f
                    columna = c
                End If
            Next
        Next
 
        'Una vez finalizado el recorrido sobre la grilla
        'Pasamos los valores a los textbox
        txtNumero.Text = numero
        txtFila.Text = fila
        txtColumna.Text = columna
 

Saludos!.

EDITO: LAS COLUMNAS Y FILAS SE RECORREN CON INDICES 0(CERO) ASI QUE SI GUSTAS AL MOMENTO DE PASARLE EL VALOR A LOS TEXTBOX PUEDES SUMARLE (+1) A FILA Y COLUMNA PARA QUE SE AJUSTE A TU CASO

[msnonlygames]

Gracias perfecto pero hay un problemita siempre sale uno demas, quiero decir si la posicion es [5,8] , sale [6,9] ; o si es [2,1] sale [3,2], sabes a que se deve? ):

[Aquaventus]

pegame aqui como has hecho el codigo que te pasé

[msnonlygames]

Código PHP:

  Sub calcular()
        Dim numero As Integer = 0
        Dim fila As Integer = 0
        Dim columna As Integer = 0

        'La variable f representara las filas y se recorreran
        For f As Integer = 0 To dgvlista.Rows.Count - 1
            'La variable c representara las columnas y se recorreran
            For c As Integer = 0 To dgvlista.Columns.Count - 1
                'Si el valor de la celda es mayor a la variable numero
                If Convert.ToInt32(dgvlista.Rows(f).Cells(c).Value.ToString()) > numero Then
                    'Guardo el numero, su fila y columna
                    numero = Convert.ToInt32(dgvlista.Rows(f).Cells(c).Value.ToString())
                    fila = f
                    columna = c
                End If
            Next
        Next
        lblmayor.Text = numero
        lblfila.Text = fila
        lblcolumna.Text = columna
    End Sub 
   

[msnonlygames]

a sorry, ya esta no lei lo ultimo ):

EDITO: LAS COLUMNAS Y FILAS SE RECORREN CON INDICES 0(CERO) ASI QUE SI GUSTAS AL MOMENTO DE PASARLE EL VALOR A LOS TEXTBOX PUEDES SUMARLE (+1) A FILA Y COLUMNA PARA QUE SE AJUSTE A TU CASO

Gracias ya esta :D

[Aquaventus]

Excelente!. Saludos!.

[msnonlygames]

lo intente pero no salio como queria xD
me calculo lo siguiente ):


y utilize este codigo, supuestamente como me dijiste :P

para fila

Código vb:

Sub sumafilas()
        For f As Integer = 0 To dgvlista.Rows.Count - 1
            Dim sumafila As Integer
            For c As Integer = 0 To dgvlista.Columns.Count - 1
                sumafila = sumafila + 1
            Next
            lstlista1.Items.Add(sumafila)
        Next
 
    End Sub
 

para columna

Código vb:

Sub sumacolum()
        For f As Integer = 0 To dgvlista.Columns.Count - 1
            Dim sumacolum As Integer
            For c As Integer = 0 To dgvlista.Rows.Count - 1
                sumacolum = sumacolum + 1
            Next
 
            lstlista2.Items.Add(sumacolum)
        Next
    End Sub
 

alguna otra sugerencia? :D

[Aquaventus]

ja xD me equivoque en vez de ese (+1) va con la suma el valor de la celda, ya vez que haces COPY - PASTE y no interpretas lo que esta allí... Ya te di una pista

[msnonlygames]

No hago copy and paste, lo trato de interpretar, pero es un poco dificil para mi :/, a mi tambien me parecio raro el +1 porqe lo unico que hace es sumarte esa cantidad mas la otra, y solo quiero sumar 1 columna sin sumar la otra (:

pero aun asi no entiendo como agarrar un valor especifico...
Bueno gracias (: , seguire intentado

[Aquaventus]

Como que no sabes como agarrar un valor en especifico?? te pasé un codigo en el que había Convert.toInt32(Datagridview.Rows(f).Cells(c).Valu e.ToString()) eso obtiene el valor de la celda convertida en entero. Y despues de agregarlo al listbox setea la variable a 0(CERO):

sumacolum = 0

Si se supone que suma toda la fila... entonces piensas.... si me suma bien toda la fila por que se complementa con la fila siguiente? la solucion sería una vez pasado el valor al listbox, comenzar nuevamente de 0(CERO) que es lo que te acabo de pasar ahora. Todo es cuestion de darle un poco de cabezasos al comienzo asi se te hará facil. Saludos!.

[msnonlygames]

Listop ya salio, muchas gracias como tu dices , tengo que repasar los codigos para no olvidarloss u.u , aveces la programacion se me hace muy dificil porque todo esta en la practica. Bueno gracias por todo Aquaventus. Saludos (: