Anonymous user
Word wheel: Difference between revisions
→{{header|FreeBASIC}}
Line 1,266:
Sub show(g As String,file As String,byref matches as long,minsize as long,mustdo as string)
Redim As String s()
Var L=lcase(loadfile(file))
g=lcase(g)
string_split(L,Chr(10),s())
For m As Long=minsize To len(g)
| |||