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

InputBox©Ò¶}±Òªºµøµ¡¦³¿ëªk³]¦b¥Ø«e©Ò¦³µøµ¡ªº³Ì¤W¼h¶Ü

¦^´_ 1# clio


¸Õ¸Õ³o­Ó¬Ý¯à¤£¯à¸Ñ¨M¡C
  1. TopMost = True
½Æ»s¥N½X
¤@¤À§V¤O¡A¤@¤À¦¬Ã¬¡C
µo°ÝÃD«e¥i¥H¥ý·j¯Á¤º¤å¬O§_¦³¬ÛÃö½d¨Ò¡C

TOP

¦^´_ 3# clio


    ¸Õ¸Õ³o­Ó¡A¨S¦³¹ê»Ú½d¨Ò´ú¸Õ¹L¤£²M·¡¬O¤£¬O§A·Q­nªº¡C
  1. Sub ex()
  2. TopMost = True 'true ªí¥Ü­n±N¸Óªí³æÅã¥Ü¬°³Ì¤W¼hªºªí³æ¡A§_«h¬° false¡C ¹w³]¬° false¡C
  3. x = InputBox("¤º¤å", "¼ÐÃD")
  4. End Sub
½Æ»s¥N½X
¦pªG¤£¦æ±NInputBox§ï¦¨Form¸Õ¸Õ
·s¼W"¦Û­qªí³æ"
  1. Private Sub UserForm_Click()
  2. Me.Top = True
  3. End Sub
½Æ»s¥N½X
¤@¤À§V¤O¡A¤@¤À¦¬Ã¬¡C
µo°ÝÃD«e¥i¥H¥ý·j¯Á¤º¤å¬O§_¦³¬ÛÃö½d¨Ò¡C

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD