Creating Checkboxes Dynamically On A Form

I'm using below code for creating check-boxes dynamically on a form:

Code:

Do
Set cb = Me.Controls.Add("forms.checkbox.1", "Cb_" & option_counter, True)
With cb
.Left = 100
.Top = 100 + height_diff
.Caption = Sheet1.Cells(quest_num, option_counter + 1).Value
End With
height_diff = height_diff + 30
option_counter = option_counter + 1
Loop Until option_counter = total_options + 1

It is working fine.....Now after this, I want to check which are the chechboxes whose value is true. How do i do that?