VBA, <strike>46</strike> <strike>44</strike> 41 bytes
===

    Function f(i,j)
    f=i Mod j = 0
    End Function