程序运行后，单击窗体，输出结果是：OptionBasePrivateSubForm_Click()Dima，iAsIntegera=Array(，，，，，，，，)Fori=ToPrinta(–i);NextiEndSub