应用编程创建的form表单对象，是不是有缓存呢

使用编程创建的form表单对象，是不是有缓存呢？
大家好，最近遇到一个问题，使用编程方式创建的表单，其中使用addobject方式增加的选项组buttoncount数目是由程序计算获得，当如下代码第二次执行，buttoncount的数目并没有改变，
请问原因是什么？有何办法可以让buttoncount动态改变呢？

。。。通过计算 ，给option_num 赋值。。。（此处代码省略）

oform1=Newobject("form1")
oform1.Show
Return

Define Class form1 As Form
 
    Top = 0
    Left = 0
    Height = 600
    Width = 1000
    DoCreate = .T.
    Caption = "Form1"
    Name = "form1"
    AutoCenter = .T.

    Add Object optiongroup1 As OptionGroup With ;     
        Buttoncount = option_num, ;
        Left = 24, ;
        Top = 60, ;
        Visible = .T., ;
        Width = 300, ;
        height = 500, ;
        Name = "optiongroup1"
------解决方案--------------------------------------------------------
贴上全部代码