ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ½Ð°Ý¦p¦ó¦bµ{§Ç°õ¦æ¤¤¡A¦bframe¥[¤Jª«¥ó

[µo°Ý] ½Ð°Ý¦p¦ó¦bµ{§Ç°õ¦æ¤¤¡A¦bframe¥[¤Jª«¥ó

¥»©«³Ì«á¥Ñ mygod0403 ©ó 2011-1-6 23:54 ½s¿è

½Ð±Ð¦U¦ì¤j¤j
¤p§Ì·Q¦bframe¤¤°ÊºA¥[¤J¤@¨Çcheckbox¡A¤£ª¾¸Ó¦p¦ó°µ¡H¦bºô¤W§ä«Ü¤[¤F¡A³£¨S¦³¬ÛÃö¸ê®Æ¡A³Â·Ð­þ­Ó¦n¤ß¤HÀ°­Ó¦£¡A·P¿E¤£ºÉ¡I¡I

¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¤£¦n·N«äª©¥D¥ý¥Í
¬Ý¤£À´¦^ÂЩ«¤lªºµ{¦¡½X¸ò§Ú³o°ÝÃD¦³¦óÃö«Y»¡
¦Ó¥B§Ú¬O­n¦bvba¤§ªí³æªºframe¤¤°µ·s¼W
«Ü©êºp¨S¦³»¡²M·¡¡AÁÂÁÂ

TOP

¥»©«³Ì«á¥Ñ Hsieh ©ó 2011-1-7 10:43 ½s¿è

¦^´_ 3# mygod0403
°µ­Ó²³æ½d¨Ò
  1. Private Sub CommandButton1_Click()
  2. cnt = Frame1.Controls.Count
  3. With Me.Frame1.Controls.Add("Forms.CheckBox.1", "Check" & cnt)
  4. .Object.Caption = .Name
  5. .Top = cnt * .Height
  6. End With
  7. End Sub
½Æ»s¥N½X
°ÊºA·s¼W±±¨î¶µ.zip (8.53 KB)
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

²×©ó¸Ñ¨M¤F¡A·PÁ¦A·PÁ¡I¡I

TOP

        ÀR«ä¦Û¦b : °µ¦n¨Æ¤£¯à¤Ö§Ú¤@¤H¡A°µÃa¨Æ¤£¯à¦h§Ú¤@¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD