An Age Calculator!!(May Not Work For Some People!!)

by Cryptic Criteria (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 22^nd May 2003
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
6x text boxes *NAMES* txt1,txt2 and so on 6x Labels *NAME* lbl1,lbl2 and so on

Rate An Age Calculator!!(May Not Work For Some People!!)



'Start code here-->
Private Sub cmd1_Click()
txt6.Text = "2003" - Int(txt1.Text) * "4" + Int(txt2.Text)
cmd1.Visible = False
lbl6.Visible = True
txt6.Visible = True
End Sub
Private Sub Form_Load()
MsgBox "This Machine Tells You When You Where Born", , "INTRO"
MsgBox "This Machine may not be spacific", , ":-)"
MsgBox "And Delete the writing inside boxes", , "OK"
lbl6.Visible = False
txt6.Visible = False
End Sub

Private Sub mnulookhow_Click()
frm2.Visible = True
End Sub

Download this snippet Add to My Saved Code

An Age Calculator!!(May Not Work For Some People!!) Comments

No comments have been posted about An Age Calculator!!(May Not Work For Some People!!). Why not be the first to post a comment about An Age Calculator!!(May Not Work For Some People!!).

An Age Calculator!!(May Not Work For Some People!!)

An Age Calculator!!(May Not Work For Some People!!) Comments

Post your comment

Difficulty