0

如何将变量放入 My.Resources,例如

My.Resources.[var]

这是我的代码:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  For Each Fe In My.Resources.ResourceManager.GetResourceSet(System.Globalization.CultureInfo.CurrentCulture, False, True)
    ProgressBar1.Maximum += 1
    ' MsgBox(Fe.Key)

    My.Computer.FileSystem.WriteAllBytes _
       (appath & "\bin\" & Fe.Key & ".jpeg", My.Resources.F.Key, True) 'Fe.Key As Variable

  Next
End Sub

如何在 My.Resources 中使用 Fe.Key?

4

2 回答 2

1

自从您询问密钥以来,也许可以为您的解决方案添加一些东西。尝试这个 :

Dim RSet As Resources.ResourceSet = My.Resources.ResourceManager.GetResourceSet(System.Globalization.CultureInfo.CurrentCulture, False, True)

If RSet IsNot Nothing Then

    Dim enumerator As IDictionaryEnumerator = RSet.GetEnumerator

    While (enumerator.MoveNext)

     ' You can now use enumerator.key

    End While   

End If

资源

于 2013-02-07T23:37:46.473 回答
0

解决了。​​☺</p>

这里

引用 :

My.Resources.ResourceManager.GetObject(var)

于 2013-02-07T23:27:11.753 回答