- ©«¤l
- 67
- ¥DÃD
- 21
- ºëµØ
- 0
- ¿n¤À
- 113
- ÂI¦W
- 0
- §@·~¨t²Î
- Windows 7
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-11-21
- ³Ì«áµn¿ý
- 2019-4-23
|
§Ú¦bVBA¦Ûqªí³æ(¨Ò¡Guserform3)¤¤¡A«Ø¥ß¤F¤@Ótextbox(¨Ò¡Gtextbox1)¡A¦Pªí³æ¤¤¤]¦³textbox2¡Atextbox3¡C
¦pªGtextbox1¬°a®É¡A±Ntextbox1ªºÈ(a)½Æ»s¨ìtextbox2¡Atextbox3«O«ùªÅÈ
¦pªGtextbox1¬°b®É¡A±Ntextbox1ªºÈ(b)½Æ»s¨ìtextbox3¡Atextbox2«O«ùªÅÈ
½Ð°Ý¤j¤j¡AÀ³¸Ó«ç»ò°µ¤~¥i¥H©O¡H
¤U¦C¬O§Ú¼gªºµ{¦¡½X(¤£¯à¦p¤Wz¹B§@)
Private Sub TextBox1_ENTER()
If UserForm3.TextBox1.Text = "a" Then
UserForm3.TextBox2.Text = UserForm3.TextBox1.Text
End If
End Sub |
|