Well, I'm not that good using VB 4, but here are a few basic tutorials that I got out of a VB book I bought about a year ago.
VB Tutorials
Code | Tutorial Name | Updated Date | Writer |
Scroller |
January, 24th, 2001 |
Wizard |
|
Idle Bot |
January, 25th, 2001 | Wizard |
|
C-com |
January, 30th, 2001 | Wizard |
Submit a tutorial
| Back to main
page
Scroller
Overview |
In my opinion scrollers suck, but this is a good way to learn basic commands. |
How To Make A Scroller |
Click on the timer properties and set the interval to 6000 and put enabled
to false. Note:
the
lower the number the faster it will scroll.
Double click on the timer in the code area put this: ChatSend "" + Text1.text
+ "". Note: you
Now double click on your first command button and in the code area put
timer1.enabled=true
|
Foot Notes |
Chat send may not be the same command as your bas file chat command |
Overview |
this tutorial is very simple tutorial. This idle bot states the day the hour and the minutes that you been away. |
How To Make A Idle bot |
Ok this tutorial is for vb 4, 5, and 6.
make a new form, 1 textbox, 3 labels, 2 command buttons, and 1 timer.
change the 3 labels captions to 0 then change the command button captions to start and stop. Note: the textbox will be your reason.
Now double click on your timer and put this code: Private Sub Timer1_Timer() Label3.Caption = (Label3.Caption + 1) If Label3.Caption = 60 Then Label3.Caption = 0 Label2.Caption = (Label2.Caption + 1) If Label2.Caption = 24 Then Label1.Caption = (Label1.Caption + 1) Label2.Caption = 0 End If End If ChatSend "Idled for: Day(s): " + Label1.Caption + " Hr(s): " + Label2.Caption + " Min(s): " + Label3.Caption + " " Pause ("0.3") ChatSend "Reason: "" + text1.text+ "" End Sub
Now go to the timer properties and set the interval to 60000 and put enabled to false.
next double click on your start button and put Timer1.enabled = true then double click on your stop button and put timer1.enabled = false.
Now was that so hard. Now go to a private chat room and try it out.
|
Overview |
This is a quick tutorial on how to make a c-com. Before using this tutorial it is requested that you download the 2 following files. |
How To Make A C-com |
make a new form
press ctrl+t then hit browse and open up
chatscan3.ocx
Hit ok then look at the bottom of your toolbox you should see a icon that
says dos in blue.
click on it and make a box then double click on it and in the code area
put If Screen_Name = GetUser Then If What_Said Like LCase("-test") Then ChatSend "Whatever Text you want to send to chat" Exit Sub End If
End If -test = that is what the person types to have the command work chatsend = that should be replaced with the command you want to happen Note = To add more then one code just copy the code i gave you and put under the other one
Your last step is to click on form 1 and in form load put chat1.scanon and in unload put chat1.scanoff |