tion3_GotFocus (). BackColor= amp; HFFFF80Sub  
 Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option4_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option4_LostFocus (). BackColor= amp; H808080Sub 
  Форма 9 - Питання 8 
  Private Sub Command1_Click () Option3=True Then Me.Tag=Form8.Tag + 1 Else Me.Tag=Form8.Tag.Hide.ShowSubSub Command2_Click (). ShowSubSub Option1_GotFocus (). BackColor= amp ; HFFFF80Sub 
  Private Sub Option1_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option2_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option2_LostFocus () 
  Option2.BackColor= amp; H808080Sub 
  Private Sub Option3_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option4_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option4_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option5_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option5_LostFocus (). BackColor= amp; H808080Sub 
  Форма 10 - Питання 9 
  Private Sub Command1_Click () Option3=True Then Me.Tag=Form9.Tag + 1 Else Me.Tag=Form9.Tag.Hide.ShowSubSub Command2_Click (). ShowSubSub Option1_GotFocus (). BackColor= amp ; HFFFF80Sub 
  Private Sub Option1_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option2_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option2_LostFocus () 
  Option2.BackColor= amp; H808080Sub 
  Private Sub Option3_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option4_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option4_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option5_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option5_LostFocus (). BackColor= amp; H808080Sub 
				
				
				
				
			  Форма 11 - Питання 10 
  Private Sub Command1_Click () Option3=True Then Me.Tag=Form10.Tag + 1 Else Me.Tag=Form10.Tag.Hide.ShowSubSub Command2_Click (). ShowSubSub Option1_GotFocus (). BackColor= amp ; HFFFF80Sub 
  Private Sub Option1_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option2_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option2_LostFocus () 
  Option2.BackColor= amp; H808080Sub 
  Private Sub Option3_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option4_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option4_LostFocus (). BackColor= amp; H808080Sub 
  Форма 12 - Питання 11 
  Private Sub Command1_Click () Option3=True Then Me.Tag=Form11.Tag + 1 Else Me.Tag=Form11.Tag.Hide.ShowSubSub Command2_Click (). ShowSubSub Option1_GotFocus (). BackColor= amp ; HFFFF80Sub 
  Private Sub Option1_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option2_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option2_LostFocus () 
  Option2.BackColor= amp; H808080Sub 
  Private Sub Option3_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option4_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option4_LostFocus (). BackColor= amp; H808080Sub 
  Форма 13 - Питання 12 
  Private Sub Command1_Click () Option3=True Then Me.Tag=Form12.Tag + 1 Else Me.Tag=Form12.Tag.Hide.ShowSubSub Command2_Click (). ShowSubSub Option1_GotFocus (). BackColor= amp ; HFFFF80Sub 
  Private Sub Option1_LostFocus (). BackColor= amp; H808080Sub 
  Private Sub Option2_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option2_LostFocus () 
  Option2.BackColor= amp; H808080Sub 
  Private Sub Option3_GotFocus (). BackColor= amp; HFFFF80Sub 
  Private Sub Option3_LostFocus (). BackColor= amp; H808080Sub