Have you ever tried to write a program where you've had to type something over and over? Well with this tutorial, you'll learn about speed saving things like modules, loops, and the with statement.

First off, I'll start with something REALLY easy but really time saving. It's called the with statement. Have you ever had to modify several properties of an object at once? If so, without the with statement you'd have a LOT of typing to do. Your code might look like this.

Text1.Text = "BlAh"
Text1.Font = "Arial"
Text1.Enabled = "True"
Text1.Height = 1000

Well, there is an way that makes it much faster. It's called the with statement. It saves you time by making it so you don't have to type the name of the object over and over again. You would use it like this.

With Text1
.Text = "BlAh"
.Font = "Arial"
.Enabled = "True"
.Height = 1000
End With

See the difference? A little extra code saves you from typing an object's name over and over. Make sure you remember the "End With". Also, it's a good idea to indent the property changes inside the with tags, since it's good to get into the habit of indenting.

The next thing that's really useful is loops. They allow you to repeat a process over and over, only typing it once. There are different types of loops. I'll tell keep it simple and tell you about the "Until" loop. Say you had a schedule and that gave you spaces to write down what you were supposed to be doing at five minute intervals. Let's say you want to exercise from 3:00 to 3:30. You wouldn't put "Exercise for 5 minutes" in every slot, would you? You'd probably put "Exercise until 3:30" at the 3:00 slot and leave the rest blank. That's like an "until" loop. Here's an example of an "Until" loop:

Do Until Text1.Text = "JoeJoeJoe"
    Text1.Text = Text1.Text + "Joe"
Loop

That would make Text1.Text say "JoeJoeJoe" and you didn't have to type "Text1.Text = Text1.Text + "Joe"" 3 times. That's how an until loop works.

One thing that's very useful is modules. First, we need to create a module. Say you had a function, for example, changing a text box's font. If you wanted to use it several times, for different fonts, then you could use a module instead of typing it over and over again. Make a new project in Visual Basic, and add a text box, and a button. Go to the Project menu and select "Add Module". Select "Module" on the pop up window and hit Open. Now you'll see a coding window. Modules are like forms, but they don't have any form, they're just code. Modules allow you to write code that can be called by other forms, just like Public subs. Copy this code and paste it in your module. Now copy this code into your module.

Sub Changefont(FN As String)
Form1.Text1.Font = FN
End Sub


Notice the "FN As String" in brackets. This defines "FN" as a string, and that string will receive input from the form using the function when the function is used. But we'll get to that later. Also, notice how we put "Form1.Text1.Font" instead of just "Text1.Font". This is because the module is not a part of Form1, so we have to make it know which Form the textbox it's modifying is on. Now, go back to your form, and add this to "Private Sub Command1_Click"

Changefont (Tahoma)

Notice the "Tahoma" in brackets. That's the name of the font we're changing to. You can substitute any font for that, but I like Tahoma, so I used it. What this does is tells your "Changefont" function the variable FN is. For an exercise, try writing a function that changes a buttons caption.

Hopefully this tutorial will help you write programs more quickly, and save space.