Question

How to find all non repeating characters in a string with VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Sub PrintAllNonRepeatedCharacter(ByVal str As String)
        Dim occurrences As Integer() = New Integer(255) {}

        For i As Integer = 0 To str.Length - 1
            occurrences(Convert.ToInt32(str(i))) += 1
        Next

        For i As Integer = 0 To str.Length - 1
            If occurrences(Convert.ToInt32(str(i))) = 1 Then
                Console.WriteLine(str(i))
            End If
        Next
    End Sub

    Public Shared Sub Main()
		Dim str As String = "c c++ csharp java php python vb.net"

        PrintAllNonRepeatedCharacter(str)
    End Sub
End Class





' run:
'
' s
' r
' j
' y
' o
' b
' .
' e
'

 

70+ SQL courses for beginners and professionals