fork(1) download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim sValor As String
  6. Try
  7. Console.WriteLine("Introducir un número")
  8. sValor = Console.ReadLine()
  9. Console.WriteLine("El valor es " & sValor)
  10. Catch oExcep As System.InvalidCastException
  11. Console.WriteLine(oExcep.ToString())
  12. end try
  13. End Sub
  14. End Class
Success #stdin #stdout 0.08s 13272KB
stdin
Standard input is empty
stdout
Introducir un número
El valor es