0

SetSectorImage サブに送信される Sector 変数を使用して、変更する画像に名前を付けたいと考えています (画像は既に Web フォームに存在しているため、URL のみを変更しています)。Google 検索では、CallByName メソッドに関する MSDN の記事にたどり着いただけでしたが、この状況で機能するかどうかはわかりません。

役立つ場合の記事は次のとおりです。 http://msdn.microsoft.com/en-us/library/22x2chfx.aspx

Imports System
Imports System.IO

Public Class Launcher
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        SetSectorImage("Sector1")
        SetSectorImage("Sector2")
        SetSectorImage("Sector3")
    End Sub

    Sub SetSectorImage(Sector As String)
        Dim SectorStatus As String
        Try
            Using Reader As New StreamReader(Sector + ".txt")
                SectorStatus = Reader.ReadToEnd()
                Reader.Close()
                Sector_SHOULD_BE_USED_HERE.ImageUrl = ("~/Images/" + SectorStatus)
            End Using
        Catch ex As Exception
            ErrorMessage.Text = ("There was an error reading the status of: " + Sector)
            ErrorMessage.Visible = True
        End Try
    End Sub

End Class
4

2 に答える 2