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

• #214 update csendes tag update #212

  Új Válasz 2005-05-09 14:05:21 #214

  Ú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

  

  update

  csendes tag

  válasz update #212 üzenetére

  Private Sub CommandButton1_Click()
  Min = Cells(1, 2)
  Max = Cells(2, 2)
  Veletlenszam = Min + ((Max - Min) * Rnd(1))
  Cells(3, 2) = Veletlenszam
  End Sub
  
  SIKERÜLT!!!

• #213 Victorius tag update #212

  Új Válasz 2005-05-09 11:57:48 #213

  Ú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

  

  Victorius

  tag

  válasz update #212 üzenetére

  Mit szól ehhez?
  
  Veletlenszam=min+int((max-min)*rnd(1))
  
  Lehet, hogy nem teljesen ''VB-kompatitbilis'' ez a formátum, de VB-ben még nem foglalkoztam véletlenszámokkal. Az alapelvet kell nézni...
  
  A páros/páratlanról majd délután írok. Most megyek ebédelni (végre)!
  

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