Új hozzászólás Aktív témák

• #1317 Jester01 veterán sekli #1315

  Új Válasz 2006-01-26 19:03:39 #1317

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Jester01

  veterán

  válasz sekli #1315 üzenetére

  Ha ez a RealBasic Visual Basic 6.0 szintaxisú, akkor így:
  Elsõ verzió (ajánlott):
  
  Private Sub Button1_Click()
  CommonAction
  End Sub
  
  Private Sub Button2_Click()
  ' button2 code
  CommonAction
  End Sub
  
  Private Sub CommonAction()
  ' common code
  End Sub
  
  Másik verzió:
  
  Private Sub Button1_Click()
  ' common code
  End Sub
  
  Private Sub Button2_Click()
  ' button2 code
  Button1_Click
  End Sub

Új hozzászólás Aktív témák