Question

How to get the first N words from string in VB.NET

Answer 1

Imports System

Public Class Test
    Public Shared Function first_n_words(s As String, words As Integer) As String
        For i As Integer = 0 To s.Length - 1
            If s(i) = " " Then
                words -= 1
            End If
            If words = 0 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_n_words(s, 3))
    End Sub
End Class


' run
'
' vb.net c# java

 

70+ SQL courses for beginners and professionals