Prev: Drawing shapes and saving them
Next: Find Folder Names
From: ??135 on 9 Jul 2010 21:41
Hi

Array with a loop to handle each of the single-precision value


'Original Creation By ??135
Public Function isSingleOK() As Boolean
Dim S4 As Single
On Error GoTo Exx

S4 = Single2.value

isSingleOK = True
Exit Function
Exx:
Single2.value = 0
isSingleOK = False
End Function


 | 
Pages: 1
Prev: Drawing shapes and saving them
Next: Find Folder Names