Public Module Program
	Public Sub Main(args() As string)
	  dim str as string = "Jintana Tantisuk <[email protected]>; Supida Srisan <[email protected]>; Don Charron <[email protected]>; Sukanlaya Rungthong <[email protected]>; Sakchai Wonggulya <[email protected]>; Rassarin Pisitpanupat <[email protected]>; Chakkrit Supharatsophin <[email protected]>; Surapa Thinsith <[email protected]>; Siriwan Nuchfang <[email protected]>; Sopa Radtanaarj <[email protected]>; Somsak Chaowachata <[email protected]>; Meechai Charatpattanawong <[email protected]>; Warimon Tadanukunwattana <[email protected]>; Chirawat Ayuwat <[email protected]>; Amornrit Akesomtaramet <[email protected]>; Sarawut Jarusirisawat <[email protected]>; Somrak Boonchit <[email protected]>; Sineenat Khampasri <[email protected]>; Chawana Tatong <[email protected]>; Tassawan Iamsaard <[email protected]>; Tawee Tongyoy <[email protected]>; Somsak Chaowachata <[email protected]>; Parichat Kaikum <[email protected]>; Promlikit Kawang <[email protected]>; Doungnapa Tantisuwanna <[email protected]>; Saifon Onkerd <[email protected]>; Kamolwan Kaewbiang <[email protected]>; Chollada Charoennak <[email protected]>; Eg-gachai Kaenpukdee <[email protected]>; Anurak Kuthinnok <[email protected]>; Onuma Maisuwan <[email protected]>; Isaya Charittham <[email protected]>; Pramote Thonglon <[email protected]>; Sangusa Preedikhanit <[email protected]>; Jittraporn Palakawong-Na-Ayutthaya <[email protected]>; Tiraporn Premchitsukon <[email protected]>; Juthamat Kusonsong <[email protected]>; Nipaporn Kaenpukdee <[email protected]>; Naiyarat Rachapu <[email protected]>; Chattree Kongwan <[email protected]>; Ratchanee Morpadungkul <[email protected]>; Sirinnut Kachenthorn <[email protected]>; Supachai Rintong <[email protected]>; Pattanapong Singhapat <[email protected]>; Nopparat Khaonu <[email protected]>; Damrongsak  Sangngeon <[email protected]>; Jaruwan Wivut <[email protected]>; Kanyarat Choysamrong <[email protected]>; Kannika Sirisomboon <[email protected]>; Chalotorn Atthaphol <[email protected]>; Sunantha Kongsri <[email protected]>; Tassaporn Keratidumkeangsagul <[email protected]>; Penpak Kongthian <[email protected]>; Chudapa Petthong <[email protected]>; Kornwisa Wanitcharoen <[email protected]>; Panuwat Teewasart <[email protected]>; Taweesak  Rungroch <[email protected]>; Sumida Namwong <[email protected]>; Wannasorn Thongnoy <[email protected]>; Prasert Jirasaksanguan <[email protected]>; Kasemsiri Sinsamoot <[email protected]>; Nared Seubsimma <[email protected]>; Autthapol Matura <[email protected]>; Waralak Rummaneerattanakul <[email protected]>; Siriluck Praesomboon <[email protected]>; Akkarin Janjaemjeng <[email protected]>; Arthit  Runkhunyong <[email protected]>; Tida Cheewanit <[email protected]>; Jiraporn Nammontree <[email protected]>; Ratchakorn Tangworrakitt <[email protected]>; Kessurang Potjanasuntorn <[email protected]>; Nuntana Yoysang <[email protected]>; Pitchwanraya Sakullertmongkol <[email protected]>; Teeraphorn Khrueabkontho <[email protected]>; Sarit Sitthikhun <[email protected]>; Chanantida Mahanam <[email protected]>; Sunisa Khampa <[email protected]>; Jakkarin Lueangon <[email protected]>; Wasana Chankhana <[email protected]>; Piyawadee Naranan <[email protected]>; Buraporn Wongpeng <[email protected]>; Darun Pimsuwana <[email protected]>; Nuchjaree Decha <[email protected]>; Wananya Panittrakankul <[email protected]>; Sriwarin Chunloi <[email protected]>; Prapasri Saelim <[email protected]>; Benjaporn Kulprapapan <[email protected]>; Wanwipha Anusornkawphong <[email protected]>; Kanlayanee Preecha <[email protected]>; Piguntong Triluk <[email protected]>; Chitsanupong Ngamchom <[email protected]>; Narongsak Saelao <[email protected]>; Kun Surachaipanya <[email protected]>; Winai Nakamsri <[email protected]>; Patticha Jadnok <[email protected]>; Pokpon Sunsirikul <[email protected]>; Jaruek Inthayord <[email protected]>; Aunchalee Marangsee <[email protected]>; Nataya Wonghran <[email protected]>; Nanticha Panicharoen <[email protected]>; Rachot Sakdadej <[email protected]>; Tipsuda Patsorn <[email protected]>; Somdred Youpool <[email protected]>; Anu Sakpibal <[email protected]>; Wanlop Meesiri <[email protected]>; Anurak Kuthinnok <[email protected]>; Torsak Chakijdee <[email protected]>; Kaninyada Taweesitpornsanga <[email protected]>; Niwon Thanomrot <[email protected]>; Saowanee Komkham <[email protected]>; Bongkoch Suphatho <[email protected]>; Saranya Aimthaworn <[email protected]>; Supapohn Rungniyom <[email protected]>; Taweesak  Rungroch <[email protected]>; Supattra Tasngamtaun <[email protected]>; Somchai Sahatsatara <[email protected]>; Junjira Tubsing <[email protected]>; Kanticha Soodsida <[email protected]>; Nat Suwannek <[email protected]>; Pisit Wuttivanichayakul <[email protected]>; Thiraya Chotthananan <[email protected]>; Panitee Wimutkasem <[email protected]>; Arunvipa Vilajan <[email protected]>; Pilawan Poonphaka <[email protected]>; Somlerk Singto <[email protected]>; Saranya Aimthaworn <[email protected]>; Thanapat Imsa-ard <[email protected]>; Wimonporn Surimaung <[email protected]>; Oraphan Pasuk <[email protected]>; Sirinapha Wangnong <[email protected]>; Surawut Sukkum <[email protected]>; Anward Khongwong <[email protected]>; Pichaya Srisattaya <[email protected]>; Supawan Promtong <[email protected]>; Anupong Jadnok <[email protected]>; Thammanoon Monthalop <[email protected]>; Thanawat Ladla <[email protected]>; Ponpimon Phongphal <[email protected]>; Natenapit Worachit <[email protected]>; Arissara Chantra <[email protected]>; Kankamon Saowapakayawong <[email protected]>; Netima Thumthong <[email protected]>; Anantaporn Namtham <[email protected]>; Kantima Kakhai <[email protected]>; Chanapha Prasoetphakhin <[email protected]>; Pannara Surin <[email protected]>; Rungtip Intawong <[email protected]>"
		 Dim strArr() As String
		 strArr = str.Split(";")
		 Dim count As Integer
		
		For count = 0 To strArr.Length - 1
            	Console.WriteLine(count & ": " & strArr(count).Trim)
        Next
	End Sub
