Anyway£¬thank you very much £¡\(^o^)/~ ÓÒ±ßÊÇÊýÖµÐÍ£¬×ó±ßÊDZäÁ¿£¬¾ÍÊDZíʾ¸³Öµ Á½±ßÊǹØϵ±í´ïʽµÄ»°¾ÍÊÇÅжÏÊÇ·ñÏàµÈµÄ¹ØϵÔËËã·ûÄØ£¿ ÕâÑùÀí½âÊDz»Ì«ÕýÈ·µÄ ±ÈÈç if a = 0 then
end if ÕâÑùÓÒ±ßÊÇÊýÖµ£¬×ó±ßÊDZäÁ¿£¬¡°=¡±Ò²ÊDZíʾÅжÏÊÇ·ñÏàµÈ ÓÖ±ÈÈç Label.text = textbox.text ×óÓÒÁ½±ß¶
Private Sub Check1_Click() If Check1.Value = 1 Then DTP1.Enabled = True Else DTP1.Enabled = False End If End Sub Private Sub Check2_Click() If Check2.Value = 1 Then DTP2.Enabled = True Else
......