Android Question B4XComboBox1_SelectedIndexChanged in PreferencesDialog

Public Sub B4XComboBox1_SelectedIndexChanged (Index As Int)

    B4XComboBox1IndexItem=Index
    B4XComboBox1IndexPanel = CustomListView1.GetItemFromView(Sender.As(B4XComboBox).mBase)
    CallSub(B4XPages.GetPage(PageId),"B4XComboBox1SelectedIndexChanged")

End Sub

PrefDialog.PageId="Page3"

Sub B4XComboBox1SelectedIndexChanged
    'Log(PrefDialog.B4XComboBox1IndexPanel)

    Dim IndexPanel As Int = PrefDialog.B4XComboBox1IndexPanel
    Dim IndexItem As Int = PrefDialog.B4XComboBox1IndexItem
    'Dim cmb As B4XComboBox  = PrefDialog.CustomListView1.GetPanel(IndexPanel).As(B4XView).GetView(1).Tag

    If IndexPanel=7 Or IndexPanel=9 Or IndexPanel=13 Or IndexPanel=15 Then
        Dim cmb2 As B4XComboBox  = PrefDialog.CustomListView1.GetPanel(IndexPanel+1).As(B4XView).GetView(1).Tag
        cmb2.cmbBox.Clear
        Dim AyahCount As Int = AyatCountList.Get(IndexItem)
        
        For i=1 To AyahCount
            cmb2.cmbBox.Add(i)
        Next
        
    End If
'    cmb.cmbBox.Add
End Sub