我已经使用Google放大器列表开发了此页面,并显示了更多按钮组件https://www.newsapp.io/ampproject。我面临的问题是,在显示更多按钮之后获取新数据并显示页面移至顶部(第一项),而我希望它保持在原始位置。我使用了与文档中给出的完全相同的代码:https://ampbyexample.com/advanced/show_more_button/。这是我的清单代码:-
Dim frm As Object
Set frm = UserForms.Add(FormName)
If CurrValue = "Pass" Then
frm.Show
frm.Controls(Control_Yes) = True
frm.Controls(Control_No) = False
ElseIf CurrValue = "Fail" Then
frm.Show
frm.Controls(Control_Yes) = False
frm.Controls(Control_No) = True
End If
答案 0 :(得分:0)
该行为不可复制。但是,我注意到控制台错误阻止了表单提交操作。我建议先修复以下控制台错误。