Question

How to get only similar words that exist in two strings in VB.NET

Answer 1

Imports System
Imports System.Linq

Module Program

    Sub Main()
        Dim s1 As String = "c# c++ java php javascript vb"
        Dim s2 As String = "c python c++ c# java node.js"

        Dim matches = GetCommonWords(s1, s2)

        For Each word In matches
            Console.WriteLine(word)
        Next
    End Sub

    Function GetCommonWords(a As String, b As String) As String()
        Dim words1 = a.Split(" "c, StringSplitOptions.RemoveEmptyEntries)
        Dim words2 = b.Split(" "c, StringSplitOptions.RemoveEmptyEntries)

        Return words1.Intersect(words2).ToArray()
    End Function

End Module
 
 
 
' run:
' 
' c#
' c++
' java
'

 

70+ SQL courses for beginners and professionals