タイトル : System.Drawing.Graphics.DrawLine メソッドについて 投稿日 : 2008/10/15(Wed) 09:34 投稿者 : くりーむぱん
VB6.0と2005の互換表をずっと探していました。 あちこち探してやっとたどり着いた感じです。 VB初心者です。 事情があり、VB6.0の課題をVB2005で自習しているのですが、 エラーに困っています。 フォームをドラッグして直線を引くという課題なのですが、 下から4行目のLineのところでエラーになります。 エラーメッセージ この引数の数を受け付ける’DrawLine'がないため、オーバーロードの解決に失敗しました。 ')'が必要です。 括弧の数は、合っていると思うのですが、 済みません。間違いをご指摘いただけると助かります。 よろしくお願いします。 Public Class Form1 Dim startX As Integer Dim startY As Integer Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown If e.Button = Windows.Forms.MouseButtons.Left Then startX = e.X startY = e.Y End If End Sub Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp If e.Button = Windows.Forms.MouseButtons.Left Then system.Drawing.Graphics.drawLine =(startX,startY)-(e.X,e.Y), , BF End If End Sub End Class |