0

ボタンがクリックされたときに2つの画像を表示する必要があります。最初にユーザーは2つの画像を参照し、3番目のボタンをクリックすると2つの画像が表示されます。私はこれまでこのコードを持っています。私はvbの完全な初心者です

 Dim dialog As New OpenFileDialog()
    If DialogResult.OK = dialog.ShowDialog Then
        TextBox2.Text = dialog.FileName
    End If
4

1 に答える 1

1

ここに画像の説明を入力

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim fdialog As New OpenFileDialog()
    fdialog.FileName = String.Empty
    fdialog.Multiselect = True

    If fdialog.ShowDialog = DialogResult.OK Then
        If fdialog.FileNames.Length = 2 Then
            PictureBox1.Image = System.Drawing.Image.FromFile(fdialog.FileNames(0))
            TextBox1.Text = fdialog.FileNames(0)
            PictureBox2.Image = System.Drawing.Image.FromFile(fdialog.FileNames(1))
            TextBox2.Text = fdialog.FileNames(1)
        ElseIf fdialog.FileNames.Length = 1 Then
            PictureBox1.Image = System.Drawing.Image.FromFile(fdialog.FileName)
            TextBox1.Text = fdialog.FileName
            PictureBox2.Image = Nothing
            TextBox2.Text = String.Empty
        End If
    End If
End Sub

次のコードは、「読み込み」ボタンのクリック イベントに入ります。
よろしく...

于 2012-05-07T14:50:56.087 に答える