如何使用代碼添加復選框？
＠1，1 ...............？
謝謝
------解决方案--------------------------------------------------------
请参考：
如何在表单运行时添加一些控件？
----------------------------------
用表单设计器做得表单，能否在运行的时候添加一些标签，并指定其属性？
---------------------------------------------------------------
*例如：在运行的表单中加入10个LABEL控件，在一个按钮的Click事件中：
nLeft=10
nTop=10
FOR I=1 TO 10
ControlName= "Label "+ALLTRIM(STR(I))
IF VARTYPE(THISFORM.&ControlName) <> 'O ' &&防止添加重复
THISFORM.ADDOBJECT(ControlName, "Label ")
THISFORM.&ControlName..Visible=.T.
THISFORM.&ControlName..HEIGHT=25
THISFORM.&ControlName..WIDTH=50
THISFORM.&ControlName..TOP=nTop
THISFORM.&ControlName..LEFT=nLeft
THISFORM.&ControlName..BACKCOLOR=RGB(255,255,255)
THISFORM.&ControlName..CAPTION= " "
THISFORM.&ControlName..WORDWRAP=.T.
nLeft=nLeft+60
ENDIF
ENDFOR
THISFORM.REFRESH
**************************************************************
*表单的INIT事件：这样才可以Activex控件。
*THIS.addobject( "oDATE ", "olecontrol ", "MSComCtl2.DTPicker.2 ")
*THIS.oDATE.VISIBLE=.T.