我有这个问题('Public sub New()的参数太多 )与这个小共享Sub,我想创建一个智能通知窗口,我打电话形成另一种形式。一切都很好,但是当我尝试编写这个Sub来调用另一个带有自定义属性的Form时,出现了这个错误......
我的代码:
Public Sub Tray_ért(ByVal típus As Típus, ByVal cím As String, ByVal szöveg As String)
lbl_főcím.Text = cím
lbl_szöveg.Text = szöveg
Select Case típus
Case Típus.Információ
Me.BackColor = Color.SteelBlue
pb_ikon.Image = Ikonok.Images.Item(1)
Case Típus.Sikeres
Me.BackColor = Color.SeaGreen
pb_ikon.Image = Ikonok.Images.Item(3)
Case Típus.Figyelmeztetés
Me.BackColor = Color.Khaki
pb_ikon.Image = Ikonok.Images.Item(4)
Case Típus.Hiba
Me.BackColor = Color.Red
pb_ikon.Image = Ikonok.Images.Item(0)
Case Típus.Vizsgálat
Me.BackColor = Color.DodgerBlue
pb_ikon.Image = Ikonok.Images.Item(2)
End Select
End Sub
Public Enum Típus
Információ
Sikeres
Figyelmeztetés
Hiba
Vizsgálat
End Enum
Public Shared Sub Show(ByVal típus As Típus, ByVal cím As String, ByVal szöveg As String)
Dim értesítés As New LenSoft_Blay_Anti_Malware.Értesítés_tray_ablak
értesítés = New Értesítés_tray_ablak(típus, cím, szöveg) 'here become i this error for the value tray_ért!
End Sub
所以我很快就确定了“TípusAsEnum”,我不知道这里错了什么。只有,típus(AsTípus)有下划线。
那么有人可以帮助我吗? 谢谢大家!