Matrices
Buenas tardes,
Sino es mucha molestia quisiera que me ayudarán para ver como hago para cargar una matriz y eliminar o modificar o consultar un elemento de esa matriz.
De antemano muchas gracias
Sino es mucha molestia quisiera que me ayudarán para ver como hago para cargar una matriz y eliminar o modificar o consultar un elemento de esa matriz.
De antemano muchas gracias
dim Matriz(1 to10) as integer
dim Matriz2(1 to 10, 1 to 10) as integer
Matriz(1)=50
Matriz(2)=60
Matriz2(1,1)=50
Matriz2(1,2)=50
dim Matriz2(1 to 10, 1 to 10) as integer
Matriz(1)=50
Matriz(2)=60
Matriz2(1,1)=50
Matriz2(1,2)=50
Pero que los elemento lo introdusca los usuarios y se puedan eliminar por botones, o moficar por botones.
Con esto asignas a la matriz el valor de un textbox:
Matriz(n)=Text1.text
Para eliminar un elemento, depende como quieras hacerlo. Si es asignarle cero a valore enteros, basta con hacer Matriz(n)=0 en un evento click o Matriz(n)=" " en caso de valore3s string.
Para eliminarlo de posición, tendrías que hacer un algoritmo que copie en una variable auxiliar el valor de la posición n+1 de la posición que quieras eliminar (n) y luego esta variable auxiliar copiarlo en la posición n. Así vas desplazando los valores.
Suponiendo que es una matriz de 10 elementos y que quieres eliminar el elemento 5, sería algo así
i=número de elemento a eliminar
For n=i to 10 do
Aux=Matriz(n+1)
Matriz(n)=Aux
n=n+1
next n
Te conviene usar matrices dinámicas para esto.
Matriz(n)=Text1.text
Para eliminar un elemento, depende como quieras hacerlo. Si es asignarle cero a valore enteros, basta con hacer Matriz(n)=0 en un evento click o Matriz(n)=" " en caso de valore3s string.
Para eliminarlo de posición, tendrías que hacer un algoritmo que copie en una variable auxiliar el valor de la posición n+1 de la posición que quieras eliminar (n) y luego esta variable auxiliar copiarlo en la posición n. Así vas desplazando los valores.
Suponiendo que es una matriz de 10 elementos y que quieres eliminar el elemento 5, sería algo así
i=número de elemento a eliminar
For n=i to 10 do
Aux=Matriz(n+1)
Matriz(n)=Aux
n=n+1
next n
Te conviene usar matrices dinámicas para esto.
