[ACCESS] Как добавить запись в таблицу - VB

Хоть стреляйте из двухстволки, ну не доходит и до меня!
вот предложили код

strSQL  

  IsNull(.txtРайон.Value) 
    strSQL =  & _
 & .txtРайон.Value & 
    CurrentDb.Execute strSQL

    MsgBox , vbExclamation, 
 

обработал его под себя (Таблица: Подстанции 2 поля одно

счетчик

второе

Подстанции

)
получилось так

strSQL  

  IsNull(.txtРайон.Value) 
    strSQL =  & _
 & Подстанция.text &  
    CurrentDb.Execute strSQL 
 

чего не так сделал?

textual
                            Листинг программы 
                        
                            DoCmd.SetWarnings False