我有一些用于电子邮件地址的链接标签。在运行时,我可以点击链接,它会打开一个新的电子邮件,其地址与我想要的完全相同。但当我关闭电子邮件并想再次点击它时,它会给我System.NullReferenceException。
我还在学习,所以很可能我在某个地方犯了一个菜鸟错误。我理解错误意味着什么,但标签已经有链接到它的文本数据,所以我不明白为什么它在第二次尝试时给出Null错误。是否需要重新加载或刷新?
Dim reader As New IO.StreamReader(CurDir() & "\" & "AdelphiContacts.txt")
linklabel1.Text = reader.ReadLine()
With outMsg
.To = linklabel1.Text
End With
'Display email
outMsg.Display()
reader.Close()
我在
调试时出现错误 .To = linklabel1.Text
对于outMsg来说,它来自
Dim outApp As Application = New Application
Dim outMsg As MailItem = outApp.CreateItem(OlItemType.olMailItem)