Powerpoint Form

[briskbaby]

I am trying create a form in powerpoint which collects information from a menu. I'm trying to figure out how to collect information from checkboxes in my form. I would like to collect the checkbox name from each checkbox and put it in an array. I'm not sure how to achieve this in powerpoint. This is what I have so far:

Private Sub CommandButton1_Click()
 
Dim array1() As String
Dim chk As CheckBox
Dim i As Integer
For Each chk In Me.Scripts
   If TypeOf chk Is CheckBox Then
      If chk.Value = 1 Then
         array1(i) = chk.Name
         i = i + 1
      End If
   End If
Next chk
 
MsgBox i
 
End Sub

Problem is that it does not search for checkboxes, there is no Me.Controls, so Itried going thru the powerpoint script which looks like so:

<div style='position:absolute;top:20.25%;left:12.35%;width:1.68%;height:4.0%'><![endif]><object
  classid="CLSID:8BD21D40-EC42-11CE-9E0D-00AA006002F3" name=CheckBox1
  id=CheckBox1 v:shapes="_x0000_s609286" width="100%" height="100%">
  <param name=BackColor value=16777215>
  <param name=ForeColor value=0>
  <param name=DisplayStyle value=4>
  <param name=Size value="362;714">
  <param name=Value value=1>
  <param name=GroupName value=Slide5>
  <param name=FontName value=Arial>
  <param name=FontHeight value=285>
  <param name=FontCharSet value=0>
  <param name=FontPitchAndFamily value=2>
 </object><![if !ppt]></div>

Any help would be greatly appreciated. Thanks.