Rumah  >  Artikel  >  tutorial komputer  >  Cara menggunakan program vb untuk mencari nombor berbeza dalam dua kotak teks dan memaparkannya dalam kotak teks lain

Cara menggunakan program vb untuk mencari nombor berbeza dalam dua kotak teks dan memaparkannya dalam kotak teks lain

WBOY
WBOYke hadapan
2024-01-11 18:30:201444semak imbas

1. Bagaimanakah cara menggunakan program VB untuk mencari nombor berbeza dalam dua kotak teks dan memaparkannya dalam kotak teks lain?

Untuk mengetahui nombor berbeza dalam dua kotak teks dan memaparkannya dalam kotak teks lain dalam program VB, anda boleh mengikuti langkah di bawah: 1. Cipta tiga kotak teks dan namakannya masing-masing txtBox1, txtBox2 dan txtResult. 2. Tambahkan butang pada program, namakannya btnCompare, dan kaitkan dengan acara klik. 3. Tulis kod dalam pengendali acara klik untuk membandingkan nombor dalam dua kotak teks menggunakan pernyataan Jika. 4. Gunakan fungsi Val untuk menukar teks dalam kotak teks

  1. Antara muka reka bentuk :

    • Buat tiga kotak teks, dua kotak teks untuk memasukkan nombor dan kotak teks untuk memaparkan nombor yang berbeza.
  2. Tulis kod:

    • Gunakan kod VB untuk menulis logik dalam acara klik butang untuk mengendalikan carian dan paparan nombor.
    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. Test Run:

    • Masukkan nombor ke dalam dua kotak teks, klik butang dan lihat nombor berbeza dipaparkan dalam kotak teks ketiga.

2 Saya ada soalan tentang kotak teks bahasa Cina dan nombor yang sepadan dalam VB?

Jika anda menghadapi masalah cara menggunakan kotak teks dan menjana bilangan kotak teks yang sepadan secara dinamik dalam VB, anda boleh mengikuti langkah berikut untuk menyelesaikannya:

  1. Antara muka reka bentuk:

    • Tambahkan butang bentuk A yang menjana kotak teks.
  2. Tulis kod:

    • Gunakan kod VB untuk menjana kotak teks secara dinamik dalam acara klik butang.
    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. Larian ujian:

    • Klik butang untuk menjana bilangan kotak teks yang sepadan dan sahkan sama ada ia dijana seperti yang diharapkan.

Ringkasan

Dalam VB, anda boleh mengetahui nombor yang berbeza dalam dua kotak teks dengan menulis kod logik. Selain itu, jika anda perlu menggunakan kotak teks dalam VB dan menjana bilangan kotak teks yang sepadan secara dinamik, anda boleh menulis kod dalam acara klik butang untuk mencapai penjanaan kotak teks yang dinamik. Dengan cara ini, kita boleh menyelesaikan teka-teki dengan mudah.

Atas ialah kandungan terperinci Cara menggunakan program vb untuk mencari nombor berbeza dalam dua kotak teks dan memaparkannya dalam kotak teks lain. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!

Kenyataan:
Artikel ini dikembalikan pada:docexcel.net. Jika ada pelanggaran, sila hubungi admin@php.cn Padam