ªð¦^¦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 : ¤â¤ß¦V¤U¬O§U¤H¡A¤â¤ß¦V¤W¬O¨D¤H¡F§U¤H§Ö¼Ö¡A¨D¤Hµh­W¡C
ªð¦^¦Cªí ¤W¤@¥DÃD