主题：[求助] 查看详细图片

老师，代码如下，如何做到，单击图片可以放大图片来浏览；

Dim e As RequestEventArgs = args(0)
Dim wb As New weui
wb.AddPageTitle("","pageheader","2020","春节联欢晚会")
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
wb.AddPage("","page1") '增加两个page
With wb.AddArticle("page1","ar1")
    .AddTitle("h1","关于节目评分标准")
    .AddContent("使用说明:评委按节目评分标准逐项打分,由计分员收集统计总分..")
    .AddImage("./images/score1.png")
End With
wb.AddForm("","form1","logon.htm")
With wb.AddButtonGroup("form1","btg1",True)  '垂直排列
    .Add("btn5", "返回", "", "homepage.htm") '单击这个按钮可以打开foxtable主页
End With
e.WriteString(wb.Build) '生成网页