Red de conocimiento informático - Problemas con los teléfonos móviles - pirámide numérica de salida vb

pirámide numérica de salida vb

El código de muestra es el siguiente:

Private?Sub?Command1_Click()

Dim?i?As?Integer

Dim ?j? Como?Entero

Dim?s?Como?Cadena

Para?i?=?1?A?5?Paso?1

s ?=? String(i?*?2?-?1,?CStr(i))

Imprimir?Spc((10?-?i?*?2)?/?2);? s

Siguiente?i

For?j?=?6?To?9?Step?1

s?=?String(9?-? 2?* ?(j?-?5),?CStr(j))

Imprimir?Spc(j?-?5);?s

Siguiente?j

¿Fin?Sub

上篇: Programación VB para encontrar las dos raíces de ax^2 bx c=0. Suponga que hay dos raíces. Utilice inputbix para entrada y m para salida. 下篇: steameve no puede abrir ccp