home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / CODE_UPLOAD125021292000.psc / SimpleClockPopupMenu.frm (.txt) < prev   
Encoding:
Visual Basic Form  |  2000-12-09  |  1.1 KB  |  40 lines
  1. VERSION 5.00
  2. Begin VB.Form Form2 
  3.    Caption         =   "Form2"
  4.    ClientHeight    =   3195
  5.    ClientLeft      =   165
  6.    ClientTop       =   735
  7.    ClientWidth     =   4680
  8.    LinkTopic       =   "Form2"
  9.    ScaleHeight     =   3195
  10.    ScaleWidth      =   4680
  11.    StartUpPosition =   3  'Windows Default
  12.    Begin VB.TextBox Text1 
  13.       Height          =   375
  14.       Left            =   960
  15.       TabIndex        =   0
  16.       Top             =   840
  17.       Width           =   1575
  18.    End
  19.    Begin VB.Menu file 
  20.       Caption         =   "File"
  21.       Begin VB.Menu SetAlarm 
  22.          Caption         =   "Set Alarm"
  23.       End
  24.       Begin VB.Menu stoparlam 
  25.          Caption         =   "Stop Alarm"
  26.       End
  27.    End
  28. Attribute VB_Name = "Form2"
  29. Attribute VB_GlobalNameSpace = False
  30. Attribute VB_Creatable = False
  31. Attribute VB_PredeclaredId = True
  32. Attribute VB_Exposed = False
  33. Private Sub SetAlarm_Click()
  34. AskTime = InputBox("Enter Time, With format: 12:00:10 AM ; 12/9/2000")
  35. Text1.Text = AskTime
  36. End Sub
  37. Private Sub stoparlam_Click()
  38. Text1.Text = ""
  39. End Sub
  40.