Solved

vb.net function

Posted on 2016-08-22
7
48 Views
Last Modified: 2016-08-22
I would like to create a function that can compare two strings but not a normal compare:

Str1 "one two three"
Str2 "two one three"


it would check that the words in the string are identical (not case sensitive) but just in the wrong order. in the example here the output could be true

It needs to be efficient, maybe regex can do this or maybe vb.net has something a method for this.

I am in visual studio app
0
Comment
Question by:PeterBaileyUk
7 Comments
 
LVL 142

Expert Comment

by:Guy Hengel [angelIII / a3]
ID: 41764902
would this google project be what you are looking for?
https://code.google.com/p/google-diff-match-patch/
0
 
LVL 12

Expert Comment

by:Ramkisan Jagtap
ID: 41764903
Better way could be create a string array and the compare the different values.
0
 

Author Comment

by:PeterBaileyUk
ID: 41764909
i dont want too resolve close matches which may happen with fuzzy stuff. only where the words are all the same but in a different order
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 

Author Comment

by:PeterBaileyUk
ID: 41764921
I found this on a thread but not sure if this will work as text and the logic is the wrong intersect

Function RevIntersect(arr1() As String, arr2() As String) As String()
    Dim sResult, aux As New List(Of String)()

    aux.AddRange(arr1)
    aux.AddRange(arr2)

    For Each elem As String In aux
        If (Not arr1.Contains(elem) OrElse Not Arr2.Contains(elem)) AndAlso _
        Not sResult.Contains(elem) Then  
            sResult.Add(elem)
        End If
    Next

    Return sResult.ToArray()
End Function

Open in new window

0
 
LVL 4

Expert Comment

by:Elizabeth Anderson
ID: 41765092
The .NET Framework provides several methods to compare the values of strings. So, it would be better to refer the link below -
https://msdn.microsoft.com/en-us/library/fbh501kz(v=vs.110).aspx
0
 
LVL 62

Accepted Solution

by:
Fernando Soto earned 500 total points
ID: 41765250
Hi Peter;

The following code snippet should do what you are looking for.
Dim str1 = "One tWo thRee".ToLower().Split(" "c)
Dim str2 = "twO oNe tHree".ToLower().Split(" "c)

If str1.All(Function(w1) str2.Contains(w1)) AndAlso str1.Length = str2.Length Then
    Console.WriteLine("All words win w1 are in w2")
Else
    Console.WriteLine("All words win w1 are NOT in w2")
End If

Open in new window

0
 

Author Closing Comment

by:PeterBaileyUk
ID: 41765579
I am going to play around with this. one thing i used to do in access was use the immediate window and push values into a module function. Does VS offer up a similar thing.? Oh and thank you, ive been slow to respond today.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
A while ago, I was working on a Windows Forms application and I needed a special label control with reflection (glass) effect to show some titles in a stylish way. I've always enjoyed working with graphics, but it's never too clever to re-invent …
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Learn how to create flexible layouts using relative units in CSS.  New relative units added in CSS3 include vw(viewports width), vh(viewports height), vmin(minimum of viewports height and width), and vmax (maximum of viewports height and width).

863 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

25 Experts available now in Live!

Get 1:1 Help Now