[VB.Net] Disegnare linea su un form

[ladyBlu]

Ciao ragazzi, ho una domandina supida.

Non riesco a trovare il controllo per disegnare, in progettazione non da codice, una linea sul form.
Cosa devo usare?

Grazie
lady

[MdE2005]

Guarda alla sinistra del monitor, insieme alle textbox, alle caption, ai button c'è il controllo Line.....
cmq è facile anche disegnare da codice..

[ladyBlu]

Ciao mde

Ho già guardato nella toolbox ma non c'è il controllo Line. Per questo ho chiesto se sapete voi come fare.

[giorgiogio48]

Ciao,
ti rispondo da VB6. Prova a inserire nel form un frame. Poi per il frame metti height=0, Appareance= Flat, Caption: niente.

[ladyBlu]

Originariamente inviato da giorgiogio48
Ciao,
ti rispondo da VB6. Prova a inserire nel form un frame. Poi per il frame metti height=0, Appareance= Flat, Caption: niente.

ciao giorgio, grazie x il suggerimento.

Però vorrei evitare strane soluzioni, perchè il controllo c'è.
ora sto impostando del codice visto che non trovo l'oggetto bell'e pronto. se poi non dovessi risolvere nemmeno così, userò il tuo suggerimento.

Grazie

[MdE2005]

Ciao giorgiogior48, non mi sembra la soluzione migliore, cmq in codesta maniera sono disabilitate proprietà importanti per un controllo line, come per esempio bordercolor, x1,x2,y1,y2..non ti sembra?!

[ladyBlu]

mde puoi dirmi a quale classe devo fare riferimento per disegnare la linea da codice?

grazie

[MdE2005]

Io pensavo all'uso della funzione LineTo, quindi

Imports System
Imports System.Windows.Forms
Imports System.Drawing

eccetera....

[ladyBlu]

c'è qualcosa che non va. nonostante abbia inserito gli Imports non ho variabile alcuna che faccia riferimento all'oggetto Line.

Puoi scrivere qualche riga di codice per favore?

[MdE2005]

Imports System
Imports System.Windows.Forms
Imports System.Drawing
Public Module modmain
   Sub Main()
      Dim theForm as MainForm = new MainForm()
      theForm.Size = new Size(500, 350)
      theForm.Text = "Visual Basic.NET"
      theForm.ShowDialog()
   End Sub
End Module
Public Class MainForm
Inherits Form
   Protected Overrides Sub OnPaint(e as PaintEventArgs)
      e.Graphics.Clear(Me.BackColor)
      e.Graphics.DrawLine(new Pen(Color.Blue), 0, 0, Me.ClientSize.Width, Me.ClientSize.Height)
   End Sub
End Class