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

• #4256 Fire/SOUL/CD félisten FragMaster #4254

  Új Válasz 2009-01-02 13:53:22 #4256

  Ú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 FragMaster #4254 üzenetére

  Hali!

  Először is BÚÉK mindenkinek!

  Nos megnéztem a feladatsort, nem olyan bonyolult mint amilyennek elsőre tűnik, ne aggódj.
  Bár néhány esetben az ilyen sorokkal, hogy
  "A függvényt hívja meg parancsmakróból is" nem igazán tudok mit kezdeni, mert nem tudom, hogy milyen eseményhez vagy objektumhoz stb kötödjön!!??
  Megköszönném, hogy ha leírnád, hogy itt mire is kellene gondolni...

  Addig ezenkívül itt az első feladat, remélem minden érthető lesz benne.
  

  

  Function GÁZ(xnum)
  If Not IsEmpty(xnum) Then
  If IsNumeric(xnum) And xnum > 0 Then
  Select Case xnum
  Case 1 To 3000
  GÁZ = xnum * 100
  Case 3001 To 4000
  GÁZ = xnum * 120
  Case 4001 To 5000
  GÁZ = xnum * 140
  Case Else
  GÁZ = xnum * 150
  End Select
  Else: GÁZ = "Csak szám lehet!"
  End If
  Else: GÁZ = "Nem lehet üres!"
  End If
  End Function

  Fire.

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