Question

How to get the first word from string in VB.NET

Answer 1

Imports System

Public Class Test
    Public Shared Function first_word(s As String) As String
        For i As Integer = 0 To s.Length - 1
            If s(i) = " " Then
                Return s.Substring(0, i)
            End If
        Next
        Return ""
    End Function
    
    Public Shared Sub Main()
        Dim s As String = "vb.net c# java php c"
        
        Console.WriteLine(first_word(s))
    End Sub
End Class


' run
'
' vb.net

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System

Public Class Test
    Public Shared Sub Main()
        Dim s As String = "vb.net javascript php c c++ python c#"
         
        Console.Write(s.Substring(0, s.IndexOf(" ")))
        
    End Sub
End Class



' run:
' 
' vb.net
'

 

70+ SQL courses for beginners and professionals

Answer 3

Imports System

Public Class Test
    Public Shared Sub Main()
        Dim s As String = "vb.net javascript php c c++ python c#"
         
        Dim first_word As String = s.Split(" ")(0)
         
        Console.Write(first_word)
        
    End Sub
End Class



' run:
' 
' vb.net
'

 

70+ SQL courses for beginners and professionals

Answer 4

Imports System

Public Class Test
    Public Shared Sub Main()
        Dim s As String = "vb.net javascript php c c++ python c#"
         
        Dim first_word As String
        
        first_word = if ((s.IndexOf(" ") > -1), s.Substring(0, s.IndexOf(" ")), s)

        Console.Write(first_word)
        
    End Sub
End Class



' run:
' 
' vb.net
'

 

70+ SQL courses for beginners and professionals