使用Razor语法将图像插入到td表元素中

编程问答 2022-06-06

问题描述

我是否因为某些原因错过了某些东西，因为这张表没有图像。

我尝试使用宽度和高度，也可以不使用宽度和高度，甚至尝试硬编码测试图像网址。图片将不会显示

Public Sub copyPastePosition()

    If Range("E1").Value = "1B" Then
        Sheets("807").Range("E1").copy Destination:=Sheets("807").Range("F1")
    ElseIf Range("E1").Value = "2B" Then
        Sheets("807").Range("E1").copy Destination:=Sheets("807").Range("F1")
    ElseIf Range("E1").Value = "3B" Then
        Sheets("807").Range("E1").copy Destination:=Sheets("807").Range("F1")
    ElseIf Range("E1").Value = "SS" Then
        Sheets("807").Range("E1").copy Destination:=Sheets("807").Range("F1")
    ElseIf Range("E1").Value = "OF" Then
        Sheets("807").Range("E1").copy Destination:=Sheets("807").Range("F1")
    End If

    If Range("E2").Value = "1B" Then
        Sheets("807").Range("E2").copy Destination:=Sheets("807").Range("F2")
    ElseIf Range("E2").Value = "2B" Then
        Sheets("807").Range("E2").copy Destination:=Sheets("807").Range("F2")
    ElseIf Range("E2").Value = "3B" Then
        Sheets("807").Range("E2").copy Destination:=Sheets("807").Range("F2")
    ElseIf Range("E2").Value = "SS" Then
        Sheets("807").Range("E2").copy Destination:=Sheets("807").Range("F2")
    ElseIf Range("E3").Value = "OF" Then
        Sheets("807").Range("E2").copy Destination:=Sheets("807").Range("F2")
    End If

    If Range("E3").Value = "1B" Then
        Sheets("807").Range("E3").copy Destination:=Sheets("807").Range("F3")
    ElseIf Range("E2").Value = "2B" Then
        Sheets("807").Range("E3").copy Destination:=Sheets("807").Range("F3")
    ElseIf Range("E3").Value = "3B" Then
        Sheets("807").Range("E3").copy Destination:=Sheets("807").Range("F3")
    ElseIf Range("E3").Value = "SS" Then
        Sheets("807").Range("E3").copy Destination:=Sheets("807").Range("F3")
    ElseIf Range("E3").Value = "OF" Then
        Sheets("807").Range("E3").copy Destination:=Sheets("807").Range("F3")
    End If

    If Range("E64").Value = "1B" Then
        Sheets("807").Range("E64").copy 
        Destination:=Sheets("807").Range("F64")
    ElseIf Range("E2").Value = "2B" Then
        Sheets("807").Range("E64").copy 
        Destination:=Sheets("807").Range("F64")
    ElseIf Range("E64").Value = "3B" Then
        Sheets("807").Range("E64").copy 
        Destination:=Sheets("807").Range("F64")
    ElseIf Range("E64").Value = "SS" Then
        Sheets("807").Range("E64").copy 
        Destination:=Sheets("807").Range("F64")
    ElseIf Range("E64").Value = "OF" Then
        Sheets("807").Range("E64").copy 
        Destination:=Sheets("807").Range("F64")
    End If

End Sub

解决方法

您仅将URL传递到此处。没有img元素。将图像标记放在此处，并将其src属性设置为此@ Model.UploadedMediaItems [0] .url 

 <td width="200px" height="200px">
       <img src='@Model.UploadedMediaItems[0].url' alt="Meida Items" width="200" height="200" />
 </td>

最好通过CSS样式设置最小宽度和高度。

c#c#html-tablerazorengine