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. svalor = "hola"
  11. Catch oExcep As System.InvalidCastException
  12.  
  13. Console.WriteLine(oExcep.ToString())
  14. Console.WriteLine("fin")
  15. end try
  16. End Sub
  17. End Class
Success #stdin #stdout 0.07s 13312KB
stdin
Standard input is empty
stdout
Introducir un número