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

[µo°Ý] vba function¦A°Ý

[µo°Ý] vba function¦A°Ý

¦U¦ì°ª¤âµ{¦¡¦p¤U
Public Function  test( A,B)
A.Text = Left((A.Text), Len(AText) - 1)
B.SelStart = Len(A.Text)
end
Sub ComboBox15_Change()
Dim A,B as string
  A=UserForm1.ComboBox15
  B="UserForm1.ComboBox15"
  test(A,B)
End sub
¦ý¬O¨C¦¸³£·|¥X²{¥²¶·­n¦³¹Bºâ¦¡¡A½Ð°Ý§Ú­þ¸Ì¦³¿ù??·Ð½Ð«ü¥¿

test A , B

TOP

        ÀR«ä¦Û¦b : ½_ÁJµ²±o¶V¹¡º¡¡A¶V·|©¹¤U««¡A¤@­Ó¤H¶V¦³¦¨´N¡A´N­n¶V¦³Á¾¨Rªº¯ÝÃÌ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD