none
Microsoft outlook Calendar Control ?

    Question

  • Requirement:

    I need to create a VB.NET front end that has a Microsoft Outlook style calendar control.

    The very basic thing would be a calendar control in which you can add TEXT to each day. An advanced version would be a calendar control in which i can add appointments to each day. Another good enhancement would be a calendar control in which i can add a VB.NET control (like a DGV) to each day.....

    Can anyone recommend me to any control like that.... ?

    Thanks !!
    Wednesday, January 03, 2007 10:27 PM

Answers

  • TkNeo,

    Have you tried too bind the Controls like DataGridView control to the class not bind to the object? The following source shows the method that use the BindingSource control to bind the DGV control to the Class:

    Imports System

    Imports System.Collections.Generic

    Imports System.ComponentModel

    Imports System.Data

    Imports System.Drawing

    Imports System.Windows.Forms

     

    Class Form1

        Inherits Form

     

        Private bSource As New BindingSource()

        Private dgv As New DataGridView()

     

        Public Sub New()

            ' Bind the BindingSource to the DemoCustomer type.

            bSource.DataSource = GetType(DemoCustomer)

     

            ' Set up the DataGridView control.

            dgv.Dock = DockStyle.Fill

            Me.Controls.Add(dgv)

     

            ' Bind the DataGridView control to the BindingSource.

            dgv.DataSource = bSource

        End Sub

    End Class

     

    ' This simple class is used to demonstrate binding to a type.

    Public Class DemoCustomer

     

        ' These fields hold the data that backs the public properties.

        Private birthDateValue As DateTime = DateTime.MinValue

        Private idValue As Guid = Guid.NewGuid()

     

        ' This is a property that represents a birth date.

        Public Property BirthDate() As DateTime

            Get

                Return Me.birthDateValue

            End Get

            Set(ByVal value As DateTime)

                If Value <> Me.birthDateValue Then

                    Me.birthDateValue = Value

                End If

            End Set

        End Property

     

        ' This is a property that represents a customer ID.

        Public ReadOnly Property ID() As Guid

            Get

                Return Me.idValue

            End Get

        End Property

    End Class

     

    Hope that can help you and waiting for your reply.

    Tuesday, January 09, 2007 6:54 AM

All replies

  • TkNeo,

    Have you tried too bind the Controls like DataGridView control to the class not bind to the object? The following source shows the method that use the BindingSource control to bind the DGV control to the Class:

    Imports System

    Imports System.Collections.Generic

    Imports System.ComponentModel

    Imports System.Data

    Imports System.Drawing

    Imports System.Windows.Forms

     

    Class Form1

        Inherits Form

     

        Private bSource As New BindingSource()

        Private dgv As New DataGridView()

     

        Public Sub New()

            ' Bind the BindingSource to the DemoCustomer type.

            bSource.DataSource = GetType(DemoCustomer)

     

            ' Set up the DataGridView control.

            dgv.Dock = DockStyle.Fill

            Me.Controls.Add(dgv)

     

            ' Bind the DataGridView control to the BindingSource.

            dgv.DataSource = bSource

        End Sub

    End Class

     

    ' This simple class is used to demonstrate binding to a type.

    Public Class DemoCustomer

     

        ' These fields hold the data that backs the public properties.

        Private birthDateValue As DateTime = DateTime.MinValue

        Private idValue As Guid = Guid.NewGuid()

     

        ' This is a property that represents a birth date.

        Public Property BirthDate() As DateTime

            Get

                Return Me.birthDateValue

            End Get

            Set(ByVal value As DateTime)

                If Value <> Me.birthDateValue Then

                    Me.birthDateValue = Value

                End If

            End Set

        End Property

     

        ' This is a property that represents a customer ID.

        Public ReadOnly Property ID() As Guid

            Get

                Return Me.idValue

            End Get

        End Property

    End Class

     

    Hope that can help you and waiting for your reply.

    Tuesday, January 09, 2007 6:54 AM
  • Hi!!
    Have been googling since the past 3 days but to no avail.I need a Outlook style calendar for an HR Intranet Leave application system which will show the all the staff's leave in the form of Outlook calendar.
    The ones that I have seen are way to expensive for me to build into a demo app that im creating.
    Can someone pls help me out in this??


    TIA
    Monday, June 16, 2008 6:59 AM
  • Did you ever get an answer to this?  If not, did you see the datacalendar control on codeplex?
    Thursday, November 27, 2008 7:13 AM