Question

How to insert spaces between words that start with capital in a string with VB.NET

Answer 1

Imports System
				
Public Module Module1
	Public Function insert_spaces(s As String) As String
		For i As Integer = 1 To s.Length + 1
			If (s(i) >= "A" And s(i) <= "Z") Then 
				 s = s.Insert(i, " ")
				 i += 1
			End If
		Next
        return s
	End Function 
	Public Sub Main()
		Dim s as String = "PythonJavaF#C++C#"
			
		s = insert_spaces(s)
			
		Console.WriteLine(s)
	End Sub
End Module



' run:
'
' Python Java F# C++ C#
'

 

70+ SQL courses for beginners and professionals