wie man eine Funktion/sub, nach dem laden des Formular-Fenster in VB?

Ich habe eine Funktion, bekommt der Benutzer-ID von USB-Lesegerät für Badges, verwendet, um sich in einer Anwendung.
wenn ich die app starte, die log-in-Fenster erscheint nicht, bis ich wischen Sie über den tag.
Ich muss wissen, ob es möglich ist das laden des windows, dann für den start der Funktion, der bekommt die Daten vom USB.

Dank 🙂

Private Sub SerialPort1_DataReceived()
    'Threading.Thread.SpinWait(1000)
    OpenPort()
    If SerialPort1.IsOpen() Then

        byteEnd = SerialPort1.NewLine.ToCharArray
        'read entire string until .Newline 
        readBuffer = SerialPort1.ReadLine()
        readBuffer = readBuffer.Remove(0, 1)
        readBuffer = readBuffer.Remove(8, 1)
        WWIDTextBox.AppendText(readBuffer)

    End If
End Sub

Private Sub Form1_Activated(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Activated
    SerialPort1_DataReceived()
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    'SerialPort1_DataReceived()
End Sub

Wollen Sie zum sperren von Benutzereingaben auf die form, bis er berührt wird, oder wollen Sie die Formular-Eingaben zu übernehmen? Vermutlich werden Sie den Aufruf einer blockierenden (synchronen) - Methode zum Lesen der Abzeichen. Hat die API für die badge-Leser bieten eine entsprechende asynchrone Methode?

InformationsquelleAutor user2234234 | 2013-04-12

vb.net

6

Das problem ist, dass Sie anrufen, die ReadLine - Methode, die eine blockierende (synchrone) - Methode. In anderen Worten, wenn Sie es aufrufen, gibt die Methode keinen Wert, bis der Wert, der zurückgegeben wird. Weil das so ist, es hält die Ausführung auf den aktuellen thread, bis eine komplette Zeile gelesen wird (wenn der Button ist geklaut). Da sind Sie auf dem UI-thread, wenn Sie es nennen, wird es sperren Sie die Benutzeroberfläche, bis der Button ist geklaut.

Anstelle von aufrufen Ihrer SerialPort1_DataReceived - Methode der UI-thread, die Sie tun können, die Arbeit aus einem anderen thread. Der einfachste Weg das zu tun ist, ziehen Sie eine BackgroundWorker - Komponente auf Ihr Formular im designer. Anschließend können Sie code hinzufügen, wie dies:
```
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    BackgroundWorker1.RunWorkerAsync()
End Sub

Private Sub BackgroundWorker1_DoWork(sender As Object, e As DoWorkEventArgs) Handles BackgroundWorker1.DoWork
    OpenPort()
    If SerialPort1.IsOpen() Then
        byteEnd = SerialPort1.NewLine.ToCharArray
        Dim readBuffer As String = SerialPort1.ReadLine()
        readBuffer = readBuffer.Remove(0, 1)
        readBuffer = readBuffer.Remove(8, 1)
        e.Result = readBuffer
    End If
End Sub

Private Sub BackgroundWorker1_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted
    WWIDTextBox.AppendText(CStr(e.Result))
End Sub
```
Danke Mann!! es funktioniert ..
Ich habe noch eine Frage, wie kann ich "neu starten"? wenn ich log-in und log-out, dann kann ich nicht verwenden, das Lesegerät für Badges wieder!
Sagen Sie, dass ein Neustart der Anwendung funktioniert, zeigt aber das login-Formular zweimal innerhalb des gleichen Prozesses nicht?
ja, aber nur, um klar zu stellen, ich bin mit Hide() und Show () - Methoden zum öffnen und "schließen" - Fenster. mit Close() schließt die app.
Mit Der Anwendung.Restart() löst das problem.

InformationsquelleAutor Steven Doggart

Arbeiten auf VS2013, ich stieß auf das gleiche Problem, ich musste ein datagridview aktualisieren (Farben in der gridrows). Dieser arbeitete für mich.

Sub MyForm_VisibleChanged(sender As Object, e As EventArgs) Handles Me.VisibleChanged

            If Me.Visible Then
                'do action...
            End If

End Sub

InformationsquelleAutor Ivan Perez

0

Versuchen Form Aktiviert Veranstaltung
```
Private Sub Form1_Activated(ByVal sender As Object, _
    ByVal e As System.EventArgs) Handles MyBase.Activated
 'Call your function here
End Sub 
```
Aufruf der Funktion After the Form Loads...

Noch sperren Sie die Benutzeroberfläche, bis der Button ist geklaut, aber.
funktioniert immer noch nicht. es wartet, bis readUsbPort-timeout erreicht ist, dann zeigt das Formular-Fenster.
Können Sie uns einige code, der Sie probiert..?
Entfernen Sie den code SerialPort1_DataReceived() aus Form_Load Ereignis und versuchen das gleiche...
es hat nicht geholfen..

InformationsquelleAutor Pandian

Private Sub loadCombo()
    Dim sqlconn As New OleDb.OleDbConnection
    Dim connString As String
    connString = ""
    Dim access As String
    access = "select slno from atable"
    Dim DataTab As New DataTable
    Dim DataAdap As New OleDbDataAdapter(access, connString)
    DataAdap.Fill(DataTab)
    ComboBox1.DataSource = DataTab
    ComboBox1.DisplayMember = "slno"

End Sub

Wie, um code zu schreiben für die onload () - Funktion,es könnte sehr nützlich sein für das neue.

InformationsquelleAutor user4368893

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.