Recent content by irantp12

  1. I

    رسم اشکال با ویژوال بیسیک دات نت

    Dim X1 As Single, Y1 As Single, X2 As Single, Y2 As Single Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) ‘Refresh your start variables X1 = X Y1 = Y X2 = X Y2 = Y End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y...
بالا