Dim s2 as string = " English"
Dim s3 as string = " Maths"
Dim s4 as string = " Science"
Dim n as string = console.ReadLine()
Dim n2() as string = n.Split(",")
Dim n3 as integer = n2(0)
Dim n4 as integer = n2(1)
Dim n5 as integer = n2(2)
Dim n6 as integer = n2(3)
Console.WriteLine("{0,-20}.{1,10}{2,10}", s1, s2, s3, s4)
Console.WriteLine("{0,-20}.{1,10}{2,10}", "123", "40", "50")