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

• #8179 Fire/SOUL/CD félisten Oly #8178

  Új Válasz 2010-09-17 17:01:03 #8179

  Ú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

  

  Fire/SOUL/CD

  félisten

  válasz Oly #8178 üzenetére

  Hali!

  Kép perfrag linkjéről

  Kód

  Sub YesNoMessageBox()
  Dim Answer As String
  Dim MyNote As String
  
  'Place your text here
  MyNote = "Do you agree?"
  
  'Display MessageBox
  Answer = MsgBox(MyNote, vbQuestion + vbYesNo, "???")
  
  If Answer = vbNo Then
  'Code for No button Press
  MsgBox "You pressed NO!"
  Else
  'Code for Yes button Press
  MsgBox "You pressed Yes!"
  End If
  
  End Sub

  Fire.

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