|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
xp_regex: Regular Expressions in SQL Server 2000
|
| Total Hit (685) |
Regular Expressions are probably the best tool for text parsing. Using Regular Expressions GREATLY simplifies anything for which you would normally use CHARINDEX, PATINDEX, SUBSTRING, STUFF, REPLACE, etc.
|
Rating
 |
|
|
|
 |
Compact and Repair Access MDB.
|
| Total Hit (3024) |
Following code requires Microsoft DAO 3.6 reference.
To add this reference goto Project->Reference
example:
«Code LangId=1»
Call DBCompact("OLt.mdb", "tmpOLT.mdb", , , ";pwd=mypwd")
«/Code»
|
| Rating
|
|
|
|
Tile image in MDI Background.
|
| Total Hit (3184) |
This code Requires MDIForm and 1 Picturebox.
Set Picture property of picturebox. This picture will be used for MDI Background
|
| Rating
|
|
|
|
Protect the form unloading in accidently
|
| Total Hit (1550) |
When you want ot protect the form unload in accidently you can use this following code.
In this code, the action is When a form is prepared to
unload The unload event was automatically raised.
on that event there is an parameter named "Cancel" which in the data type integer.
When the unload ev
....Read More |
| Rating
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Floating Point Numbers Validation
|
| Total Hit (2123) |
«Code LangId=1»Private Sub Form_Load()
Text1.Text = Empty
End Sub
' USAGE
'Create a form a text box
Private Sub Text1_KeyPress(KeyAscii As Integer)
' Precision is 2 in this case
' Send the Precision Value same in both the Functions
Call ValidateNum(Text1, 2, KeyAscii)
End
....Read More |
Rating
 |
|
|
|
|
|
|
|
|
|
How to get a listview control to sort numbers correctly...
|
| Total Hit (2530) |
This is one I discovered after banging my head against the wall for a few hours trying to get a list view control to sort numbers correctly. When trying to create a list view control in report mode that would allow a user to quickly sort by a text listing (in this case a column of state abbreviation
....Read More |
| Rating
|
|
|
|
|
|
|
|
Give user ability to interrupt loop
|
| Total Hit (2995) |
Private Declare Function GetAsyncKeyState Lib "user32.dll" _
(ByVal vKey As Long) As Integer
'//ESCAPE
Const VK_ESCAPE = &H1B
'//Button Click
Const VK_LBUTTON = &H1
'//Interrupting A Do Loop
'//Give user ability to interrupt loop
Private Sub cmdStart_Click()
....Read More |
| Rating
|
|
|
|
|
|
|
|