Simple Program In Vb6.0
This full VB program is a simple calculator like what comes. VB6 Source Code for Beginners. This program shows you the simplest form of InputBox and MsgBox. How to Add Two Numbers in Visual Basic.NET. This wikiHow teaches you how to create a simple Visual Basic program that allows you to find the sum of two numbers.
We are now going to be changing the captions(what is says in the command buttons) 1. Click command1 2.
Look on the right side in the properties and find Caption 3. Change it to Host do the same for the rest but make them: command2 = Connect command3 = Close command4 = Send now we are going to change what the text boxes say 1. Click on the text box that says text1 2. Go to the properties window and find the Text property 3. Make it blank 4. Do the same for the one that says Text2 5.
Now click text3 and change the text property to 127.0.0.1 6. Now click text4 and change the text property to 1234 7. Now click text5 and change the text property to Name 127.0.0. Scott Storch Flp Files Fl. 1 is your local ip so you can test the program on your computer when its done 1234 is the port you can make it whatever you want but just leave it 1234 for now. We need to rename the command buttons and text boxes to make them easier to code 1. Click Text1 and go to the properties and click on name and change it to txtLog i chose that because it is the log of messages you send and receive 2. Do the same for the rest but make the names: change Text2 to txtSend change Text3 to txtIP change Text4 to txtPort change Text5 to txtName change Command1 to cmdHost change Command2 to cmdConnect change Command3 to cmdClose change Command 4 to cmdSend change Winsock1 to sckMain now there is one more thing you need to change click txtLog and in the properties window find MultiLine and make it true this step may cause some confusion if you have any questions post a comment or message me. Now it is time to write the code for the command buttons lets start with the first one cmdHost 1.
Free Avast Home Antivirus there. Double click it, this will bring up the code window 2. It should look like this Private Sub cmdHost_Click() End Sub 3.
Enter this code sckMain.LocalPort = txtPort.text sckMain.listen now what does that mean?? Now it is time to code the winsock!
Download Enflow Service Manual Free on this page. Private Sub cmdCalculate_Click() Dim s As String s = txtGrade.Text Select Case s Case 'E' lblMarks.Caption = 'above 90%' lblRemarks.Caption = 'Excellent' Case 'A+' lblMarks.Caption = 'above 80%' lblRemarks.Caption = 'Very Good' Case 'A' lblMarks.Caption = 'above 70%' lblRemarks.Caption = 'Good' Case 'B' lblMarks.Caption = 'above 60%' lblRemarks.Caption = 'Average' Case 'C' lblMarks.Caption = 'above 50%' lblRemarks.Caption = 'Satisfactory' Case 'D' lblMarks.Caption = 'above 40%' lblRemarks.Caption = 'Poor' Case 'F' lblMarks.Caption = 'above 35%' lblRemarks.Caption = 'Fail' End Select End Sub.