Question

How to check if length of a string is equal to the number appended at its end in VB.NET

Answer 1

Imports System
Imports System.Text.RegularExpressions

Public Class Program
    Public Shared Function extractLastNumber(ByVal str As String) As Integer
        Dim arr As String() = Regex.Split(str, "\D+")

        Return Integer.Parse(arr(arr.Length - 1))
    End Function

    Public Shared Function stringLenghtEqualToNumberAtEnd(ByVal str As String) As Boolean
        Return str.IndexOfAny(New Char() {"0"c, "1"c, "2"c, "3"c, "4"c, "5"c, "6"c, "7"c, "8"c, "9"c}) = extractLastNumber(str)
    End Function

    Public Shared Sub Main()
        Dim str As String = "vb programming14"
		
        Console.Write(stringLenghtEqualToNumberAtEnd(str))
    End Sub
End Class






' run:
'
' True
'

 

70+ SQL courses for beginners and professionals