Según lo que entendi, mi código debería ser así:

If Combo2 = "Comienza con" Then
Adodc1.Recordset.Filter = "Rut = " & Text1 & "%"
Set DataGrid1.DataSource = Adodc1.Recordset
End If

Pero no me resulta.
La idea para este filtro es, ingresar en el Text1 "80522" y en el DataGrid aparezcan todos los que comiencen con "80522"

Gracias por la primera respuesta y ojalá me puedan seguir ayudando.

Juan Espoz