fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. dim kusai as string = "kusai"& vbNewLine & "ahmad"
  6. dim sarray() as string = kusai.Split(vbNewLine)
  7. Console.WriteLine(sarray(0))
  8. Console.WriteLine(sarray(1))
  9.  
  10. if sarray(1) = "ahmad" then
  11. Console.WriteLine("اه")
  12. end if
  13. End Sub
  14. End Class
Success #stdin #stdout 0.07s 25584KB
stdin
Standard input is empty
stdout
kusai

ahmad