12-10-2010, 14:41
|
|
|
חבר מתאריך: 24.01.08
הודעות: 35
|
|
גרפיקה פשוטה ב VB
שלום, מבקש עזרה בVB:
מעוניין להבין איך מקשרים בין פרוצדורה של כפתור Button (שמפעיל קוד מסויים) להפעלת פונקצית Paint
כלומר. ברור לי איך לבצע ציור של בעת הרצת טופס אוטומטית ע"י הקוד (ללא אובייקטים נוספים)
Private Sub Form1_Paint(ByVal sender As Object, _ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
e.Graphics.DrawLine(Pens.Blue, 100, 220, 150, 185)
End Sub
מתקשה לגרום לפרוצדורה שלמטה--->
להפעיל פונקצית ציור.
תודה לעוזרים.
Public a As Integer, b As Integer, c As Integer
Private Sub BT1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT1.Click
a = Val(txta.Text)
b = Val(txtb.Text)
c = Val(txtc.Text)
If ((a > 100) Or (a < 1)) Or ((b > 100) Or (b < 1)) Or ((c > 100) Or (c < 1)) Then
MessageBox.Show("Error: enter a numbers between 1-100")
End If
End Sub
|