其他分享
首页 > 其他分享> > DataGridViewImageColumn 图片照片

DataGridViewImageColumn 图片照片

作者:互联网

Private Sub BT_PHOTOADDRESS_Click(sender As Object, e As EventArgs) Handles BT_PHOTOADDRESS.Click
Dim dvic As DataGridViewImageColumn = New DataGridViewImageColumn(True) With {
.ImageLayout = DataGridViewImageCellLayout.Zoom,
.Name = "Images",
.HeaderText = "Images"
}
Dim filedialog As String
OpenFileDialog1.Filter = "图片|*.jpg;"
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
filedialog = OpenFileDialog1.FileName 'IO.Path.GetFileName(OpenFileDialog1.FileName)
Me.TxtPictureURL.Text = filedialog
Me.PB_PAPHOTO.Image = Image.FromFile(filedialog)
'DataGridView1.Rows(Me.DataGridView1.CurrentCell.RowIndex).Cells("pa_photo").Value = dvic.Image
End If
End Sub

标签:Me,OpenFileDialog1,End,Image,照片,filedialog,DataGridViewImageColumn,图片
来源: https://www.cnblogs.com/beichengshiqiao/p/16662968.html