Advertisement
ManuMaloka

MINI PROJETO 05

Mar 7th, 2023
505
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Module Module1
  2.     Sub Main()
  3.  
  4.         Console.WriteLine("<><><><><><><><><><><><><>")
  5.         Console.WriteLine("")
  6.         Console.WriteLine("_____ MINI PROJETO 05 _____")
  7.         Console.WriteLine("")
  8.         Console.WriteLine("<><><><><><><><><><><><><>")
  9.         Console.WriteLine("")
  10.  
  11.         Dim str As String
  12.         Dim reverse As String
  13.  
  14.         Console.Write("Digite algo: ")
  15.         str = Console.ReadLine()
  16.  
  17.         reverse = StrReverse(str)
  18.  
  19.         Console.WriteLine("A string invertida de " & str & " é: " & reverse)
  20.  
  21.  
  22.         Console.ReadKey()
  23.     End Sub
  24. End Module
  25.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement