Legfrissebb anyagok
LOGOUT témák
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- mefistofeles: Az elhízás nem akaratgyengeség!
- Kókuszdió: Tápegység – hova jutottunk 5 év alatt?
- Gurulunk, WAZE?!
- MasterDeeJay: RAM gondolatok: Mennyi a minimum? DDR3 is jó?
- gban: Ingyen kellene, de tegnapra
- Lalikiraly: Commodore The C64, Ultimate
- MasterDeeJay: Sikeres CoffeeTime modok
- sziku69: Szólánc.
PROHARDVER! témák
Mobilarena témák
IT café témák
Keresés
Új hozzászólás Aktív témák
-
T_bee
aktív tag
köszi...
megin nem akar menni a kivonás a listából, de rájöttem hogy a számok hosszával van kapcsolatban a probléma. valakinek ötlete hogy lehetne megoldani? jelenleg így néz ki a programsor: Private Sub szamit_Click()
'Számítás
Dim p900 As Double
If ossz <> 0 And tabhosssz <> 0 And tabbszel <> 0 And tabch = False And tebch = False Then
table = tabhossz * tabszel
tabter.Text = table
szam = ossz / table
proba = Int(szam)
p900 = szam - proba
If p900 = 0 Then tabszam.Text = szam
If p900 <> 0 Then tabszam.Text = proba + 1
Else
Dim c As Integer
c = MsgBox(''Add meg az adatokat'', vbInformation, ''Hiba'')
End If
End Sub
köszi
Új hozzászólás Aktív témák
Aktív témák
- Székesfehérvár és környéke adok-veszek-beszélgetek
- Vírusirtó topic
- Napelem
- Horgász topik
- Milyen egeret válasszak?
- sziku69: Fűzzük össze a szavakat :)
- Beletenyerelnek a memóriaárak a mobileladásokba
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Luck Dragon: Asszociációs játék. :)
- iPhone-t használók OFF topikja
- További aktív témák...
Új fizetett hirdetések
- GMKtec K6 Ryzen 7 7840HS 32GB RAM + 1TB SSD WIN 11 Pro magyar garancia 2028.10.27.-ig
- Samsung C27G55TQWR 27" 2560 x 1440 Quad HD LCD Fekete Monitor Számla + Garancia
- Latitude 9330 2in1 13.3" QHD+ IPS érintő i5-1240U 16GB 256GB NVMe magyarított (lézerezett) vbill gar
- Üzletből,garanciával,MSI Alpha Gamer 17 Ryzen 9-7945 16mag-32Szál/32GB RAM/1TB NVME SSD/RTX 4070/4K
- Lenovo Legion 9 16" 3.2K Mini LED Laptop! i9-13980HX / RTX 4090 / 32GB DDR5 / 2TB NVMe! BeszámítOK
Üzleti előfizetők hirdetései
- iPhone 15 Pro Max 256GB 88% (1év Garancia)
- Elektronikai csomag (usb hub, display, hdmi kábelek, riser-ek)
- Apple iPhone 12 64GB, Kártyafüggetlen, 1 Év Garanciával
- Lenovo ThinkPad X1 Extreme Gen3 i7-10750H 32GB 1000GB GTX1650-Ti 4K UHD 1 év gar
- DELL Precision 5540 Workstation i7-9850H Nvidia Quadro T1000 32GB 512GB 15.6" 1 év garancia
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs


