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 に答える