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. end try
  15. Console.WriteLine("fin")
  16.  
  17. End Sub
  18. End Class
Success #stdin #stdout 0.07s 13352KB
stdin
Standard input is empty
stdout
Introducir un número
fin