API tools faq
paste
emS-St1ks

Password Generator ( Code )

emS-St1ks
Jun 14th, 2012
113
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VisualBasic 5.83 KB | None | 0 0
raw download clone embed print report
  1. Begin VB.Form Form1
  2.    BorderStyle     =   1  'Fixed Single
  3.   Caption         =   "Password Generator"
  4.    ClientHeight    =   2745
  5.    ClientLeft      =   150
  6.    ClientTop       =   720
  7.    ClientWidth     =   4695
  8.    LinkTopic       =   "Form1"
  9.    MaxButton       =   0   'False
  10.   MinButton       =   0   'False
  11.   ScaleHeight     =   2745
  12.    ScaleWidth      =   4695
  13.    StartUpPosition =   3  'Windows Default
  14.   Begin VB.CommandButton Command2
  15.       Caption         =   "Hide Password"
  16.       BeginProperty Font
  17.          Name            =   "Tahoma"
  18.          Size            =   8.25
  19.          Charset         =   0
  20.          Weight          =   700
  21.          Underline       =   0   'False
  22.         Italic          =   0   'False
  23.         Strikethrough   =   0   'False
  24.      EndProperty
  25.       Height          =   495
  26.       Left            =   2400
  27.       TabIndex        =   9
  28.       Top             =   2160
  29.       Width           =   1575
  30.    End
  31.    Begin VB.CheckBox Check3
  32.       Caption         =   "Uppercase"
  33.       BeginProperty Font
  34.          Name            =   "Tahoma"
  35.          Size            =   9.75
  36.          Charset         =   0
  37.          Weight          =   400
  38.          Underline       =   0   'False
  39.         Italic          =   0   'False
  40.         Strikethrough   =   0   'False
  41.      EndProperty
  42.       Height          =   255
  43.       Left            =   120
  44.       TabIndex        =   6
  45.       Top             =   1080
  46.       Width           =   1335
  47.    End
  48.    Begin VB.CheckBox Check2
  49.       Caption         =   "Lowercase"
  50.       BeginProperty Font
  51.          Name            =   "Tahoma"
  52.          Size            =   9.75
  53.          Charset         =   0
  54.          Weight          =   400
  55.          Underline       =   0   'False
  56.         Italic          =   0   'False
  57.         Strikethrough   =   0   'False
  58.      EndProperty
  59.       Height          =   255
  60.       Left            =   120
  61.       TabIndex        =   5
  62.       Top             =   840
  63.       Value           =   1  'Checked
  64.      Width           =   1335
  65.    End
  66.    Begin VB.CheckBox Check1
  67.       Caption         =   "Add Numbers"
  68.       BeginProperty Font
  69.          Name            =   "Tahoma"
  70.          Size            =   9.75
  71.          Charset         =   0
  72.          Weight          =   400
  73.          Underline       =   0   'False
  74.         Italic          =   0   'False
  75.         Strikethrough   =   0   'False
  76.      EndProperty
  77.       Height          =   255
  78.       Left            =   120
  79.       TabIndex        =   4
  80.       Top             =   1320
  81.       Width           =   1455
  82.    End
  83.    Begin VB.ComboBox Combo1
  84.       BeginProperty Font
  85.          Name            =   "Tahoma"
  86.          Size            =   8.25
  87.          Charset         =   0
  88.          Weight          =   400
  89.          Underline       =   0   'False
  90.         Italic          =   0   'False
  91.         Strikethrough   =   0   'False
  92.      EndProperty
  93.       Height          =   315
  94.       ItemData        =   "PasswordGen.frx":0000
  95.       Left            =   2520
  96.       List            =   "PasswordGen.frx":0002
  97.       Style           =   2  'Dropdown List
  98.      TabIndex        =   3
  99.       Top             =   1080
  100.       Width           =   2055
  101.    End
  102.    Begin VB.CommandButton Command1
  103.       Caption         =   "Get Password"
  104.       BeginProperty Font
  105.          Name            =   "Tahoma"
  106.          Size            =   8.25
  107.          Charset         =   0
  108.          Weight          =   700
  109.          Underline       =   0   'False
  110.         Italic          =   0   'False
  111.         Strikethrough   =   0   'False
  112.      EndProperty
  113.       Height          =   495
  114.       Left            =   720
  115.       TabIndex        =   1
  116.       Top             =   2160
  117.       Width           =   1575
  118.    End
  119.    Begin VB.TextBox Text1
  120.       Height          =   285
  121.       Left            =   0
  122.       Locked          =   -1  'True
  123.      TabIndex        =   0
  124.       Top             =   240
  125.       Width           =   4695
  126.    End
  127.    Begin VB.Frame Frame1
  128.       Caption         =   "Options"
  129.       BeginProperty Font
  130.          Name            =   "Tahoma"
  131.          Size            =   9.75
  132.          Charset         =   0
  133.          Weight          =   700
  134.          Underline       =   0   'False
  135.         Italic          =   0   'False
  136.         Strikethrough   =   0   'False
  137.      EndProperty
  138.       Height          =   1095
  139.       Left            =   0
  140.       TabIndex        =   7
  141.       Top             =   600
  142.       Width           =   4695
  143.       Begin VB.Label Label2
  144.          Caption         =   "Select # Of Characters:"
  145.          BeginProperty Font
  146.             Name            =   "Tahoma"
  147.             Size            =   9.75
  148.             Charset         =   0
  149.             Weight          =   400
  150.             Underline       =   0   'False
  151.            Italic          =   0   'False
  152.            Strikethrough   =   0   'False
  153.         EndProperty
  154.          Height          =   255
  155.          Left            =   2520
  156.          TabIndex        =   8
  157.          Top             =   240
  158.          Width           =   2055
  159.       End
  160.    End
  161.    Begin VB.Label Label1
  162.       Caption         =   "Your Password:"
  163.       BeginProperty Font
  164.          Name            =   "Tahoma"
  165.          Size            =   9.75
  166.          Charset         =   0
  167.          Weight          =   700
  168.          Underline       =   0   'False
  169.         Italic          =   0   'False
  170.         Strikethrough   =   0   'False
  171.      EndProperty
  172.       Height          =   255
  173.       Left            =   0
  174.       TabIndex        =   2
  175.       Top             =   0
  176.       Width           =   4695
  177.    End
  178.    Begin VB.Menu Clip
  179.       Caption         =   "Clipboard"
  180.       Begin VB.Menu Copy
  181.          Caption         =   "Copy"
  182.          Shortcut        =   ^C
  183.       End
  184.    End
  185.    Begin VB.Menu About
  186.       Caption         =   "About..."
  187.    End
  188. End
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!