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

[µo°Ý] ­n«ç»ò¶Ç»¼ÅܼƭȨì Class

[µo°Ý] ­n«ç»ò¶Ç»¼ÅܼƭȨì Class

§Ú¦b¥Dµ{¦¡¤¤¡A°ÊºA·s¼W¤F UserForm¡AµM«á°ÊºA·s¼Wµ{¦¡½X¡A¨ä¤¤¦³¥Î¨ì Class ¡A½Ð°Ý§Ú­n¦p¦ó±N­n¥ÎªºÅܼƭȱa¤J Class3 ¤¤ ¡H

¥Dµ{¦¡
.InsertLines i + 2, "Set Class_obj3.MyNewComboBoxList1 = Controls(""The_Start_Month_Select"")"
.InsertLines i + 3, "Set Class_obj3.MyNewComboBoxList2 = Controls(""The_End_Month_Select"")"

Class 3 ªº³¡¥÷¦p¤U¡G
Public WithEvents MyNewComboBoxList1 As MSForms.ComboBox
Public WithEvents MyNewComboBoxList2 As MSForms.ComboBox

Private Sub MyNewComboBoxList1_Change()

XXXXXXXX

End Sub

¦^´_ 1# C.F
ªþÀɬݬݡAµM«á¦AÁ|­Ó¹ê»Ú¨Ò¤l(¤°»òÅܼƦb­þ¡A­nµ¹½Ö¥Î¡A«ç»ò¥Î)·|¤ñ¸û²M·¡

TOP

        ÀR«ä¦Û¦b : ª¾ÃÑ­n¥Î¤ßÅé·|¡A¤~¯àÅܦ¨¦Û¤vªº´¼¼z¡C
ªð¦^¦Cªí ¤W¤@¥DÃD