Happy Codings - Programming Code Examples

Visual Basic Programming Code Examples

Visual Basic > Graphics Games Programming Code Examples

RGB Long Splitter Sub



RGB Long Splitter Sub

Public Declare Function GetSysColor Lib "user32" (ByVal nIndex As Long) As Long
Public Sub LongToRGB(ByVal RGBColor As Long, ByRef RColor As Integer, _
 ByRef GColor As Integer, ByRef BColor As Integer)
 
    HexRGB = Hex(RGBColor)
    If Left$(HexRGB, 2) = "80" And Len(HexRGB) > 6 Then HexRGB = _
     Hex(GetSysColor(Val("&H" &Right$(HexRGB, 2))))
    t = String$(6 - Len(HexRGB), Asc("0")) & HexRGB
    RColor = Val("&H" & Mid$(t, 5, 2))
    GColor = Val("&H" & Mid$(t, 3, 2))
    BColor = Val("&H" & Mid$(t, 1, 2))
 
End Sub

C Code Calculate a floating-point average
C Program code to Calculate a floating-point average using pointers. Memory allocation failed. Terminating program. Output the average. The average of the the values you...

Program code Find Quotient & Remainder
User is asked to enter the Dividend & Divisor and the program then finds the quotient and remainder based on the input values and the modulus operator "%" returns the remainder

Swapping numbers Function Call by Value
Before we discuss function call by value, lets understand the terminologies that we'll use while explaining this: Actual parameters: The parameters that appear in function calls and

Program to Converts Celsius to Fahrenheit
Fahrenheit & Celsius are two unit for measure temperature. Formula to convert "Celsius" to Fahrenheit using this formula you can change temperature fahrenheit to celsius. Use temp

Program Code to Implement CockTail Sort
C Program implements cocktail sort. Cocktail sort is a variation of bubble sort that is both a stable sorting algorithm & a comparison sort. The algorithm differs from a "Bubble Sort" in

C Programming Sample If Else Statement
If condition returns true then the statements inside the body of "if" are executed and the statements inside body of "else" are skipped. If condition returns false then the statements

String Search Algorithm & Short text sizes
C++ program performs Naive string matching without using any specific library functions. A text and a Pattern is given as input. Pattern is searched for in a text and all 'instances' of the

C++ Break Keyword is used to Stop Loops
The 'C++ program' tries to count alphabetical letters from d to n, but a break makes it stop when it encounters k: In a for statement, the 'break' can stop the counting when particular