Hi all,
I'm trying to finish up my semester project and have ran into a problem.
Basically, the program is supposed to take the letters I put input in the textbox, such as "AABBCEG" and return words such as "CABBAGE" "CAGE" BAG" etc, but instead it's returning words that contain ALL of the letters, so I'm getting results like "BACKGROUNDER" "CARPETBAG" "CELEBRATING", etc. I was wondering if someone gets a free moment if you could help me come up with the correct code that I'm looking for? I'm thinking it should only be a few lines that I'm missing that will fix it. Here is my code:
CODE
Public Class Form1
Private Sub btnGo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGo.Click
lstWords.Items.Clear()
Dim allwords As IO.StreamReader = New IO.StreamReader("c:\dictionary.txt")
Dim strInput As String = txtInput.Text 'The input
Dim inputChar As Char() = strInput.ToUpper.ToCharArray 'This is the character array that would contain all of the characters (letters) in the input string in a list
'This is used to test and see if the character is there
Do While allwords.Peek <> -1
Dim testcount As Integer = 0
Dim file As String = allwords.ReadLine
For Each c As Char In inputChar ' Loop that runs through and looks at each character in the array
If file.Contains(c.ToString) Then
testcount += 1 ' If the word you're currently looking at contains that character, increment the counter by one
End If
Next
If testcount = inputChar.Length Then ' This is where the testcount comes in. Essentially this takes the number and if all the characters in the array (the input string) were found in the word, then it outputs the word
lstWords.Items.Add(file)
End If
Loop
End Sub
End Class
Thanks for any help.
| 