[اسلام الكبابى]

أريد تعديل هذا الكود بحيث يظل اسم ال FUNCTION  متغير

PHP كود :

Private Sub FUNC1()
AA = 111
End Sub

Private Sub FUNC2()
AA = 222
End Sub

Private Sub Command1_Click()
 NNN = Val(Text1.Text)
      Print "NNN  "; NNN
      If NNN <= 10 Then FUNCC = "FUNC1" Else: FUNCC = "FUNC2"
      FUNCC
      Rem"المفروض بالجملة السابقة يتوجه الى FUNC1  أو الى FUNC2  حسب قيمة المتغير FUNCC"
      Print AA
End Sub 


ولكم ألف شكر