版主 抱歉  因為我不知道要將此歸類於何版，所以放在最相近之版 這是我開圖的程式  

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim OpenFileDialog1 As New OpenFileDialog OpenFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif" If OpenFileDialog1.ShowDialog() = DialogResult.OK Then path = OpenFileDialog1.FileName Dim bmp = New Bitmap(path) PictureBox1.Image = bmp End If End Sub 但是存檔就不知怎麼寫了，我剛接觸這方面，問的問題很菜，請大家多多包函

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim SaveFileDialog1 As New SaveFileDialog Dim pic As Image SaveFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif" If SaveFileDialog1.ShowDialog() = DialogResult.OK Then pathout = SaveFileDialog1.FileName <-------就不知怎麼寫了 End If End Sub

bio你好: 先說聲抱歉,vb的問題應該不適合放在這裡, (C Builder)跟vb的指令完全不一樣。