PROHARDVER! témák
Mobilarena témák
IT café témák
GAMEPOD 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
- sziku69: Fűzzük össze a szavakat :)
- Elektromos autók - motorok
- One otthoni szolgáltatások (TV, internet, telefon)
- Xbox Series X|S
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Amlogic S905, S912 processzoros készülékek
- Battlefield 6
- BestBuy topik
- Házimozi belépő szinten
- További aktív témák...
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- BESZÁMÍTÁS! Gigabyte H610M i3 12100F 16GB DDR4 512GB SSD RTX 2060 6GB Zalman S2 TG Chieftec 600W
- HIBÁTLAN iPhone 14 Pro 128GB Space Black -1 ÉV GARANCIA - Kártyafüggetlen
- ASUS ROG Cetra True Wireless Gaming fülhallgató új, garanciával!
- Xiaomi Redmi Note 14 Pro / 8/256GB / Káértyafüggetlen / 12Hó Garancia
- Apple iPhone 13 Pro Max Graphite ProMotion 120 Hz, Pro kamerák 256 GB-100%-3 hó gari!
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


