DevX Home    Today's Headlines   Articles Archive   Tip Bank   Forums   

Results 1 to 2 of 2
  1. #1
    Join Date
    Sep 2005

    Exclamation Urgent for the expert in VB.NET 2003

    I have achallenging task for any expert in VB.NET 2003

    The task is inserting a line consists of the current
    system date (always a today's date) in British format not English format
    and an ownership copyright statement. In the part of copyright
    statement, the symbol for copyright "(c)" by using Visual Studio .NET
    2003 where that should display in the form at the loading means when you start the form.
    this task is WORTH 20%

  2. #2
    Join Date
    Aug 2005

    Talking I believe this is what you are looking for...

    This program displays the current data (in what I believe is the British format - day.month.year), then a copyright symbol, and finally the name of the company holding the copyright in a messagebox that is displayed when the program is first started.

    Here it is:

    Imports System
    Imports System.Drawing
    Imports System.Windows.Forms
    Namespace Copyright
    	Public Class MainForm
    		Inherits System.Windows.Forms.Form
    		Private output As String = ""
    		Public Shared Sub Main
    			Dim fMainForm As New MainForm
    		End Sub
    		Public Sub New()
    			' The Me.InitializeComponent call is required for Windows Forms designer support.
    			Catch exc As Exception
    			End Try
    			' TODO : Add constructor code after InitializeComponents
    		End Sub
    		Private Sub CreateCopyright()
    			Dim s As String = ""
    			Dim dt As DateTime = DateTime.Now
    			Dim mth As Integer = dt.Month
    			Dim dy As Integer = dt.Day
    			Dim yr As Integer = dt.Year
    			s &= CStr(dy) + "." + CStr(mth) + "." + CStr(yr) + " "
    			s &= Convert.ToChar(169).ToString()
    			s &= " Copyright Company Name"
    			's&= dt.ToString("MM/dd/yy")
    			output = s
    		End Sub
    		Private Sub DisplayCopyright()
    			MessageBox.Show(output, "Date time message", MessageBoxButtons.OK, MessageBoxIcon.Asterisk, MessageBoxDefaultButton.Button1)
    		End Sub
    		#Region " Windows Forms Designer generated code "
    		' This method is required for Windows Forms designer support.
    		' Do not change the method contents inside the source code editor. The Forms designer might
    		' not be able to load this method if it was changed manually.
    		Private Sub InitializeComponent()
    			Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
    			Me.ClientSize = New System.Drawing.Size(292, 266)
    			Me.Name = "MainForm"
    			Me.Text = "MainForm"
    		End Sub
    		#End Region
    	End Class
    End Namespace
    Copy, paste, compile, and run.

    Please let me know if this helps or if it needs something else...

Similar Threads

  1. Replies: 2
    Last Post: 08-27-2003, 10:11 AM
  2. VB.NET 2003 Std Edition to Include Upgrade Wizard
    By Patrick Troughton in forum .NET
    Replies: 2
    Last Post: 02-23-2003, 06:22 PM
  3. Over on the MS VB.NET group...
    By Tom Shelton in forum .NET
    Replies: 39
    Last Post: 11-08-2002, 06:23 AM
  4. A moderate view.
    By Paul Mc in forum .NET
    Replies: 214
    Last Post: 06-01-2001, 07:27 AM
  5. array declarations in VB.NET
    By Bill McCarthy in forum .NET
    Replies: 14
    Last Post: 04-10-2001, 05:03 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
HTML5 Development Center
Latest Articles
Questions? Contact us.
Web Development
Latest Tips
Open Source

   Development Centers

   -- Android Development Center
   -- Cloud Development Project Center
   -- HTML5 Development Center
   -- Windows Mobile Development Center

We have made updates to our Privacy Policy to reflect the implementation of the General Data Protection Regulation.