Heim  >  Artikel  >  Computer-Tutorials  >  So verwenden Sie ein VB-Programm, um unterschiedliche Zahlen in zwei Textfeldern zu finden und sie in einem anderen Textfeld anzuzeigen

So verwenden Sie ein VB-Programm, um unterschiedliche Zahlen in zwei Textfeldern zu finden und sie in einem anderen Textfeld anzuzeigen

WBOY
WBOYnach vorne
2024-01-11 18:30:201397Durchsuche

1. Wie finde ich mit einem VB-Programm unterschiedliche Zahlen in zwei Textfeldern und zeige sie in einem anderen Textfeld an?

Um die unterschiedlichen Zahlen in zwei Textfeldern herauszufinden und sie in einem anderen Textfeld im VB-Programm anzuzeigen, können Sie die folgenden Schritte ausführen: 1. Erstellen Sie drei Textfelder und benennen Sie sie jeweils txtBox1, txtBox2 und txtResult. 2. Fügen Sie dem Programm eine Schaltfläche hinzu, nennen Sie sie btnCompare und verknüpfen Sie sie mit einem Klickereignis. 3. Schreiben Sie Code in den Click-Event-Handler, um die Zahlen in den beiden Textfeldern mithilfe einer If-Anweisung zu vergleichen. 4. Verwenden Sie die Val-Funktion, um den Text im Textfeld umzuwandeln

  1. Designoberfläche :

    • Erstellen Sie drei Textfelder, zwei Textfelder zur Eingabe von Zahlen und ein Textfeld zur Anzeige verschiedener Zahlen.
  2. Code schreiben:

    • Verwenden Sie VB-Code, um Logik in das Schaltflächenklickereignis zu schreiben, um die Suche und Anzeige von Zahlen zu verwalten.
    Private Sub btnFindDifference_Click()
        ' 获取两个文本框中的数字
        Dim text1 As String
        Dim text2 As String
        text1 = TextBox1.Text
        text2 = TextBox2.Text
    
        ' 转换为数组
        Dim array1() As String = text1.Split(" ")
        Dim array2() As String = text2.Split(" ")
    
        ' 使用集合找到不同的数字
        Dim uniqueNumbers As New List(Of String)
        For Each num In array1
            If Not array2.Contains(num) AndAlso Not uniqueNumbers.Contains(num) Then
                uniqueNumbers.Add(num)
            End If
        Next
    
        ' 将不同的数字显示在第三个文本框
        TextBox3.Text = String.Join(" ", uniqueNumbers)
    End Sub
  3. Testlauf:

    • Geben Sie Zahlen in zwei Textfelder ein, klicken Sie auf die Schaltfläche und sehen Sie sich die verschiedenen Zahlen an, die im dritten Textfeld angezeigt werden.

2. Ich habe eine Frage zu chinesischen Textfeldern und den entsprechenden Nummern in VB?

Wenn Sie auf das Problem stoßen, wie Sie Textfelder verwenden und dynamisch die entsprechende Anzahl von Textfeldern in VB generieren, können Sie die folgenden Schritte ausführen, um es zu lösen:

  1. Design-Schnittstelle:

    • Add-on das Formular Eine Schaltfläche, die ein Textfeld generiert.
  2. Code schreiben:

    • Verwenden Sie VB-Code, um Textfelder in Schaltflächenklickereignissen dynamisch zu generieren.
    Private Sub btnGenerateTextBoxes_Click()
        ' 获取要生成的文本框个数(这里假设为10个)
        Dim numberOfTextBoxes As Integer = 10
    
        ' 动态生成文本框
        For i As Integer = 1 To numberOfTextBoxes
            Dim newTextBox As New TextBox
            newTextBox.Name = "TextBox" & i
            newTextBox.Text = "TextBox " & i
            ' 设置位置、大小等属性
            newTextBox.Top = (i - 1) * 30
            newTextBox.Left = 10
            ' 将文本框添加到窗体上
            Me.Controls.Add(newTextBox)
        Next
    End Sub
  3. Testlauf:

    • Klicken Sie auf die Schaltfläche, um die entsprechende Anzahl an Textfeldern zu generieren und überprüfen Sie, ob diese wie erwartet generiert werden.

Zusammenfassung

In VB können Sie die unterschiedlichen Zahlen in den beiden Textfeldern herausfinden, indem Sie logischen Code schreiben. Wenn Sie außerdem Textfelder in VB verwenden und eine entsprechende Anzahl von Textfeldern dynamisch generieren müssen, können Sie Code in das Schaltflächenklickereignis schreiben, um eine dynamische Generierung von Textfeldern zu erreichen. Auf diese Weise können wir das Rätsel leicht lösen.

Das obige ist der detaillierte Inhalt vonSo verwenden Sie ein VB-Programm, um unterschiedliche Zahlen in zwei Textfeldern zu finden und sie in einem anderen Textfeld anzuzeigen. Für weitere Informationen folgen Sie bitte anderen verwandten Artikeln auf der PHP chinesischen Website!

Stellungnahme:
Dieser Artikel ist reproduziert unter:docexcel.net. Bei Verstößen wenden Sie sich bitte an admin@php.cn löschen