Question

How to split a string in half but not in the middle of a word with VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Sub Main(ByVal args As String())
        Dim str As String = "vb c java c++ python go"

        Dim halfstr As String = str.Substring(0, (str.Length / 2) + 1)
        Dim center As Integer = halfstr.LastIndexOf(" "c) + 1
		
        Dim parts As String() = New String() {str.Substring(0, center), str.Substring(center)}
        
		Console.WriteLine(parts(0))
        Console.WriteLine(parts(1))
    End Sub
End Class



' run:
'
' vb c java 
' c++ python go
'

 

70+ SQL courses for beginners and professionals