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