Handy Hit 1


The function that you could use to convert a long number to double is :
cDbl(Convert to Double) is used like in the following example:

Example source code:

Dim dblMyNumber As Double
Dim lngMyNumber As Long

lngMyNumber = 1002992

dblMyNumber = CDbl(lngMyNumber)





Now, to convert a Double to a long, you need cLng function.
cLng (Convert to Long) is used like in the following example:

Example source code:

Dim dblMyNumber As Double
Dim lngMyNumber As Long

dblMyNumber = 1002992

lngMyNumber = CLng(dblMyNumber)

Handy Hint 2


how to create a Browse folder button

Selecting a folder to backup with MyComputer as the Root Folder

'Set the folderBrowser dialog properties
With FolderBrowserDialog1
.Description = "Select a backup folder"
.RootFolder = Environment.SpecialFolder.MyComputer
.ShowNewFolderButton = False
End With

If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
txtFile.Text = FolderBrowserDialog1.SelectedPath
End If