Hirdetés
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Friss alaplapszériát avat az ASRock
- Gaming notebook topik
- Bluetooth hangszórók
- Apple asztali gépek
- Az elmúlt 30 év legjobb processzorai
- TCL LCD és LED TV-k
- Milyen billentyűzetet vegyek?
- HDD probléma (nem adatmentés)
- Ilyen se volt még: mégsem kell sok memória az új James Bond játékhoz
Új hozzászólás Aktív témák
-
pmonitor
aktív tag
válasz
sztanozs
#3165
üzenetére
Miért? A Form nem Control?
szerk.:
Valahogy így lehet ezt megcsinálni:Imports System.Threading
Public Class Form1
Public variable As Integer
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
BackgroundWorker1.RunWorkerAsync(Me)
Timer1.Start()
End Sub
Sub Update()
Text = variable
End Sub
Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
Dim frm As Form1 = e.Argument
For i = 1 To 100
If (frm.InvokeRequired) Then frm.Invoke(New MethodInvoker(AddressOf Update), Nothing)
Thread.Sleep(1000)
Next
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
variable += 1
End Sub
End Class -
pmonitor
aktív tag
válasz
Diopapa
#3162
üzenetére
Ha egyik formból szeretnél hozzáférni egy másik form metódusához/változójához, az általában rossz program szerkezetre utal. Vb.Net-ben meg tudod oldani, hogy az ilyeneket modulban valósítod meg.
@sztanozs: Meg ha átadná, akkor sem fér hozzá egy control-hoz a DoWork()-ban. Csoda, hogy egyáltalán nem száll el a futásidőben.
Új hozzászólás Aktív témák
Hirdetés
- BestBuy topik
- Sorozatok
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Parci: Milyen mosógépet vegyek?
- Friss alaplapszériát avat az ASRock
- Gaming notebook topik
- Bluetooth hangszórók
- bkercso: Társadalmi stabilitás az AI szemszögéből
- OnePlus 15 - van plusz energia
- Elektromos autók - motorok
- További aktív témák...
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max
- Samsung Galaxy S23 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Nuki Smart Lock Ultra okoszár
- Apple iPhone 12 128GB,Újszerű,Adatkabel,12 hónap garanciával
- Bomba ár! HP Zbook 15u G5 - i7-8GEN I 16GB I 256-512SSD I 15,6" FHD I Cam I W11 I Garancia!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


