به نظرم
برای دسترسی به ریسورس های موجود در پروژه هدف، می توانید از کد زیر برای ایجاد یک شیء از کلاس ResourceManager استفاده کنید:
Dim rm As New ResourceManager("Namespace.ResourceName", GetType(StatusProvider).Assembly)
در اینجا ، "Namespace" باید نام فضای نامی باشد که ریسورس ها در آن قرار دارند و "ResourceName" نام فایل ریسورس است. با استفاده از شیء ResourceManage می توانید به ریسورس های موجود در پروژه دسترسی پیدا کنید. سپس می توانید این شیء را به عنوان ورودی به کلاس StatusProvider ارسال کنید تا بتوانید از ریسورس ها در کد خود استفاده کنید. برای مثال، می توانید خطوط زیر را به کد کلاس StatusProvider اضافه کنید:
Private Shared resourceMan As Global.System.Resources.ResourceManager...
Private Sub New()
resourceMan = New ResourceManager("Namespace.ResourceName", GetType(StatusProvider).Assembly)
End Sub
...
Private Sub _MouseEnter(sender As Object, e As System.EventArgs)
If Me.StatusLabel Is Nothing Then Exit Sub
Dim Expr As String = Me.StatusControls(sender)
If Expr.StartsWith("@") Then
Me.StatusLabel.Text = resourceMan.GetString(Expr.Remove(0, 1))
Else
Me.StatusLabel.Text = Expr
End If
End Sub