Teacher:You are given a passage. You need to construct a question about the information present in the passage. Construct a question in such a way that (i) it is unambiguous, (ii) its answer is the whole paragraph. Avoid creating questions that can be answered correctly without actually understanding the paragraph.
Teacher: Now, understand the problem? Solve this instance: Sorry in advance if Yahoo eats my indentation, but I think you are looking for something like this (tested under Access 2000):

Public Sub FiddlingWithQueryObjectsViaVBA()

Dim dbs As DAO.Database
Set dbs = CurrentDb
Dim qrydef As QueryDef

Dim sSQLstring As String
Dim sQueryNames As String

For Each qrydef In dbs.QueryDefs ' iterate through all the Access query objects

sSQLstring = UCase$(qrydef.SQL) ' Get the SQL for the current query

If InStr(sSQLstring, "SOMETHING_I_AM_LOOKING_FOR") > 0 Then ' I found what I'm looking for?

sSQLstring = Replace$(sSQLstring, "SOMETHING_I_AM_LOOKING_FOR", "REPLACEMENT_TEXT") ' replace the text
qrydef.SQL = sSQLstring ' update the query object with the new SQL

sQueryNames = sQueryNames & qrydef.Name & vbCrLf ' Maybe make a list of queries modified?
End If

Next

MsgBox "Modified the following queries:" & vbCrLf & sQueryNames

End Sub
Student:
How do you use VBA to change the SQL code of an Access query?