Find words whose first and last three letters are equal: Difference between revisions

Content added Content deleted
Line 866: Line 866:


=={{header|VBScript}}==
=={{header|VBScript}}==
After building a program checking for the 3 letters in any order, i found people just checked the letters in the same order at star and end. I modified my program so it puts an asterisk after the words in the "standard" answer. Run the ssript with CScript.
After building a program checking for the 3 letters in any order, I found people just checked the same trigraph at start and end. I modified my program so it puts an asterisk after the words in the "standard" answer. Run the ssript with CScript.
<lang vb>
<lang vb>
with createobject("ADODB.Stream")
with createobject("ADODB.Stream")
Retrieved from "https://rosettacode.org/wiki/Find_words_whose_first_and_last_three_letters_are_equal"