Where can i find an example program of visual basic that can input an odd and even number and can display the result of highest even and highest odd number and can sort them from minimum to maximum

To display an even number when an odd number is entered you can add 1.
n= val(text1.text) 'Take the value of n from the textbox.
If n mod 2 =1 then 'If n is an odd number n=n+1 'You make it an even number end if
text2.text = n 'Display it in another textbox.

Please give a good rating to this answer so that I will be encouraged to support people like you having problems with VB6.

The advantages of Visual Basic: 1) It's simple language. Things that may be difficult to program with other language can be done in Visual Basic very easily. 2) Because Visual Basic is so popular, There are many good resources (Books, Web sites, News groups and more) that can help you learn the language. You can find the answers to your programming problems much more easily than other programming languages. 3) You can find many tools (Sharewares and Freewares) on the internet that will Spare you some programming time. For example, if you want to ping a user over the internet in your program, Instead of writing the ping function yourself, you can download a control that does it, and use it in your program. Compare to other languages, Visual Basic have the widest variety of tools that you can download on the internet and use in your programs.

The even numbers from 1 to 100 are:
2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40,42,44,46,48,50,52,
54,56,58,60,62,64,66,68,70,72,74,76,78,80,82,84,86,88,90,92,94,96,98,100

The odd numbers from 1 to 100 are:
1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27, 29,
31, 33, 35, 37, 39, 41, 43, 45, 47, 49, 51, 53, 55, 57, 59
61, 63, 65, 67, 69, 71, 73, 75, 77, 79, 81, 83, 85, 87, 89,
91, 93, 95, 97, 99
Please let me know if it helped by selecting YES. Thank you for choosing FixYa! Your rating will help me succeed and continuously help a lot people.

If the search field is not indexed:
LOCATE FOR <fld_search> <condition> [CONTINUE]
Example: * View customers with outstanding bills USE CUST LOCATE FOR cBillDue > 0 DISPLAY OFF cCustId, cBillDue DO WHILE !EOF() CONTINUE IF NOT EOF() DISPLAY OFF cCustId, cBillDue ENDIF ENDDO
If the search field is indexed:SET ORDER TO TAG <index_tag> SEEK <value>
Example:* Locate customer '0025' USE CUST SET ORDER TO TAG custid SEEK '0025' IF FOUND() DISPLAY ELSE = MESSAGEBOX('CUSTOMER 0025 was not found') ENDIF
Best regards

search online on the sourcecode for bubblesort or bubblesorting, its purpose is to sort the numbers from lowest to highest

I am pretty sure I got this as a homework assignment in programming class. If I had someone give it to me then I wouldn't be even the limited programmer I am now. That said, I will help, but I will not give you the full out answer.

1. The number of stars and characters per line are an odd number to make the ASCii look like a diamond. For my example, the maximum number of characters per line is five.
2. Create a variable called dia_star that will hold the spaces and stars. To figure out the number of spaces that should be put into each star line, use this formula:

number of spaces per star = ( max number of characters per line - number of stars) / 2
dia star = number of lines before star and "*"
print dia star

1. --*--
2. -***-
3. *****

Good Luck,

NOLA Tech

Return the query in a recordset and loop through it. In each loop iteration, add an item to the list.

Use the Len function
number_or_characters = Len(your_input_string)

Taking input from a TextBox is easy:
number_or_characters = Len(txtInput.Text)

Visual Basic (VB) is the thrid generation event-driven programming language and integrated development enviorment (IDE) from Microsoft for its COMprogramming model. VB is also considered a relatively easy to learn anduse programming language, because of its graphical development featuresand BASIC heritage.
Here is an example of a code that displays a message box "Hello, World!"
as the program runs:

Private Sub Form_Load()
MsgBox "Hello, World!"
End Sub

simply making duplicated lines of text and changing the words in the
speech marks can draw a different text and ammounts.
For example:

Private Sub Form_Load()
MsgBox "Welcome, blue_skies61!"
MsgBox "My name is Siwek06!"
End Sub

you can also bold the text by puting this line before a text:

Sub SetFontBold()

Overall i think this is a easy language to learn.
Go on to microsoft.com help center, or the forums to learn more.

Q.2#  Dim n, sum as Double
Dim i as Integer
n=100
sum=0

for i=1 to n
sum=sum+1/n
next i

Q.3#  Dim sum as Double
sum=0
for i=1 to 99
if i%2 <> 0 then sum=sum+i end if
next i