엑셀  VBA 쓰다가 VB2010으로 컨버팅하고 잇는데

VB2010에는 set이 없다...ㅡㅡ

setAttr 을 자꾸 쓰라카는데 VBA에서 코드가

If XAQuery_t1101 Is Nothing Then
        Set XAQuery_t1101 = CreateObject(\"XA_DataSet.XAQuery\")
        XAQuery_t1101.ResFileName = Sheet1.Cells(4, 8) & \"\\t1101.res\"
    End If

이거라면

VB 2010에서는 어떻게 바꿔야함,?