mcs/class/Microsoft.VisualBasic/Test/standalone/5093.vb

   1 Imports Microsoft.VisualBasic \r
   2 Imports System\r
   3 Public Class TestClass \r
   4         Public Function Test() As String\r
   5                 'Begin Code\r
   6                         Dim result As String = LCase ("asdfghj")\r
   7                         Return result\r
   8                 'End Code\r
   9         End Function\r
  10 End Class\r