The Daily Static
  The Daily Static
UF Archives
Register
UF Membership
Ad Free Site
Postcards
Community

Geekfinder
UFie Gear
Advertise on UF

Forum Rules
& FAQ


Username

Password


Create a New Account

 
 

Back to UserFriendly Strip Comments Index

I'm just in Programming one, by SkyHi 2004-12-06 08:57:28
and I need to know how to display the date (with visual basic coding, not typing it in) in this code (where it says 'DATE HERE':

Option Explicit
Dim X As Integer

Private Sub cmdAsnwer_Click()
If cboSelect = "1" Then
lstQA.AddItem "Great!"
End If
If cboSelect = "2" Then
lstQA.AddItem "DATE HERE"
End If
If cboSelect = "3" Then
lstQA.AddItem "To get to the other side."
End If
If cboSelect = "4" Then
lstQA.AddItem "Steve"
End If
If cboSelect = "5" Then
lstQA.AddItem "26"
End If
End Sub

Private Sub Form_Load()
cboSelect.AddItem "1"
cboSelect.AddItem "2"
cboSelect.AddItem "3"
cboSelect.AddItem "4"
cboSelect.AddItem "5"
cboSelect.ListIndex = 0
End Sub

Private Sub cmdClear_Click()
lstQA.Clear
End Sub

Private Sub cmdExit_Click()
End
End Sub

Private Sub cmdQuestion_Click()
If cboSelect = "1" Then
lstQA.AddItem "How are you?"
End If
If cboSelect = "2" Then
lstQA.AddItem "What's the date today?"
End If
If cboSelect = "3" Then
lstQA.AddItem "Why did the chicken cross the road?"
End If
If cboSelect = "4" Then
lstQA.AddItem "What's my name?"
End If
If cboSelect = "5" Then
lstQA.AddItem "How many letters are there in the
English alphabet?"
End If
End Sub
[ Reply ]
  Now.Date() by Nessalc2004-12-06 09:01:25
  something like now() or today()? by plblark2004-12-06 09:02:12
  I know that they've caused trouble in the past... by Schol-R-LEA;22004-12-06 09:48:43
  That looks like VB6, so... by IronPIP2006-11-19 12:55:59

 

[Todays Cartoon Discussion] [News Index]

Come get yer ARS (Account Registration System) Source Code here!
All images, characters, content and text are copyrighted and trademarks of J.D. Frazer except where other ownership applies. Don't do bad things, we have lawyers.
UserFriendly.Org and its operators are not liable for comments or content posted by its visitors, and will cheerfully assist the lawful authorities in hunting down script-kiddies, spammers and other net scum. And if you're really bad, we'll call your mom. (We're not kidding, we've done it before.)