- 博客(10)
- 资源 (1)
- 收藏
- 关注
原创 控件的移动!
Dim MousePos2 As Point 定义鼠标位置变量 Dim draging As Boolean = False Dim DragRect As Rectangle Private Sub Button2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEven
2005-03-24 17:08:00 709
原创 用户控件--带背景色的菜单!
Imports System.ComponentModelPublic Class myMenuItem Inherits System.Windows.Forms.MenuItem #Region " Windows 窗体设计器生成的代码 " Public Sub New() MyBase.New() 该调用是 Windows 窗体设计器
2005-03-24 17:04:00 908 1
原创 form数组!
1.创建form数组(控件数组)Public Class FormsCollection Inherits CollectionBase Public Shadows Function Add(ByVal FormObject As Form) As Form MyBase.List.Add(FormObject) Return FormObject End Function Public Sha
2005-03-24 17:03:00 1375
原创 用户控件--(XP风格的按钮)
Imports System.DrawingImports System.ComponentModelPublic Class winxpbutton Inherits System.Windows.Forms.Button Private my_mouseDown As Boolean = False 鼠标按下 Private my_mouseHover As Bool
2005-03-24 16:59:00 1350 2
原创 在richtextbox中每行输入字符数量的限制。(不完全!)
Imports System.ComponentModelPublic Class myrichtextbox Inherits System.Windows.Forms.RichTextBox #Region " Windows 窗体设计器生成的代码 " Public Sub New() MyBase.New() 该调用是 Wind
2005-03-24 16:56:00 2038
原创 在VB.NET环境下如何判断INsert,NumLock等键盘的状态。
Public Declare Function GetKeyState Lib "user32" Alias "GetKeyState" (ByVal nVirtKey As Integer) As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArg
2005-03-24 16:54:00 1772
原创 用户控件--控制一个文本框只允许输入固定多个字符(按照字节计算)
Public Class maxtextbox Inherits System.Windows.Forms.TextBox#Region " Windows 窗体设计器生成的代码 " Public Sub New() MyBase.New() 该调用是 Windows 窗体设计器所必需的。 InitializeComponent()
2005-03-24 16:50:00 1400 1
原创 取得光标在多行textbox中的行和列
Public Function checkrow() As String Dim row As Integer = Me.TextBox1.SelectionStart Dim i As Integer Dim p As Integer Dim count As Integer = 0 Dim count1 As Intege
2005-03-24 16:47:00 827
原创 在datagrid获得光标后,按tab键让其焦点移动到其他控件。
Public Class mytabdatagrid Inherits System.Windows.Forms.DataGrid ‘/////////////////////////////////////////////////////////////////////////////////////#Region " Windows 窗体设计器生成的代码 " Public
2005-03-22 08:50:00 1133
原创 VB.NET中制作图片按钮
图片按钮:思路:很简单,就是在一个picturebox控件上放置一个button控件,然后将这个button添加进picturebox上(确保先拖拽picturebox,后拖拽button),设置这个button的背景色(这个时候是相对于picturebox)为透明。 Imports System.ComponentModelPublic Class picturebutton Inher
2005-03-15 11:18:00 2670
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人