在textbox里放按钮并控制输入字符不能覆盖住按钮(包括设计阶段)

    End Sub

 Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)

 Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)

        Dim KeyAsc As Integer = m.WParam.ToInt32

        Select Case m.Msg

            Case &H102

                If checklength() Then

                    If KeyAsc <> 8 Then

                        Return

                    End If

                Else

上一页  [1] [2] [3] [4] [5] [6] [7] 下一页

进入问吧