Question

How to check if second string a rotated version of first string in VB.NET

Answer 1

Imports System

Public Class Program
    Friend Shared Function isSecondStringRotatedOfFirstString(ByVal str1 As String, ByVal str2 As String) As Boolean
        If str1.Length <> str2.Length Then
            Return False
        End If

        Dim concatenated As String = str1 & str1
        
        Return concatenated.IndexOf(str2, StringComparison.Ordinal) <> -1
    End Function

    Public Shared Sub Main(ByVal args As String())
        Dim first As String = "abcdefg"
        Dim second As String = "cdefgab"
        
        Console.Write((If(isSecondStringRotatedOfFirstString(first, second), "yes", "no")))
    End Sub
End Class



' run:
'
' yes
' 

 

70+ SQL courses for beginners and professionals