QueryTable в FindowsForms (VisualStudio2010(VB))

[psybehemoth]

Подскажите, как правильно записать следующий код
(работаю c WindowsForms в VisualStudio2010(VB))

Dim QTB As String 
QTB = "C:\LITER\Temp\step1.txt" 
Dim oQryTable As Object 
oQryTable = oSheet1.QueryTables.Add("OLEDB;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _ 
QTB & ";", oSheet1.Range("A1"), ) 
oQryTable.RefreshStyle = xlInsertEntireRows 
oQryTable.Refresh(False)

выдает ошибку в строке oQryTable.RefreshStyle = xlInsertEntireRows
не нравится ему именно xlInsertEntireRows