ホームページ  >  記事  >  コンピューターのチュートリアル  >  vbプログラムを使用して2つのテキストボックス内の異なる数値を検索し、別のテキストボックスに表示する方法

vbプログラムを使用して2つのテキストボックス内の異なる数値を検索し、別のテキストボックスに表示する方法

WBOY
WBOY転載
2024-01-11 18:30:201440ブラウズ

1. VB プログラムを使用して 2 つのテキスト ボックス内の異なる数値を検索し、別のテキスト ボックスに表示するにはどうすればよいですか?

VB プログラムで 2 つのテキスト ボックス内の異なる数値を見つけて別のテキスト ボックスに表示するには、次の手順に従います。 1. 3 つのテキスト ボックスを作成し、それぞれ txtBox1、txtBox2、txtResult という名前を付けます。 2. プログラムにボタンを追加し、btnCompare という名前を付け、クリック イベントに関連付けます。 3. If ステートメントを使用して 2 つのテキスト ボックスの数値を比較するコードをクリック イベント ハンドラーに記述します。 4. Val 関数を使用してテキスト ボックス内のテキストを変換します。

  1. インターフェイスのデザイン:

    • 3 つのテキスト ボックスを作成し、数値を入力するための 2 つのテキスト ボックスと、異なる数値を表示するための 1 つのテキスト ボックス。
  2. コードの作成:

    • VB コードを使用して、ボタン クリック イベントに検索と合計を処理するロジックを作成します。の数字が表示されます。
    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. テスト実行:

    • 2 つのテキスト ボックスに数字を入力し、ボタンをクリックして 3 番目のテキストを表示します。ボックス内に数字が表示されます。

2. VB のテキスト ボックスとそれに対応する番号についてお聞きしたいのですが。

テキスト ボックスを使用して、対応する数のテキスト ボックスを VB で動的に生成する方法の問題が発生した場合は、次の手順に従って問題を解決できます。

    ##デザイン インターフェイス
  1. :

    フォームにボタンを追加してテキスト ボックスを生成します。

  2. コードの作成
  3. :

    VB コードを使用して、ボタンのクリック イベントでテキスト ボックスを動的に生成します。

      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
  4. テスト実行
  5. :

    ボタンをクリックして、対応する数のテキスト ボックスを生成し、それが正しいかどうかを確認します。期待どおりに生成されました。

  6. 概要

VB では、論理コードを記述することで 2 つのテキスト ボックス内の異なる数値を見つけることができます。さらに、VB でテキスト ボックスを使用し、対応する数のテキスト ボックスを動的に生成する必要がある場合は、ボタン クリック イベントにコードを記述してテキスト ボックスを動的に生成できます。このようにして、パズルを簡単に解くことができます。

以上がvbプログラムを使用して2つのテキストボックス内の異なる数値を検索し、別のテキストボックスに表示する方法の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。

声明:
この記事はdocexcel.netで複製されています。侵害がある場合は、admin@php.cn までご連絡ください。