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

• bucsupeti senior tag

  #2502

  #2501 Milgram1

  2014-09-23 08:18:39

  Új Válasz

  Ú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

  

  bucsupeti

  senior tag

  #2501 Milgram1

  #2501 Milgram1

  Hali,
  Középsuliban tanulok most MS Visual Basic-et és úgy gondolom hogy az ami órán van az kevés mert vettünk programozási tételeket, fájlkezelést valamennyire és kb ennyi. ezekkel több összetettebb feladtat. Engem érdekelne a dolog, ha ismerném rendesen akkor itthon alkotnék vele dolgokat csak nem tudom hol lehetne tanulni rendesen. Szóval az lenne a kérdésem hogy ismer-e valaki olyan oldalt/könyvet ahol tudok tanulgatni több dolgot hogy hasznavehető programokat írhassak magamnak.

  Ezek között érdemes lehet keresgélni...

  Persze angolul tudni kell valamilyen szinten. Egyébként az angolt úgysem tudod megúszni, ha komolyan gondolod a programozást!

• Bobrooney senior tag

  #2246

  #2245 Milgram1

  2013-11-11 19:41:06

  Új Válasz

  Ú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

  

  Bobrooney

  senior tag

  #2245 Milgram1

  #2245 Milgram1

  Megoldottam. Köszönöm

  grat!
  Amúgy direkt szervezted külön a dolgokat? 1 ciklussal le lehet zavarni a dolgokat, csak szelekciót kell írnod hozzá.

• Bobrooney senior tag

  #2244

  #2243 Milgram1

  2013-11-11 17:08:06

  Új Válasz

  Ú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

  

  Bobrooney

  senior tag

  #2243 Milgram1

  #2243 Milgram1

  Sziasztok!
  Megtudja valaki mondani hogy miért 0-át ír az új tömbökbe?

  Imports System.Console
  Module Module1
  
  Sub Main()
  Dim x(20), y(20), db1, db2, z(20) As Integer
  Randomize()
  For i = 1 To 20
  x(i) = Rnd() * 99 + 1
  WriteLine(x(i))
  Next
  db1 = 0
  db2 = 0
  For i = 1 To 20
  If x(i) Mod 2 = 0 Then
  x(i) = y(i)
  db1 = db1 + 1
  Else
  x(i) = y(i)
  db2 = db2 + 1
  End If
  Next
  Write("páros számok:")
  For i = 1 To 20
  WriteLine(y(i))
  Next
  Write("páratlan számok:")
  For i = 1 To 20
  WriteLine(z(i))
  Next
  
  ReadLine()
  End Sub
  
  End Module

  Mert az y változód sosem kap értéket. és az x-et teszed egyenlővé y-al.
  Remélem azt még tudod, hogy z tömbváltozódon kívül minden variant!

• sztanozs veterán

  #2221

  #2211 Milgram1

  2013-10-15 09:21:13

  Új Válasz

  Ú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

  

  sztanozs

  veterán

  #2211 Milgram1

  #2211 Milgram1

  Sziasztok!
  Szeretném megcsinálni hogy a program kiszámolja a tömegvonzást de végeredménynek mindig azt írja ki hogy nem szám
  Hol a hiba?

  

  

  Amúgy még egy kis kiegészítés:
  Az alábbi definíció
  Dim f, m1, m2, r, F1 as Double
  valójában a következőt csinálja:
  Dim f as Variant , m1 as Variant, m2 as Variant, r as Variant, F1 as Double

  Tehát csak az utolsót definiálja annak, amit a végéte írsz, mindent, amit nem specifikálsz azt Variant-ként hoz létre.

• McReay aktív tag

  #2220

  #2218 Milgram1

  2013-10-15 07:51:31

  Új Válasz

  Ú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

  

  McReay

  aktív tag

  #2218 Milgram1

  #2218 Milgram1

  s zövegdobozok m1 m2-nek vannak elnevezve

  Abban az esetben az m1 nevű változódnak ad ezt:
  m1 = m1.Text;

  Így működni fog!

  Bár, ahogy martonx is mondta, nem szerencsés ugyanazt a nevet adni egy változónak és egy object-nek!

• martonx veterán

  #2219

  #2218 Milgram1

  2013-10-15 07:18:11

  Új Válasz

  Ú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

  

  martonx

  veterán

  #2218 Milgram1

  #2218 Milgram1

  s zövegdobozok m1 m2-nek vannak elnevezve

  Ennek örülök, akkor viszont minek dimenzionálsz ugyanolyan néven változókat? Kérlek egy pindurkát olvass utána, hogy mik azok a változók, mit jelent egy változó élettartalma, láthatósága.

• McReay aktív tag

  #2215

  #2211 Milgram1

  2013-10-14 10:20:10

  Új Válasz

  Ú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

  

  McReay

  aktív tag

  #2211 Milgram1

  #2211 Milgram1

  Sziasztok!
  Szeretném megcsinálni hogy a program kiszámolja a tömegvonzást de végeredménynek mindig azt írja ki hogy nem szám
  Hol a hiba?

  

  

  Így helyes:
  

• martonx veterán

  #2214

  #2213 Milgram1

  2013-10-13 21:36:57

  Új Válasz

  Ú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

  

  martonx

  veterán

  #2213 Milgram1

  #2213 Milgram1

  az m1 az első test tömege az m2 meg a második

  Ez oké, hogy ennek szántad, de konkrétan a dimenzionálás után hol adsz nekik értéket???

• martonx veterán

  #2212

  #2211 Milgram1

  2013-10-13 14:32:02

  Új Válasz

  Ú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

  

  martonx

  veterán

  #2211 Milgram1

  #2211 Milgram1

  Sziasztok!
  Szeretném megcsinálni hogy a program kiszámolja a tömegvonzást de végeredménynek mindig azt írja ki hogy nem szám
  Hol a hiba?

  

  

  Hol adsz értéket m1, m2-nek, r-nek?

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