Click here to Skip to main content
15,861,168 members
Articles / Desktop Programming / WTL

Form Designer

26 Jul 2021CPOL24 min read 349.8K   82.5K   230  
Component for adding scriptable forms capabilities to an application.
VERSION 5.00
Begin VB.Form Form6 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "Welcome"
   ClientHeight    =   4080
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   4830
   LinkTopic       =   "Form6"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4080
   ScaleWidth      =   4830
   ShowInTaskbar   =   0   'False
   StartUpPosition =   1  'CenterOwner
   Begin VB.PictureBox Picture1 
      BorderStyle     =   0  'None
      Height          =   495
      Left            =   120
      Picture         =   "Form6.frx":0000
      ScaleHeight     =   495
      ScaleWidth      =   2775
      TabIndex        =   5
      Top             =   3480
      Width           =   2775
   End
   Begin VB.CommandButton Continue 
      Caption         =   "Continue"
      Height          =   375
      Left            =   3840
      TabIndex        =   4
      Top             =   3600
      Width           =   855
   End
   Begin VB.Label Label6 
      Caption         =   $"Form6.frx":0C02
      Height          =   735
      Left            =   120
      TabIndex        =   7
      Top             =   1800
      Width           =   4575
   End
   Begin VB.Label Label4 
      Caption         =   "Microsoft Windows Common Controls 2 (MSCOMCT2.OCX)"
      Height          =   255
      Left            =   120
      TabIndex        =   6
      Top             =   1440
      Width           =   4575
   End
   Begin VB.Label Label5 
      Caption         =   $"Form6.frx":0CA6
      Height          =   855
      Left            =   120
      TabIndex        =   3
      Top             =   2520
      Width           =   4575
   End
   Begin VB.Label Label3 
      Caption         =   "Microsoft Windows Common Controls (MSCOMCTL.OCX)"
      Height          =   255
      Left            =   120
      TabIndex        =   2
      Top             =   1200
      Width           =   4575
   End
   Begin VB.Label Label2 
      Caption         =   $"Form6.frx":0D87
      Height          =   615
      Left            =   120
      TabIndex        =   1
      Top             =   480
      Width           =   4575
   End
   Begin VB.Label Label1 
      Caption         =   "Welcome to the DaeDoe Forms Demonstration Application."
      Height          =   255
      Left            =   120
      TabIndex        =   0
      Top             =   120
      Width           =   4575
   End
End
Attribute VB_Name = "Form6"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
'
' Form Editor Demonstration Program
'
' Author :  David Shepherd
'           Copyright (c) 2002, DaeDoe-Softwre
'

Private Sub Continue_Click()
On Error GoTo error
    
    ' unload the form
    Unload Me
    
    Exit Sub
error:
End Sub

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
Web Developer
United Kingdom United Kingdom
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.

Comments and Discussions