2012-05-06 157 views
0

單擊按鈕時需要顯示兩個圖像。首先,用戶將瀏覽這兩個圖像,點擊第三個按鈕後,它應該顯示兩個圖像。到目前爲止我有這個代碼。我在VB單擊按鈕時顯示圖像

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

添加imagecontrol以形成和點擊第三個按鈕設置imagecontrol.src = dialog.FileName – Satya

+0

我在哪裏可以找到imagecontrol?在控制工具欄上的 – stbb24

+0

,你有一個圖像按鈕的權利? – Satya

回答

1

enter image description here

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 

下面的代碼放在「加載」按鈕的點擊事件一個完整的新手。
問候...