從 vb6 轉換為 vb.net

Question

我需要從 vb6 轉換為 vb.net

(picturebox1.TextWidth(RsSearch.Fields(Fs.FieldName)) / 2)

也從 vb6 到 vb.net

picturebox1.Line (x, y) - ((Width +x) / Reducer, (y+ Height) / Reducer), Fs.LineColor

也從 vb6 到 vb.net

picturebox1.DrawWidth = Int(Fs.LineWidth / 2)

還有在 vb.net 中對於圖片框中的proprety hdc 是什么意思，例如picturebox1.hdc

Answer 1

在 vb.net 中，您可以將 Graphics 類用於這些繪圖函數，或者在 Paint 事件中的圖片框控件上，或者在用於持久圖形的圖片框圖像上。 例如，要畫一條線：

Private Sub PictureBox1_Paint(sender As Object, e As PaintEventArgs) Handles PictureBox1.Paint
  e.Graphics.DrawLine...
End Sub

或者

Dim g As Graphics = Graphics.FromImage(PictureBox1.Image)
  g.DrawLine...