End Module

Visual basic (VB.net) Online Compiler

Write, Run & Share VB.net code online using OneCompiler's VB.net online compiler for free. It's one of the robust, feature-rich online compilers for VB.net language, running on the latest version 16. Getting started with the OneCompiler's VB.net compiler is simple and pretty fast. The editor shows sample boilerplate code when you choose language as VB.net. OneCompiler also has reference programs, where you can look for the sample code to get started with.

Read input from STDIN in VB.net

OneCompiler's VB.net online editor supports stdin and users can give inputs to programs using the STDIN textbox under the I/O tab. Following is a sample VB.net program which takes name as input and prints hello message with your name.

Public Module Program
	Public Sub Main(args() As string)
	 Dim name as String = Console.ReadLine()    ' Reading input from STDIN
   Console.WriteLine("Hello " & name)           ' Writing output to STDOUT
	End Sub
End Module

About VB.net

Visual Basic is a event driven programming language by Microsoft, first released in the year 1991.

Key Features

  • Beginner's friendly language.
  • Simple and object oriented programming language.
  • User friendly language and easy to develop GUI based applications.

Syntax help

Variables

Variable is a name given to the storage area in order to identify them in our programs.

Simple syntax of Variable declaration is as follows

Dim variableName [ As [ New ] dataType ] [ = initializer ]

Variable initialization

variableName = value

Conditional Statements

1. If

If condition-expression Then 
    'code
End If

2. If-else

If(conditional-expression)Then
   'code if the conditional-expression is true 
Else
  'code if the conditional-expression is false 
End If

3. If-else-if ladder

If(conditional-expression)Then
   'code if the above conditional-expression is true 
Else If(conditional-expression) Then
        'code if the above conditional-expression is true 
    Else
        'code if the above conditional-expression is false 
End If

4. Nested-If

If(conditional-expression)Then
   'code if the above conditional-expression is true
   If(conditional-expression)Then
         'code if the above conditional-expression is true 
   End If
End If

5. Select Case

Select [ Case ] expression
   [ Case expressionlist
      'code ]
   [ Case Else
      'code ]
End Select

Loops

1. For..Next

For counter [ As datatype ] = begin To end [ Step step ]
   'code
   [ Continue For ]
   'code
   [ Exit For ]
   'code
Next [ counter ]

2. For..Each

For Each element [ As datatype ] In group
   'code
   [ Continue For ]
   'code
   [ Exit For ]
   'code
Next [ element ]

3. While

While conditional-expression
   'Code 
   [ Continue While ]
   'Code
   [ Exit While ]
   'Code
End While

4. Do-while

Do { While | Until } conditional-expression
   'Code
   [ Continue Do ]
   'Code
   [ Exit Do ]
   'Code
Loop

Do
   'Code
   [ Continue Do ]
   'Code
   [ Exit Do ]
   'Code
Loop { While | Until } conditional-expression

Procedures

Procedure is a sub-routine which contains set of statements. Usually Procedures are written when multiple calls are required to same set of statements which increases re-usuability and modularity.

Procedures are of two types.

1. Functions

Functions return a value when they are called.

[accessModifiers] Function functionName [(parameterList)] As returnType
   'code
End Function

2. Sub-Procedures

Sub-procedures are similar to functions but they don't return any value.

Sub ProcedureName (parameterList)
'Code
End Sub