?
Solved

Accessing form controls (without 'sharing')

Posted on 2007-11-27
5
Medium Priority
?
151 Views
Last Modified: 2013-11-07
Let's say I have frmMain and a label on it that displays the date.
I want to be able to click the date, and have a second form frmDate display, which only contains the calendar control, and update the label on frmMain with the date selected.

Currently, I'm running into "Reference to a non-shared member requires an object reference" while trying to simply use frmMain.Label1.Text=Cal.SelectionStart
I sort of understand why that is, and have read that using the shared keyword may alleviate the problem, however, one twist that I have is that frmMain may not be frmMain 'all the time'.

Ideally, I'd love to be able to pass the Date clicked back to the form's parent (I'm displaying with showdialog), but that property appears to be empty anyway.

Any way to easily accomplish what I'm after here?  Please ask if anything needs clarifying.  Thanx
0
Comment
Question by:sirbounty
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 38

Accepted Solution

by:
PaulHews earned 1000 total points
ID: 20359399
I would declare an event in frmDate:

Public Event DateSelected(ByVal SelDate As Date)

Raise it where you need it:

RaiseEvent DateSelected(Today)  'or whatever date

In frmMain, declare a handler and use it:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim frm As New frmDate
        AddHandler frm.DateSelected, AddressOf frm_DateSelected
        frm.ShowDialog()


    End Sub

    Private Sub frm_DateSelected(ByVal SelDate As Date)
        Label1.Text = SelDate.ToString("d")
    End Sub
0
 
LVL 67

Author Comment

by:sirbounty
ID: 20359452
Precisely what I needed.
Thanx! :^)
0
 
LVL 38

Expert Comment

by:PaulHews
ID: 20359503
If you can close the date form when you have selected a date, you can also create a property to read the date from:

Public Class frmDate
    Private mSelDate As Date
   

    Public Function SelDate() As Date
        Return mSelDate
       
    End Function

    Private Sub MonthCalendar1_DateSelected(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateSelected
        mSelDate = e.End
        Me.DialogResult = Windows.Forms.DialogResult.OK
        Me.Close()

    End Sub
End Class

Public Class Form1


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim frm As New frmDate

        If frm.ShowDialog() = Windows.Forms.DialogResult.OK Then
            Label1.Text = frm.SelDate.ToString("d")
        End If


    End Sub

   
End Class
0
 
LVL 67

Author Comment

by:sirbounty
ID: 20360442
Hmm - yes, I will be closing it once the date is selected.
I'll try this out.  Thanx.
0
 
LVL 67

Author Comment

by:sirbounty
ID: 20361050
Works great!  Thanx again!! :^)
0

Featured Post

DFW AZURE MEETUP TONIGHT FRI 6PM

We will be discussing what Azure Stack is, how does it fit into the suit of offerings that Azure has currently, and where can it fit into your organizations technology stack. We will also be discussing limitations of the platform while covering various applicable scenarios.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Many of us here at EE write code. Many of us write exceptional code; just as many of us write exception-prone code. As we all should know, exceptions are a mechanism for handling errors which are typically out of our control. From database errors, t…
Calculating holidays and working days is a function that is often needed yet it is not one found within the Framework. This article presents one approach to building a working-day calculator for use in .NET.
Michael from AdRem Software explains how to view the most utilized and worst performing nodes in your network, by accessing the Top Charts view in NetCrunch network monitor (https://www.adremsoft.com/). Top Charts is a view in which you can set seve…
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question