Atlanta Custom Software Development 

 
   Search        Code/Page
 

User Login
Email

Password

 

Forgot the Password?
Services
» Web Development
» Maintenance
» Data Integration/BI
» Information Management
Programming
VB VB (1648)
VB.net VB.net (736)
C# C# (15)
ASP.net ASP.net (779)
ASP ASP (41)
VC++ VC++ (25)
PHP PHP (0)
JAVA JAVA (4)
JScript JScript (5)
  Database
» SQL Server (708)
» ORACLE (5)
» MySQL (0)
» DB2 (0)
Automation
» C/C++/ASM (11)
» Microcontroller (1)
» Circuit Design (0)
OS/Networking
» Networking (5)
» Unix/Linux (1)
» WinNT/2k/2003 (8)
Graphics
» Flash (0)
» Maya (0)
» 3D max (0)
» Photoshop (0)
Links
» ASP.net (2)
» PC Interfacing (1)
» Networking (4)
» SQL Server (4)
» VB (23)
» VB.net (4)
» VC (3)
» HTML/CSS/JavaScript (10)
Tools
» Regular Expr Tester
» Free Tools

(Page 17 of 133) 3985 Result(s) found 

 

BusinessDateAdd - Add or subtract a number of business days from a date
Total Hit (1593) «Code LangId=1» ' add or subtract a number of business days from a date ' ' Note that it doesn't take Christmas, Easter and ' other holidays into account Function BusinessDateAdd(ByVal days As Long, ByVal StartDate As Date, _ Optional ByVal SaturdayIsHoliday As Boolean = True) As Date ....Read More
Rating
BusinessDateDiff - Evaluate the number of business days between two dates
Total Hit (1545) «Code LangId=1» ' Evaluate the number of business days between two dates ' ' Note that it doesn't take Christmas, Easter and ' other holidays into account Function BusinessDateDiff(ByVal StartDate As Date, ByVal EndDate As Date, _ Optional ByVal SaturdayIsHoliday As Boolean = True) As L ....Read More
Rating
EasterDate - Evaluate the date of Easter for a given year
Total Hit (1693) «Code LangId=1» ' Evaluate the Easter date for a given year Function EasterDate(ByVal Year As Integer) As Date Dim G As Integer Dim C As Integer Dim H As Integer Dim i As Integer Dim j As Integer Dim L As Integer Dim Month As Integer Dim Day As Integer ....Read More
Rating
FormatDateTimeEx - Extended formatting for date and time values
Total Hit (1742) «Code LangId=1» Enum DateTimeFormat dtGeneralDate dtLongDate dtMediumDate dtShortDate dtLongTime dtMediumTime dtShortTime dtCustom End Enum ' Enhanced VB FormatDateTime function Function FormatDateTimeEx(newDate, Optional ByVal dtFormat As ....Read More
Rating
FormatInternationalDate - Retrieving a date in an international format
Total Hit (2190) «Code LangId=1»' *** International date handler Public Enum eDateLocale edlArabic = &H401 edlDanish = &H406 edlGerman = &H407 edlSwissGerman = &H807 edlAmerican = &H409 edlBritish = &H809 edlAustralian = &HC09 edlSpanish = &H40A edlFinnish = &H40B edlFrench ....Read More
Rating
GetDBDate - Formatting a date as a DateSerial for Access
Total Hit (1576) «Code LangId=1»' Format a date as a DateSerial for Access ' Example: Debug.Print GetDBDate(date) Public Function GetDBDate(sDate As String) As String On Error GoTo ERROR_GetDBDate Dim sTmp As String If IsDate(sDate) = False Then sTmp = sDate Else sTmp = "DateSe ....Read More
Rating
GetRoshHashanah - Get the date of Rosh Hashanah (Jewish calendar)
Total Hit (1575) «Code LangId=1»' Returns the date that Rosh Hashanah begins ' for the requested year. It is important to note that ' Rosh Hashanah is based on the Lunar cycle so the Holiday ' actually begins at sunset of the day before the date ' returned by this function. ' Note: Many dates in the Jewish ....Read More
Rating
IsValidDateField - Check whether a date is valid
Total Hit (1908) «Code LangId=1»Enum psDateTypes AnyValidDate 'Allows any valid date to be entered PastDate 'Only allows past dates (before today) to be entered FutureDate 'Only allows future dates (after today) to be entered TodayOrFuture 'Only allows today or future date to be ....Read More
Rating
Monday - retrieving the date of the Monday for a specified week
Total Hit (1446) «Code LangId=1» ' Return the date of the Monday for a specified week.. ' This function can be tweaked to return any weekday. I use it in Access to ' subdivide reports into weekly units, since Access displays only a number ' between 1 and 53 for the week when you group dates by week. ' ' Note ....Read More
Rating
PerformanceTimer - A class module for high-resolution time measurement
Total Hit (2211) «Code LangId=1» '------------------------------------------- ' PerformanceTimer class module '------------------------------------------- ' Use this class to profile your code and any other operation ' typically with a precision greater than 1 millionth of a second ' ' As soon as you creat ....Read More
Rating
SecondsToString - Convert a number of seconds into a formatted time string
Total Hit (1533) «Code LangId=1» ' Converts a numeric value in seconds to a string ' Example: ' MsgBox SecondsToString(3920) --> 1h.5m.20s Function SecondsToString(ByVal Seconds As Long) As String SecondsToString = (Seconds \ 3600) & "h." & ((Seconds \ 60) Mod 60) & "m." _ & (Seconds Mod ....Read More
Rating
SecondsToTime - Convert a number of seconds to a Date value
Total Hit (1593) «Code LangId=1»' Converts a numeric value in seconds to a time value ' Example: ' MsgBox SecondsToTime(11120) --> 3.5.20 AM Function SecondsToTime(ByVal Seconds As Long) As Date SecondsToTime = CDate(Seconds / 86400) End Function «/Code» ....Read More
Rating
TimeToMinutes - Convert a time value into a number of minutes
Total Hit (1471) «Code LangId=1»' Converts a time value to a numeric value in minutes ' Example: ' MsgBox TimeToMinutes(TimeSerial(3, 5, 0)) --> 185 Function TimeToMinutes(ByVal newTime As Date) As Long TimeToMinutes = Hour(newTime) * 60 + Minute(newTime) End Function «/Code» ....Read More
Rating
TimeToSeconds - Convert a time value into a number of seconds
Total Hit (2324) «Code LangId=1»' Converts a time value to a numeric value in seconds ' Example: ' MsgBox TimeToSeconds(TimeSerial(3, 5, 20)) --> 11120 Function TimeToSeconds(ByVal newTime As Date) As Long TimeToSeconds = Hour(newTime) * 3600 + Minute(newTime) * 60 + Second _ (newTime) ....Read More
Rating
TimeToString - Convert time to a descriptive string
Total Hit (2414) «Code LangId=1»' convert a date value into a string in the format ' YY years, MM months, DD days, HH hours, MM minutes, SS.HH seconds) ' you can also opt for time short format (HH h, MM m, SS s) Function TimeToString(ByVal aDate As Date, Optional ShortTimeFormat As Boolean, _ Optional ....Read More
Rating
ArrayAny - Return an initialized array of any type
Total Hit (1281) «Code LangId=1» ' Returns an array and initializes it with passed data. ' ' It is similar to the Array function, but it works with ' array of any type. The type of the returned array is ' assumed to be the type of the first element in the ' parameter list, so you might need to force a given ....Read More
Rating
ArrayAvg - The average of an array of any type
Total Hit (1251) «Code LangId=1» ' The average of an array of any type ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectively ' if IGNOREEMPTY argument is True or omitted, ' Empty values aren't accounted for Function ArrayA ....Read More
Rating
ArrayMax - The value and index of highest element in an array of any type
Total Hit (1290) «Code LangId=1»' Return the maximum value in an array of any type ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectively ' If MAXINDEX is passed, it receives the index of the ' maximum element in the array F ....Read More
Rating
ArrayMin - The value and index of lowest element in an array of any type
Total Hit (1275) «Code LangId=1» ' Return the minimum value in an array of any type ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectively ' If MININDEX is passed, it receives the index of the ' minimum element in the array ....Read More
Rating
ArrayShuffle - Randomize the order of elements in an array
Total Hit (2393) «Code LangId=1» ' Shuffle the elements of an array of any type ' (it doesn't work with arrays of objects or UDT) Sub ArrayShuffle(arr As Variant) Dim index As Long Dim newIndex As Long Dim firstIndex As Long Dim itemCount As Long Dim tmpValue As Variant firs ....Read More
Rating
ArrayStdDev - The standard deviation of a numeric array
Total Hit (2188) «Code LangId=1»' The standard deviation of an array of any type ' ' if the second argument is True or omitted, ' it evaluates the standard deviation of a sample, ' if it is False it evaluates the standard deviation of a population ' ' if the third argument is True or omitted, Empty values are ....Read More
Rating
ArraySum - The sum of all the items in an array of any type
Total Hit (1631) «Code LangId=1» ' Return the sum of the values in an array of any type ' (for string arrays, it concatenates all its elements) ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectively Function ArraySum(arr As ....Read More
Rating
ArrLongestItem - The value and index of the longest element of an array of any type
Total Hit (1494) «Code LangId=1»' The longest item in an array of any type ' (it applies the LEN function to all the items in the array ' and then takes the highest value) ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectively ....Read More
Rating
ArrShortestItem - The value and index of the shortest element of an array of any type
Total Hit (1261) «Code LangId=1»' The shortest item in an array of any type ' (it applies the LEN function to all the items in the array ' and then takes the highest value) ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectivel ....Read More
Rating
ArrShortestItem - The value and index of the shortest element of an array of any type
Total Hit (1237) «Code LangId=1»' The shortest item in an array of any type ' (it applies the LEN function to all the items in the array ' and then takes the highest value) ' ' FIRST and LAST indicate which portion of the array ' should be considered; they default to the first ' and last element, respectivel ....Read More
Rating
BubbleSort - Sort Arrays using the BubbleSort Algorithm
Total Hit (2138) «Code LangId=1» ' Bubble Sort an array of any type ' BubbleSort is especially convenient with small arrays (1,000 ' items or fewer) or with arrays that are already almost sorted ' ' NUMELS is the index of the last item to be sorted, and is ' useful if the array is only partially filled. ' ' ....Read More
Rating
StrReverse - A replacement for the VB6's StrReverse function under VB4 and VB5
Total Hit (907) «Code LangId=1»' A replacement for the StrReverse function for VB4 and VB5 Function StrReverse(ByVal Text As String) As String Dim length As Long, index As Long length = Len(Text) StrReverse = Space$(length) For index = 1 To length Mid$(StrReverse, length + 1 - ....Read More
Rating
UniqueWords - Extract all individual words in a string
Total Hit (1035) «Code LangId=1» ' build a list of all the individual words in a string ' ' returns a collection that contains all the unique words. ' The key for each item is the word itself ' so you can easily use the result collection to both ' enumerate the words and test whether a given word appears ' ....Read More
Rating
Concatenate an array of strings with commas and a final "and", or other separators
Total Hit (909) «Code LangId=1»' Concatenate an array of strings with commas and a final "and", ' or other separators ' ' Example: ' Debug.WriteLine("Choose one from " & CreateStringList(New String() {"item1", ' "item2", "item3"})) ' ' => Choose one from item1, item2 and item3 Function CreateStringL ....Read More
Rating
StrReverse - A replacement for the VB6's StrReverse function under VB4 and VB5
Total Hit (784) «Code LangId=1»' A replacement for the StrReverse function for VB4 and VB5 Function StrReverse(ByVal Text As String) As String Dim length As Long, index As Long length = Len(Text) StrReverse = Space$(length) For index = 1 To length Mid$(StrReverse, length + 1 - ....Read More
Rating


(Page 17 of 133) 3985 Result(s) found  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 ...

Recommanded Links

 

Home   |  Comment   |  Contact Us   |  Privacy Policy   |  Terms & Conditions   |  BlogsZappySys

© 2008 BinaryWorld LLC. All rights reserved.