Hirdetés
- Magga: PLEX: multimédia az egész lakásban
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- eBay-es kütyük kis pénzért
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- Dr. Mózes: Lakberendezési tanácskérés
- Mr Dini: Mindent a StreamSharkról!
- sziku69: Fűzzük össze a szavakat :)
- GoodSpeed: Te hány éves vagy?
Új hozzászólás Aktív témák
-
Homer
tag
Hello,
én így csinálnám:Private Sub Button1_Click(ByVal sender As System.Object, ByVal e _
..........................As System.EventArgs) Handles Button1.Click
.........Dim valasz As integer
.........valasz = MsgBox("Hello", MsgBoxStyle.YesNo, "Semmi")
.........MsgBox("A válaszod: " & valasz)
End SubEszerint az igen válasz esetén a valasz változó értéke 6 nem esetén pedig 7.

...mondjuk ez nem VS2010 hanem VB2003, de sztem használható lesz...
... ha pl kilépésre akarod használni akkor tovább folytatva:
if valasz = 6 then end
-
martonx
veterán
eredmeny() = MsgBoxResult.Ok ez tuti hülyeség. Nem 100%, hogy jó megoldás, mert jóideje nem VB.Net-ezek, de
If MsgBox("Biztos ki akarsz lépni? Mindent mentettél?", Title:="Kilépés", Buttons:=MsgBoxStyle.OkCancel) = = DialogResult.OK Then Close()Így már a feltétel jó lesz, a Close rémlik, hogy jó, bár lehet, hogy Exit kell helyette? Close az aktuálisan nyitott form-ot zárja, ha ez az egy volt csak nyitva, akkor egyenértékű az Exit-tel.
Új ablakot pedig valami ilyesmivel tudsz létrehozni
dim formuj as form - ide majd a VS-ben megcsinált formod neve fog kelleni a form helyett
majd formuj.Show-val jön fel az ablak.
Új hozzászólás Aktív témák
Hirdetés
- Apple iPhone 16 - ígéretek földje
- BestBuy ruhás topik
- Eredeti játékok OFF topik
- Magga: PLEX: multimédia az egész lakásban
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- A fociról könnyedén, egy baráti társaságban
- eBay
- Nintendo Switch 2
- Kormányok / autós szimulátorok topikja
- Most tényleg 8 GB VRAM-mal szúrja ki szemünk az NVIDIA??
- További aktív témák...
- Xiaomi 15 (12GB/256GB - Zöld, 2028.09.05-ig garanciás, újszerű) + ajándék Nillkin Super Frosted tok
- DJI NEO Fly More Combo drón 3 akkumulátorral +Care Refresh +táska
- Lenovo IdeaPad B50-80, 15,6" HD, i3-5005 CPU, 8GB DDR3, 128GB SSD, W11, Számla, 1 év garancia ( ol
- HP EliteBook 840 G3, 14" HD, i5-6300U CPU, 8GB DDR4, 128GB M.2 SSD, W11, Számla, 1 év garancia ( o
- HP EliteBook 840 G2, 14" HD, i5-5300U CPU, 8GB DDR3, 128GB SSD, W11, Számla, 1 év garancia ( olvas
- Azonnali készpénzes félkonfig / félgép felvásárlás személyesen / csomagküldéssel korrekt áron
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
- Endgame Gear & Xtrfy gamer egerek /MZ1/OP1 8K/XM2we/XM1R/XM1 RGB (fehér/fekete/lila)/
- HP 14s-dq5111nh 8F619EA Notebook
- Apple iPhone 14 / 128GB / Kártyafüggetlen / 12Hó Garancia / Akku: 87%
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


