ModuleModule1 Sub Main() For index = 1To 10 If index = 7Then Console.WriteLine("Seven Found") Exit For End If Console.WriteLine(index) Next Console.ReadLine() End Sub End Module
Module Module1 Sub Main() Dim x As String = "Mathi" Dim y As String = " Krishnan" Dim name As String = x.ToUpper & y.ToUpper Console.WriteLine(name) Console.ReadLine() End Sub End Module
Comments
Post a Comment