Red de conocimiento informático - Material del sitio web - Preguntas de programación de VB, Preguntas de programación de VB, Ayuda del equipo de VB, Ayuda de VB Masters, Me estoy esforzando mucho. Espero poder escribir los pasos detallados.

Preguntas de programación de VB, Preguntas de programación de VB, Ayuda del equipo de VB, Ayuda de VB Masters, Me estoy esforzando mucho. Espero poder escribir los pasos detallados.

Private Sub Command1_Click()

Atenuar Ss como único, Ss2 como único, Ss_2 como único

Ss = InputBox("Ingrese un número real")

Ss2 = Formato(Ss * Ss, " Fijo")

Ss_2 = Formato(Sqr(Ss), "Fijo")

Imprimir Ss & "El cuadrado de:" & Ss2 La raíz cuadrada de & ": " & Ss_2

End Sub