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

• #1366 dani850430 csendes tag #90999040 #1365

  Új Válasz 2011-03-29 14:32:06 #1366

  Ú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

  

  dani850430

  csendes tag

  válasz #90999040 #1365 üzenetére

  Köszönöm szépen

• #1364 dani850430 csendes tag

  Új Válasz 2011-03-29 12:01:57 #1364

  Ú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

  

  dani850430

  csendes tag

  Sziasztok! VB6-tal kapcsolatban lenne kérdésem. Szeretnék számokat sorba rendezni. Van egy listám(list1), amihez egy gomb segítségével véletlen számokat adok. Egy másik gombbal pedig szeretném növekvő sorrendbe rendezni őket. Arra gondoltam, hogy páronként összehasonlítom az elemeket és az elem indexét kicserélem. Az elméleti megoldásom, hogy egy változóba eltárolom a lista elemek értékét, és ezt egy ciklussal léptetem a listavégig. Egy másik változó lenne az indexek, ami szintén egy ciklusban futna. Ha a k-dik elem kisebb, mint a k+1-dik, akkor a k-dik elem indexe legyen 0. A problémám az, hogy nem tudom összekapcsolni az elem értékét és az indexét. De vhogy sehogy sem akar működni. Tudna vki küldeni programkódot, vagy van vmi egyszerűbb megoldás? Előre is köszönöm.

• #1332 dani850430 csendes tag

  Új Válasz 2010-12-18 16:12:39 #1332

  Ú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

  

  dani850430

  csendes tag

  Sziasztok!

  VB6.0-t használok. Adatbázisok tárgy keretében irtam egy progit, ami egy access adatbázisból szed ki adatok, és helyez el textboxokban, hogy aztán ezekkel számításokat végezzen a program.(tengely méretező program.) Ez igy néz ki:
  Dim cn As New ADODB.Connection
  Dim Qy As New ADODB.Command
  Dim rs As New ADODB.Recordset
  Dim Ta As New BindingCollection
  Dim Tav As New BindingCollection
  Dim Szija As New BindingCollection
  Dim Tt As New BindingCollection
  Dim Szt As New BindingCollection

  Private Sub Command1_Click()
  cn.Close
  End Sub

  Private Sub Form_Load()
  cn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0 ;User ID=;Data Source=" + App.Path + "\anyagok.mdb;"
  cn.Open
  Set Qy.ActiveConnection = cn
  Qy.CommandText = "SELECT * FROM tengely"
  rs.CursorLocation = adUseClient
  rs.Open Qy, , adOpenDynamic, adLockBatchOptimistic
  Set DataGrid1.DataSource = rs
  DataGrid1.Refresh
  Set Ta.DataSource = rs
  Ta.Add Form1.Text6, "Text", "Tengely atmero"
  Set Tav.DataSource = rs
  Tav.Add Form1.Text7, "Text", "Tavolsag"
  Set Szija.DataSource = rs
  Szija.Add Form1.Text5, "Text", "Szijtarcsa atmero"
  Set Tt.DataSource = rs
  Tt.Add Form1.Text4, "Text", "Tengely tomeg"
  Set Szt.DataSource = rs
  Szt.Add Form1.Text3, "Text", "Szijtarcsa tomeg"
  End Sub

  Az lenne a kérdésem, hogy működik e dolog visszafele? Arra gondolok, hogy textboxok tartalmát kiirja egy adatbázisba. Mondjuk van 3 textboxom, amikbe a program futása során végzett számítások eredménye van. És ezeket szeretném egy adatbázis megfelelő oszlopaiba beirni. Illetve, ha ez megvan, hogyan tudom elérni, hogy az adatbázis sorait léptesse, illetve, hogy mentse el?

  Előre is köszönöm a segítséget

• #1238 dani850430 csendes tag

  Új Válasz 2010-08-16 15:14:14 #1238

  Ú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

  

  dani850430

  csendes tag

  Sziasztok! Kerestem a VB6 súgójában meg neten is, hogyan tudok faktoriálist számolni. Eddig mindenhol azt láttam, hogy egy ciklust kell irni rá, és azzal meg lehet oldani. Az lenne a kérdésem, hogy valóban nem létezik rá operátor közvetelnül, mint ahogy matek órán megszokta az ember a felkiáltójelet.

• #1232 dani850430 csendes tag

  Új Válasz 2010-08-12 21:14:06 #1232

  Ú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

  

  dani850430

  csendes tag

  Igen Vb6-ot nyúzom. Tuldképpen nem vagyok annyira kezdő, csak az történt, hogy a múlt héten elveszett egy pár mappám, és volt egy programom, amit nyár elején irtam, és elveszett. És most újra kellett irnom. De végre kész van és még talán jobb is lett mint az első. BMEre járok, gépészmérnök szakra; és előző félévben az egyik tárgyam kapcsán újra elő kellett ásnom VBt
  Akkor sikerült irnom egy egész pofás kis tengely méretező progit, ami access adatbázisből szedett adatokat. El vagyok VB6tal, egyenlőre elég. Amire nekem kell arra tökéletesen megfele. Nem tudom, hogy akarok e komolyabban programozni... Ez amolyan hasznos időtöltés.

• #1230 dani850430 csendes tag

  Új Válasz 2010-08-11 18:59:52 #1230

  Ú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

  

  dani850430

  csendes tag

  Közben sikerült megoldanom. Minden az ábrán....
  

• #1228 dani850430 csendes tag

  Új Válasz 2010-08-11 11:04:19 #1228

  Ú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

  

  dani850430

  csendes tag

  Sziasztok! Azt hiszem egy nagyon primitív kérdésem van, de csak nem régen kezdtem bele a progaromzgatásba. Szóval a problémám: van két változom (x,y) és köztük van egy matematikai függvény kapcsalat (pl x=y^2). Az x értékem egy adott intervallumban mozog (1től 20). Egy parancsgomba hatására a két változom bekerül egy egy listába. Azt szeretném elérni, hogy ha a list1en klikkelek, kijelölök egy elemet, akkor a list2ben ugyanaz indexű elem is jelölödjön ki.

• #1212 dani850430 csendes tag

  Új Válasz 2010-07-03 12:53:16 #1212

  Ú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

  

  dani850430

  csendes tag

  martonx: Köszönöm, sikerült megoldani kerekítéssel. Bár erről sem tudtam, hogy létezik ilyen... Az ember mindig tanul vmit

• #1210 dani850430 csendes tag

  Új Válasz 2010-07-03 09:07:49 #1210

  Ú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

  

  dani850430

  csendes tag

  Sziasztok! Az lenne a kérdésem, hogy van e lehetősége arra, hogy egy single típusú változónak a pontosságát korlátozzam? Vb6-ot használok, és azt szeretném elérni, hogy ha elosztok két számot, akkor az eredményt csak 3 vagy 4 tizedes pontossággal irja ki, és ne 7 vagy 8-cal. Előre is köszönöm!

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