VB MazeMan

I put this “Visual Basic MazeMan” application together for? a job interview? once upon a time. The job was bogus and I could never bring myself to look at the code again.? The requirements have changed – specifically saving data in binary format – as opposed to text if you are using this for any projects. Good Luck.

Download here: Visual Basic 6.0 MazeMan

Here’s a snippet of a form.

VERSION 5.00
Begin VB.Form frmAbout
? ? Caption? ? ? ? ? ? ? ? =? ? “About MazeMan v. 1.0″
? ? ClientHeight? ? ? =? ? 3195
? ? ClientLeft? ? ? ? ? =? ? 60
? ? ClientTop? ? ? ? ? ? =? ? 345
? ? ClientWidth? ? ? ? =? ? 4680
? ? LinkTopic? ? ? ? ? ? =? ? “Form1″
? ? MaxButton? ? ? ? ? ? =? ? 0? ? ‘False
? ? MinButton? ? ? ? ? ? =? ? 0? ? ‘False
? ? ScaleHeight? ? ? ? =? ? 3195
? ? ScaleWidth? ? ? ? ? =? ? 4680
? ? StartUpPosition =? ? 3? ‘Windows Default
? ? Begin VB.CommandButton cmdClose
? ? ? ? ? Caption? ? ? ? ? ? ? ? =? ? “Close”
? ? ? ? ? Height? ? ? ? ? ? ? ? ? =? ? 375
? ? ? ? ? Left? ? ? ? ? ? ? ? ? ? ? =? ? 3000
? ? ? ? ? TabIndex? ? ? ? ? ? ? =? ? 2
? ? ? ? ? Top? ? ? ? ? ? ? ? ? ? ? ? =? ? 2640
? ? ? ? ? Width? ? ? ? ? ? ? ? ? ? =? ? 1335
? ? End
? ? Begin VB.Label lblCompany
? ? ? ? ? Caption? ? ? ? ? ? ? ? =? ? “Company”
? ? ? ? ? Height? ? ? ? ? ? ? ? ? =? ? 495
? ? ? ? ? Left? ? ? ? ? ? ? ? ? ? ? =? ? 480
? ? ? ? ? TabIndex? ? ? ? ? ? ? =? ? 1
? ? ? ? ? Top? ? ? ? ? ? ? ? ? ? ? ? =? ? 960
? ? ? ? ? Width? ? ? ? ? ? ? ? ? ? =? ? 3015
? ? End
? ? Begin VB.Label lblTitle
? ? ? ? ? Caption? ? ? ? ? ? ? ? =? ? “Title”
? ? ? ? ? Height? ? ? ? ? ? ? ? ? =? ? 375
? ? ? ? ? Left? ? ? ? ? ? ? ? ? ? ? =? ? 480
? ? ? ? ? TabIndex? ? ? ? ? ? ? =? ? 0
? ? ? ? ? Top? ? ? ? ? ? ? ? ? ? ? ? =? ? 240
? ? ? ? ? Width? ? ? ? ? ? ? ? ? ? =? ? 2895
? ? End
End
Attribute VB_Name = “frmAbout”
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub cmdClose_Click()
Unload Me
End Sub

Private Sub Form_Load()
Me.lblTitle.Caption = App.Title
Me.lblCompany.Caption = App.CompanyName
End Sub




Popularity: 1% [?]

Share and Enjoy: These icons link to social bookmarking sites where readers can share and discover new web pages.
  • MisterWong
  • Y!GG
  • Webnews
  • Digg
  • del.icio.us
  • StumbleUpon
  • Reddit

Leave a Reply

 

 

 

You can use these HTML tags

<a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>

Sponsors