在代码后面使用随机数显示图像

Question

我尝试过这个，但它对我不起作用。我有 14 个图像（每个并排显示 7 个图像 - acctimg1.jpeg、acctimg2.jpeg 等）这些图像位于模板下的图像文件夹中。这是模板文件夹中的 Home.master.vb 页面。如果我将 aspx 页面上的路径硬编码为 templates/images/acctimg1.jpeg，则会出现图像。我设置了一个断点并查看了创建的网址，它们看起来是正确的。使用随机数创建 url 是否需要在预渲染子中而不是页面加载中？

 <table align="center">
                        <tr>
                            <td align="left">
                                <asp:Image ID="acctimage" runat="server" Width="275" Height="220"  /></td>
                            <td align="right">
                                <asp:Image ID="taximage" runat="server" Width="275" Height="220" /></td>
                        </tr>
                    </table>



 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Dim a As Int16
    a = Int((7 * Rnd()) + 1)
    acctimage.ImageUrl = "templates/images/acctimg" + Convert.ToString(a) + ".jpeg"
    Dim b As Int16
    b = Int((7 * Rnd()) + 1)
    taximage.ImageUrl = "templates/images/tax" + Convert.ToString(b) + ".jpeg"
End Sub

Answer 1

                    <table align="center">
                        <tr>
                            <td align="left">
                                <asp:Image ID="acctimage" runat="server" Width="275" Height="220" ImageUrl="<% =#getsrc %>" /></td>
                            <td align="right">
                                <asp:Image ID="taximage" runat="server" Width="275" Height="220" ImageUrl="<% =#getsrc %>" />
                            </td>
                            <td align="right"></td>
                        </tr>
                    </table>


Partial Class templates_Home
Inherits System.Web.UI.MasterPage
Protected Sub getsrc(ByVal sender As Object, ByVal e As System.EventArgs)       Handles Me.Load
    Dim a As Int16
    a = Int((7 * Rnd()) + 1)
    Dim ac As String = "images/acctgimg" + Convert.ToString(a) + ".jpeg"
    acctimage.ImageUrl = ac
    Dim b As Int16
    b = Int((7 * Rnd()) + 1)
    taximage.ImageUrl = "images/tax" + Convert.ToString(b) + ".jpeg"
End Sub

下课