Red de conocimiento informático - Material del sitio web - ¿Cómo comparar dos números en vb, uno de los cuales se sabe que es 10?

¿Cómo comparar dos números en vb, uno de los cuales se sabe que es 10?

Subcomando privado 1_Click()

Atenuar a como variante

A = matriz (-2, 73, 82, -76, -1, 24, 321, -25, 89,- 20)'Establezca el número a comparar. Si son dos números, escriba 2.

Encuentra los valores mínimo y máximo.

Dim amin es un número entero

Dim amax es un número entero

Marcar I como un número entero

Mostrar zd como un número entero

Marcar zx como un número entero

De forma predeterminada, el primero es el valor máximo y mínimo, y luego, a partir del segundo, se compara con el primero.

amax = a(0)

amin = a(0)

Para i = 0 a 9

Si el valor es mayor que El valor máximo registrado, que reemplazará el valor máximo.

Si a(i)>= amax entonces

amax = a(i)

zd=i+1

Si. .. terminará

Si el valor es menor que el valor mínimo registrado, el valor reemplazará el valor mínimo.

Si a(I)< entonces Amin

amin = a(i)

zx=i+1

Será terminar si...

Entonces

Imprimir "valor mínimo":& Wu Huimin

Imprimir "valor máximo":& Una carta de gestión Programa de herramientas para el área de almacenamiento temporal

Imprimir "La posición máxima es"&;zx&"pieces"

Imprimir "La posición mínima son las primeras"&;zx&"pieces" ”

Conector final