The code that I tried is the first IF statement. I realize that the form hasn't loaded yet and can't be hid, but why wouldn't it show my other form? How can I do this better?
Also, frommail is a string that has been assigned a filepath. It was declared publicly.
Private Sub Pinger_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim tabs() As Integer = {20, 40, 60, 80}
If IO.File.Exists(frommail) = False Then
Me.Hide()
frmFromEmail.Show()
End If
'Set result textbox to nothing on load
rtbResult.Text = ""
'Ensure timer is enabled
tmrTimer.Enabled = True
'Set toolstrip Status message
tssStatus.Text = "Pinging Started"
'Set toolstrip Activity to None
tssActivity.Text = "Current Task: None"
'Cause both toolstrips to redraw
tssStatus.Invalidate()
tssActivity.Invalidate()
'set Result textbox tabs
rtbResult.SelectionTabs = tabs
'Enable Stop toolstrip and disable Start toolstrip
StopToolStripMenuItem.Enabled = True
StartToolStripMenuItem.Enabled = False
'Set timer interval to 15 minutes
interval = 900000
tmrTimer.Interval = interval
'Make email active menu checked
EmailActiveToolStripMenuItem.Checked = True
'Set 15 minute menu to checked, all others unchecked
MinutesToolStripMenuItem.Checked = False
MinutesToolStripMenuItem1.Checked = False
MinutesToolStripMenuItem2.Checked = True
MinutesToolStripMenuItem3.Checked = False
MinutesToolStripMenuItem4.Checked = False
'Set printing to inactive
PrintingActiveToolStripMenuItem.Checked = False
'Set interval label to 15 minutes
lblInterval.Text = "Ping interval: " & tmrTimer.Interval.ToString / 60000 & " minutes"
'Start timer and cause first ping to run
tmrTimer.Start()
Ping_list()
End Sub