如何在此编码器中添加滚动延迟?
直到最后一个字符才会滚动,当literal1中的第一个字符触及左边时它会消失...
我希望它会滚动到最后..字符
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim example As String = TextBox1.Text
Dim str As String = "<img src=a.gif/>"
Dim resulte As String = "<MARQUEE>" & str & " " & example & "</MARQUEE>"
Literal1.Text = resulte
End Sub
答案 0 :(得分:1)
您需要将scrolldelay属性设置为MARQUEE标记。所以这方面的一个例子是:
Dim resulte As String = "<MARQUEE SCROLLDELAY=500>" & str & " " & example & "</MARQUEE>"