Results for "Author: guillaume giffard"
It is a clock with needles that uses simple geometric functions, the VB's time functions and whose dial resizes with the form. This program shows you how to use the VB's time functions and how to build moving needles. To make the dial be resiable I have written the main functions in the Form_Resize function. I've add the Language menu for the program can be readen in english or in french.
VeryLongConvert is a function that converts a huge number as string from a base to another one . INPUTS : * Word As String : the huge number, up to 32,000 digits, to convert * FromBase As Integer : the base in witch Word is written * ToBase As Integer : the base in witch Word is to convert * Separator As String : this Optional variable is the decimal separator, usely the point and sometimes the comma OUTPUTS : * the function returns the huge number converted from FromBase to ToBase as string. It returns "" if Word is empty or if FromBase or ToBase is not between 2 and 36 Here is the public code : Public Const B_BIN As Integer = 2 Public Const B_OCT As Integer = 8 Public Const B_DEC As Integer = 10 Public Const B_HEX As Integer = 16 Public Const DEFAULT_SEPARATOR As String = "." Public Const COMMA_SEPARATOR As String = "," Public Function VeryLongConvert(Word As String, FromBase As Integer, ToBase As Integer, Optional Separator As String = DEFAULT_SEPARATOR) As String Example : This example illustrates the VeryLongConvert function. To try this example, include the module ModConvert, paste the code into the Declarations section of a form that contains two TextBox controls and a CommandButton control, and then press F5, enter a number in Text1 and click on Command1. It will convert it from decimal to hexadecimal. You can convert from any base to another by replacing 10 and 16 by the bases you want. Private Sub Command1_Click() Text2.Text = VeryLongConvert(Text1.Text, 10, 16) End Sub How it works : I won't go in the details but it works with divisions to convert a number from a base to another. e.g. : if I want to convert 247 from decimal base to binary base I'll do that way : LSB : Less significant bit MSB : Most significant bit numerator|denominator remainder/quotient 247|2 LSB 1/123|2 1/61|2 1/30|2 0/15|2 1/7|2 1/3|2 1/1|2 MSB 1/0 So, 247 in decimal is written 11110111 in binary Try the example you can download. Vote and give your comments ! Thanks !
It is a clock with needles that uses simple geometric functions, the VB's time functions and whose dial resizes with the form. This program shows you how to use the VB's time functions and how to build moving needles. To make the dial be resiable I have written the main functions in the Form_Resize function. I've add the Language menu for the program can be readen in english or in french.
VeryLongConvert is a function that converts a huge number as string from a base to another one . INPUTS : * Word As String : the huge number, up to 32,000 digits, to convert * FromBase As Integer : the base in witch Word is written * ToBase As Integer : the base in witch Word is to convert * Separator As String : this Optional variable is the decimal separator, usely the point and sometimes the comma OUTPUTS : * the function returns the huge number converted from FromBase to ToBase as string. It returns "" if Word is empty or if FromBase or ToBase is not between 2 and 36 Here is the public code : Public Const B_BIN As Integer = 2 Public Const B_OCT As Integer = 8 Public Const B_DEC As Integer = 10 Public Const B_HEX As Integer = 16 Public Const DEFAULT_SEPARATOR As String = "." Public Const COMMA_SEPARATOR As String = "," Public Function VeryLongConvert(Word As String, FromBase As Integer, ToBase As Integer, Optional Separator As String = DEFAULT_SEPARATOR) As String Example : This example illustrates the VeryLongConvert function. To try this example, include the module ModConvert, paste the code into the Declarations section of a form that contains two TextBox controls and a CommandButton control, and then press F5, enter a number in Text1 and click on Command1. It will convert it from decimal to hexadecimal. You can convert from any base to another by replacing 10 and 16 by the bases you want. Private Sub Command1_Click() Text2.Text = VeryLongConvert(Text1.Text, 10, 16) End Sub How it works : I won't go in the details but it works with divisions to convert a number from a base to another. e.g. : if I want to convert 247 from decimal base to binary base I'll do that way : LSB : Less significant bit MSB : Most significant bit numerator|denominator remainder/quotient 247|2 LSB 1/123|2 1/61|2 1/30|2 0/15|2 1/7|2 1/3|2 1/1|2 MSB 1/0 So, 247 in decimal is written 11110111 in binary Try the example you can download. Vote and give your comments ! Thanks !
It is a clock with needles that uses simple geometric functions, the VB's time functions and whose dial resizes with the form. This program shows you how to use the VB's time functions and how to build moving needles. To make the dial be resiable I have written the main functions in the Form_Resize function. I've add the Language menu for the program can be readen in english or in french.
VeryLongConvert is a function that converts a huge number as string from a base to another one . INPUTS : * Word As String : the huge number, up to 32,000 digits, to convert * FromBase As Integer : the base in witch Word is written * ToBase As Integer : the base in witch Word is to convert * Separator As String : this Optional variable is the decimal separator, usely the point and sometimes the comma OUTPUTS : * the function returns the huge number converted from FromBase to ToBase as string. It returns "" if Word is empty or if FromBase or ToBase is not between 2 and 36 Here is the public code : Public Const B_BIN As Integer = 2 Public Const B_OCT As Integer = 8 Public Const B_DEC As Integer = 10 Public Const B_HEX As Integer = 16 Public Const DEFAULT_SEPARATOR As String = "." Public Const COMMA_SEPARATOR As String = "," Public Function VeryLongConvert(Word As String, FromBase As Integer, ToBase As Integer, Optional Separator As String = DEFAULT_SEPARATOR) As String Example : This example illustrates the VeryLongConvert function. To try this example, include the module ModConvert, paste the code into the Declarations section of a form that contains two TextBox controls and a CommandButton control, and then press F5, enter a number in Text1 and click on Command1. It will convert it from decimal to hexadecimal. You can convert from any base to another by replacing 10 and 16 by the bases you want. Private Sub Command1_Click() Text2.Text = VeryLongConvert(Text1.Text, 10, 16) End Sub How it works : I won't go in the details but it works with divisions to convert a number from a base to another. e.g. : if I want to convert 247 from decimal base to binary base I'll do that way : LSB : Less significant bit MSB : Most significant bit numerator|denominator remainder/quotient 247|2 LSB 1/123|2 1/61|2 1/30|2 0/15|2 1/7|2 1/3|2 1/1|2 MSB 1/0 So, 247 in decimal is written 11110111 in binary Try the example you can download. Vote and give your comments ! Thanks !
It is a clock with needles that uses simple geometric functions, the VB's time functions and whose dial resizes with the form. This program shows you how to use the VB's time functions and how to build moving needles. To make the dial be resiable I have written the main functions in the Form_Resize function. I've add the Language menu for the program can be readen in english or in french.
VeryLongConvert is a function that converts a huge number as string from a base to another one . INPUTS : * Word As String : the huge number, up to 32,000 digits, to convert * FromBase As Integer : the base in witch Word is written * ToBase As Integer : the base in witch Word is to convert * Separator As String : this Optional variable is the decimal separator, usely the point and sometimes the comma OUTPUTS : * the function returns the huge number converted from FromBase to ToBase as string. It returns "" if Word is empty or if FromBase or ToBase is not between 2 and 36 Here is the public code : Public Const B_BIN As Integer = 2 Public Const B_OCT As Integer = 8 Public Const B_DEC As Integer = 10 Public Const B_HEX As Integer = 16 Public Const DEFAULT_SEPARATOR As String = "." Public Const COMMA_SEPARATOR As String = "," Public Function VeryLongConvert(Word As String, FromBase As Integer, ToBase As Integer, Optional Separator As String = DEFAULT_SEPARATOR) As String Example : This example illustrates the VeryLongConvert function. To try this example, include the module ModConvert, paste the code into the Declarations section of a form that contains two TextBox controls and a CommandButton control, and then press F5, enter a number in Text1 and click on Command1. It will convert it from decimal to hexadecimal. You can convert from any base to another by replacing 10 and 16 by the bases you want. Private Sub Command1_Click() Text2.Text = VeryLongConvert(Text1.Text, 10, 16) End Sub How it works : I won't go in the details but it works with divisions to convert a number from a base to another. e.g. : if I want to convert 247 from decimal base to binary base I'll do that way : LSB : Less significant bit MSB : Most significant bit numerator|denominator remainder/quotient 247|2 LSB 1/123|2 1/61|2 1/30|2 0/15|2 1/7|2 1/3|2 1/1|2 MSB 1/0 So, 247 in decimal is written 11110111 in binary Try the example you can download. Vote and give your comments ! Thanks !