Click here to Skip to main content
15,885,216 members
Articles / Programming Languages / Visual Basic

Certification by Example

Rate me:
Please Sign up or sign in to vote.
4.93/5 (95 votes)
8 Jan 2008CPOL55 min read 185.2K   714   233  
How to prepare a .NET application to obtain the Certified for Windows Vista logo, including the source code (Visual Studio 2005 solution) of a simple but complete application
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FormSave
    Inherits System.Windows.Forms.Form

    'Form reemplaza a Dispose para limpiar la lista de componentes.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Requerido por el Diseñador de Windows Forms
    Private components As System.ComponentModel.IContainer

    'NOTA: el Diseñador de Windows Forms necesita el siguiente procedimiento
    'Se puede modificar usando el Diseñador de Windows Forms.  
    'No lo modifique con el editor de código.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.Label1 = New System.Windows.Forms.Label
        Me.txtPath = New System.Windows.Forms.TextBox
        Me.folderDialog = New System.Windows.Forms.FolderBrowserDialog
        Me.btnSelectFolder = New System.Windows.Forms.Button
        Me.btnWindows = New System.Windows.Forms.Button
        Me.btnLogo1 = New System.Windows.Forms.Button
        Me.btnLogo2 = New System.Windows.Forms.Button
        Me.Label2 = New System.Windows.Forms.Label
        Me.btnCreateFile = New System.Windows.Forms.Button
        Me.btnClose = New System.Windows.Forms.Button
        Me.lblUsername = New System.Windows.Forms.Label
        Me.SuspendLayout()
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Location = New System.Drawing.Point(12, 9)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(326, 13)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "Select a folder where a file named KILLERAPP.TXT will be created:"
        '
        'txtPath
        '
        Me.txtPath.Location = New System.Drawing.Point(15, 56)
        Me.txtPath.Name = "txtPath"
        Me.txtPath.Size = New System.Drawing.Size(416, 20)
        Me.txtPath.TabIndex = 1
        '
        'folderDialog
        '
        Me.folderDialog.RootFolder = System.Environment.SpecialFolder.MyComputer
        '
        'btnSelectFolder
        '
        Me.btnSelectFolder.Location = New System.Drawing.Point(437, 56)
        Me.btnSelectFolder.Name = "btnSelectFolder"
        Me.btnSelectFolder.Size = New System.Drawing.Size(34, 20)
        Me.btnSelectFolder.TabIndex = 2
        Me.btnSelectFolder.Text = "..."
        Me.btnSelectFolder.UseVisualStyleBackColor = True
        '
        'btnWindows
        '
        Me.btnWindows.Location = New System.Drawing.Point(170, 86)
        Me.btnWindows.Name = "btnWindows"
        Me.btnWindows.Size = New System.Drawing.Size(75, 23)
        Me.btnWindows.TabIndex = 3
        Me.btnWindows.Text = "Windows"
        Me.btnWindows.UseVisualStyleBackColor = True
        '
        'btnLogo1
        '
        Me.btnLogo1.Location = New System.Drawing.Point(262, 86)
        Me.btnLogo1.Name = "btnLogo1"
        Me.btnLogo1.Size = New System.Drawing.Size(75, 23)
        Me.btnLogo1.TabIndex = 4
        Me.btnLogo1.Text = "logouser1"
        Me.btnLogo1.UseVisualStyleBackColor = True
        '
        'btnLogo2
        '
        Me.btnLogo2.Location = New System.Drawing.Point(357, 86)
        Me.btnLogo2.Name = "btnLogo2"
        Me.btnLogo2.Size = New System.Drawing.Size(75, 23)
        Me.btnLogo2.TabIndex = 5
        Me.btnLogo2.Text = "logouser2"
        Me.btnLogo2.UseVisualStyleBackColor = True
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Location = New System.Drawing.Point(12, 91)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(122, 13)
        Me.Label2.TabIndex = 6
        Me.Label2.Text = "Populate TextBox with..."
        '
        'btnCreateFile
        '
        Me.btnCreateFile.Location = New System.Drawing.Point(286, 138)
        Me.btnCreateFile.Name = "btnCreateFile"
        Me.btnCreateFile.Size = New System.Drawing.Size(75, 28)
        Me.btnCreateFile.TabIndex = 7
        Me.btnCreateFile.Text = "Create file"
        Me.btnCreateFile.UseVisualStyleBackColor = True
        '
        'btnClose
        '
        Me.btnClose.DialogResult = System.Windows.Forms.DialogResult.Cancel
        Me.btnClose.Location = New System.Drawing.Point(396, 138)
        Me.btnClose.Name = "btnClose"
        Me.btnClose.Size = New System.Drawing.Size(75, 28)
        Me.btnClose.TabIndex = 8
        Me.btnClose.Text = "Close"
        Me.btnClose.UseVisualStyleBackColor = True
        '
        'lblUsername
        '
        Me.lblUsername.AutoSize = True
        Me.lblUsername.Location = New System.Drawing.Point(12, 29)
        Me.lblUsername.Name = "lblUsername"
        Me.lblUsername.Size = New System.Drawing.Size(190, 13)
        Me.lblUsername.TabIndex = 9
        Me.lblUsername.Text = "NOTE: Your current user name is: XXX"
        '
        'FormSave
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.CancelButton = Me.btnClose
        Me.ClientSize = New System.Drawing.Size(483, 181)
        Me.Controls.Add(Me.lblUsername)
        Me.Controls.Add(Me.btnClose)
        Me.Controls.Add(Me.btnCreateFile)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.btnLogo2)
        Me.Controls.Add(Me.btnLogo1)
        Me.Controls.Add(Me.btnWindows)
        Me.Controls.Add(Me.btnSelectFolder)
        Me.Controls.Add(Me.txtPath)
        Me.Controls.Add(Me.Label1)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "FormSave"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Save file"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents txtPath As System.Windows.Forms.TextBox
    Friend WithEvents folderDialog As System.Windows.Forms.FolderBrowserDialog
    Friend WithEvents btnSelectFolder As System.Windows.Forms.Button
    Friend WithEvents btnWindows As System.Windows.Forms.Button
    Friend WithEvents btnLogo1 As System.Windows.Forms.Button
    Friend WithEvents btnLogo2 As System.Windows.Forms.Button
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents btnCreateFile As System.Windows.Forms.Button
    Friend WithEvents btnClose As System.Windows.Forms.Button
    Friend WithEvents lblUsername As System.Windows.Forms.Label
End Class

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
Software Developer SunHotels
Spain Spain
Under the secret identity of a C# programmer, a freaky guy who loves MSX computers and japanese culture is hidden. Beware!

Comments and Discussions