visual

This sections contains code, and a variety of programming tips and faq. The code in these sections has been created by the staff, moderators and visitors of this site. Generally articles that provide a full step-by-step explanation resulting in a complete program are considered tutorials and can be found in that section.

Visual Basic (VB) is a RAD (Rapid Application Development) tool, that allows programmers to create Windows applications in very little time. It is the most popular programming language in the world, and has more programmers and lines of code than any of its nearest competitors.

done by lord nicon

Scroll A Title:

Sub TitleScroll(frm As Form) Dim X As Integer

Dim current As Variant
Dim Y As String
Y = frm.Caption
frm.Caption = ""
frm.Show
For X = 0 To Len(Y)
If X = 0 Then
frm.Caption = ""

current = Timer
Do While Timer - current < 0.1
DoEvents
Loop
GoTo done
Else:
End If
frm.Caption = left(Y, X)

current = Timer
Do While Timer - current < 0.05
DoEvents
Loop
done:
Next X
End Sub

done by lord nicon

2 Ways To Make Password Protect.

1.) You Need 2 Text Boxes & 1 Command Button:

      If Text1.Text = "user name here" And Text2.Text = "password here" Then
      MsgBox ("Welcome lord nicon")
      Load Form3
      Form3.Show
      Unload Form2
      Else
      MsgBox ("deny msg any think can go here")
      End If

2.) You Need 1 Text Box & 1 Command Button

      If Text1.Text = "The Password Here" Then
      MsgBox ("Your Welcome Message")
      Load Form2
      Form2.Show
      Unload Form1
      Else
      MsgBox ("Your Deny Message")
      End If

** Note* To Remove Deny Message & Or Welcome Message Just Remove:
             "MsgBox ("Your Welcome Message")" - Or -
             "MsgBox (Your Deny Message")"

**note** if you add above MsgBox" Do then below MsgBox Loop it will loop the deny alert
e.g
Do
MsgBox"your text here"
Loop

done by lord nicon

To Make A Program Do Something After A Certin
Amount Of Time After Being Loaded

you will need a timer:

click the timer and set the InterVal to set your needs: 5000 = 5 seconds

double click the timer and put what you want it to do,

to make it close after 5 seconds put InterVal: 5000
and on the timer put: Unload Me