锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net制作自己控件 vbnet控件开发( 四 )

IT技术控件


offset_X = e.X - Mouse_P.X
If Me.Location.X + offset_X + Me.Width = Me.ParentForm.Width Or Me.Location.X + offset_X = 0 Then
flag = False
Else
Me.Location = New Point(Me.Location.X + offset_X, Me.Location.Y)
End If
Case 1'竖向·
offset_Y = e.Y - Mouse_P.Y
If Me.Location.Y + offset_Y + Me.Height + 30 = Me.ParentForm.Height Or Me.Location.Y + offset_Y = 0 Then
flag = False
Else
Me.Location = New Point(Me.Location.X, Me.Location.Y + offset_Y)
End If
End Select
End Sub
'鼠标弹起
Private Sub UserControl1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
Me.BackColor = UP_Color
flag = False
End Sub
End Class
vb.net 窗口控件的制作把你的控件 继承Panel类，而不要集成UserControl类 。
你可以在集成Panel后，往Panel里面加一些你自己的方法或Control来实现你需要的功能 。向里面拖控件的功能则由Panel来控制，你自己就不用管了 。
关于vb.net制作自己控件和vbnet控件开发的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息 ， 记得收藏关注本站 。

推荐阅读


上一篇：thinkphp停车管理系统，停车场管理系统idea

下一篇：绝地求生乞讨主播在哪直播，绝地求生这个主播秀到爆!