Не могу сравнить две переменные - VB

Формулировка задачи:

                    Листинг программы
                
 
                        
                          
                    
TP1
  Mem1   
  Mem2   
  Mem3   
 
  TP2
  El1   
  El2   
 
  Nastroyka
  Korekciya  TP1
  Poshuk  TP2
 
 PB_Frm2Nstr  Nastroyka
 PB_Frm2NstrTmp  Nastroyka

В условии ошибка "несответствие типов"

                    Листинг программы
                
PB_Frm2Nstr = PB_Frm2NstrTmp

А как тогда сравнить ?

Решение задачи: «Не могу сравнить две переменные»

textual
                            Листинг программы 
                        
 
                            
                        
<font color="blue">Public</font> <font color="blue">Type</font> Korekciya
  Left <font color="blue">As</font> <font color="blue">Long</font>
  LeftBl <font color="blue">As</font> <font color="blue">Boolean</font>
  Poshuk1 <font color="blue">As</font> <font color="blue">String</font> * <font color="darkblue"><b>20</b></font>
  Poshuk1Bl <font color="blue">As</font> <font color="blue">Boolean</font>
  Poshuk2 <font color="blue">As</font> <font color="blue">String</font> * <font color="darkblue"><b>20</b></font>
  Poshuk2Bl <font color="blue">As</font> <font color="blue">Boolean</font>
  Zamina1 <font color="blue">As</font> <font color="blue">String</font> * <font color="darkblue"><b>20</b></font>
  Zamina2 <font color="blue">As</font> <font color="blue">String</font> * <font color="darkblue"><b>20</b></font>
  PershaLiteraVelika <font color="blue">As</font> <font color="blue">Boolean</font>
  AvtomKoreguvatiVse <font color="blue">As</font> <font color="blue">Boolean</font>
<font color="blue">End</font> <font color="blue">Type</font>
 
<font color="blue">Public</font> <font color="blue">Type</font> DlaPoshukuArt 
  MojlivoArtCePapka <font color="blue">As</font> <font color="blue">Boolean</font> 
  MinatiMiscamiPrizvImya <font color="blue">As</font> <font color="blue">Boolean</font> 
  DeleteLishniZnaki <font color="blue">As</font> <font color="blue">Boolean</font> 
  KilkaArtistiv <font color="blue">As</font> <font color="blue">Boolean</font> 
  YakshoArtistaNeZnaydeno <font color="blue">As</font> <font color="blue">Boolean</font> 
  PoshukSkorocheno <font color="blue">As</font> <font color="blue">Boolean</font>
  PoshukPoPrizv <font color="blue">As</font> <font color="blue">Boolean</font> 
  NavchitiYakshoNeznaydeno <font color="blue">As</font> <font color="blue">Boolean</font>
  BilsheOdnogoVariantuVibir <font color="blue">As</font> <font color="blue">Boolean</font> 
<font color="blue">End</font> <font color="blue">Type</font>
 
<font color="blue">Public</font> <font color="blue">Type</font> Nastroyka
  Korekciya <font color="blue">As</font> Korekciya
  Poshuk <font color="blue">As</font> DlaPoshukuArt
<font color="blue">End</font> <font color="blue">Type</font>
 
<font color="blue">Public</font> PB_Frm2Nstr <font color="blue">As</font> Nastroyka