Overview [EDIT]
	Added: Saturday, July 28, 2007 21:16 EST
I have visited your site 635-times
Select and copy to clipboard! Credit: Visitor994
Testing [EDIT]
	Added: Thursday, June 28, 2007 03:24 EST
Helloykq - this is just a testing, dont worry about it
Select and copy to clipboard! Credit: Testerlqa
KCBnLytbwdgbBQcSB [EDIT]
	Added: Thursday, June 21, 2007 21:51 EST
a6a7d2745ee994377352f07b209ce0d6
Select and copy to clipboard! Credit: ZGqmBcETlaNKmT
KCBnLytbwdgbBQcSB [EDIT]
	Added: Thursday, June 21, 2007 21:51 EST
a6a7d2745ee994377352f07b209ce0d6
Select and copy to clipboard! Credit: ZGqmBcETlaNKmT
KCBnLytbwdgbBQcSB [EDIT]
	Added: Thursday, June 21, 2007 21:51 EST
a6a7d2745ee994377352f07b209ce0d6
Select and copy to clipboard! Credit: ZGqmBcETlaNKmT
hpm494cxkr [EDIT]
	Added: Thursday, May 10, 2007 08:46 EST
qqhq1l0ow 40u5dt1woerclv689 1pte394b
Select and copy to clipboard! Credit: 4azy5xtd9y
pAvVbtKZmHaApGxo [EDIT]
	Added: Wednesday, May 02, 2007 09:27 EST
Test myfunction comment
Select and copy to clipboard! Credit: eHpyinSZqfjNRk
Add An Automatic Transparent Image [EDIT]
	Added: Friday, August 26, 2005 20:35 EST
To Add A Transparent Image Without Masking It, Add a Panel Control Onto The Form, and Set The Background Image Equal To The Image You Want To Use.
Select and copy to clipboard! Credit: streaksathlete@yahoo.com
Clear all textboxes on a form inside multiple containers [EDIT]
	Added: Friday, July 08, 2005 10:36 EST
'This code recurses through all the forms 'controls clearing all textboxes it finds Private Function ClearCtrls(ByVal p_ctrl As Windows.Forms.Control.ControlCollection) Dim l_ctrl As Control For Each l_ctrl In p_ctrl If TypeOf (l_ctrl) Is TextBox Then l_ctrl.Text = vbNullString Else ClearCtrls(l_ctrl.Controls) End If Next End Function
Select and copy to clipboard! Credit: barry.burke@gmail.com
Read entire contents of a file to a string [EDIT]
	Added: Friday, December 03, 2004 12:58 EST
'fullPath references the full path(i.e. C:\YourProg\TextFile.txt) Public Shared Function GetFileContents(ByVal FullPath As String, _ Optional ByRef ErrInfo As String = "") As String Dim strContents As String Dim objReader As StreamReader Try objReader = New StreamReader(FullPath) strContents = objReader.ReadToEnd() objReader.Close() Return strContents Catch Ex As Exception ErrInfo = Ex.Message Return "" End Try End Function
Select and copy to clipboard! Credit: jsmith@rossware.net
Previous Existance in VB.NET 2003 [EDIT]
	Added: Monday, September 13, 2004 04:48 EST
Function PrevInstance() As Boolean If UBound(System.Diagnostics.Process.GetProcessesByName(System.Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then Return True Else Return False End If End Function Usage: If PrevExistance() = True Then Application.Exit()
Select and copy to clipboard! Credit: crouchie1998@hotmail.com
Enumerate Drives in VB.NET [EDIT]
	Added: Monday, September 13, 2004 04:47 EST
Dim strRoots() As String = System.IO.Directory.GetLogicalDrives Dim s As String For Each s In strRoots Console.WriteLine(s) Next
Select and copy to clipboard! Credit: crouchie1998@hotmail.com

[1 2 3]

To add your code snippet to this list click here.