1.Dim U_ChkTeeth() As String = {U_ChkTeeth1.Checked, U_ChkTeeth2.Checked, U_ChkTeeth3.Checked & _
2. ,U_ChkTeeth4.Checked, U_ChkTeeth5.Checked, U_ChkTeeth6.Checked & _
3. ,U_ChkTeeth7.Checked, U_ChkTeeth8.Checked, U_ChkTeeth9.Checked & _
4. ,U_ChkTeeth10.Checked, U_ChkTeeth11.Checked, U_ChkTeeth12.Checked & _
5. ,U_ChkTeeth13.Checked, U_ChkTeeth14.Checked, U_ChkTeeth15.Checked & _
6. ,U_ChkTeeth16.Checked}
