How to make Error's Effect USING VB.NET
#Code
#Region "Event Validate"
Sub EventErr(Frm As Form)
Dim Th As New Threading.Thread(Sub() notValide(Frm))
Th.Start()
End Sub
Private Sub notValide(Frm As Form)
Dim OrgLocation = Frm.Location
'---
Dim LeftLocation = New Point(OrgLocation.X - 10, OrgLocation.Y)
Dim RightLocation = New Point(OrgLocation.X + 10, OrgLocation.Y)
'---
Dim IsRight As Boolean = False
For i = 0 To 3
If IsRight Then
Frm.Location = LeftLocation
IsRight = False
Else
Frm.Location = RightLocation
IsRight = True
End If
Threading.Thread.Sleep(50)
Next
'---
End Sub
#End Region
---------------
Introductions
All About VB.NET Programmings(Visual Basic .NET) Using Visual Studio 12 and Above
Programming as never seen before ...
---------------
Playlist :
1.Visual Studio
• Visual Studio
2.Controls-Toolbox
• Controls - ToolBox
3.Events
• KeyDown - textbox Event USING VB.NET
4.Design
• Change Controls Style On RunTime With...
5.Crystall Report
• Crystall Report
6.DATABASE, SQL SERVER, ACCESS
• DATABASE, SQL SERVER, ACCESS
7.Access Project
• Access Project
8.Tips and Tricks
• Tips and Tricks
9.Generals Codes:
• ShortCode { : } USING VB.NET
10.Windows
• Change Current System Locale and Numb...
11.Tools
• Tools - Decompile To Recovery Code US...
12.Errors
• ERRORS
13.Projects
• VB.NET Programming How to Create EAN-...
---------------
Facebook Group :
/ 557992827685165
Youtube Channel :
/ @vbnetprogramming