He: What is the only one common, uncapitalized 7-letter English word, containing just a single vowel, that does not include the letter s within it? (Puzzlemaster Will Shortz).
I: How about an uncapitalized 8-letter word, less common, but widely accepted with a single vowel, no s as well? One only exists – as far as I know. (Ady Tzidon)
You: Find both. (Addressed to flooble solvers).
Due to a bug, capital letters weren't considered among the vowels. Clearly twelfth is the only answer for length 7 and no answer was found for length 8.
Private Sub Form_Load()
Form1.Visible = True
Text1.Text = ""
crlf = Chr$(13) + Chr$(10)
Open "c:\words\words.txt" For Input As #1
Line Input #1, l$
If Len(l) > 6 Then
ct = 0
For i = 1 To Len(l)
If InStr("aeiouy", Mid(l, i, 1)) > 0 Then ct = ct + 1
If ct < 2 And InStr(l, "s") = 0 Then
Text1.Text = Text1.Text & l & crlf
Loop Until EOF(1)
Text1.Text = Text1.Text & crlf & " done"
Posted by Charlie
on 2017-10-16 18:32:37