Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
具有从左向右滑动文本的VB.net标签_Vb.net_Text_Label - Fatal编程技术网

具有从左向右滑动文本的VB.net标签

具有从左向右滑动文本的VB.net标签,vb.net,text,label,Vb.net,Text,Label,我想在标签中显示的文本相当长,因此我考虑在标签中从左向右滑动文本 这在VB.net中可能吗?您可以 Public Class Form1 Dim BigStr As String = " this is a very big string, and I want to slide it ya ya ya " Dim Pointer As Integer = 0 Private Sub Form1_Load(sender As Obje

我想在标签中显示的文本相当长,因此我考虑在标签中从左向右滑动文本

这在VB.net中可能吗?

您可以

Public Class Form1

    Dim BigStr As String = "         this is a very big string, and I want to slide it ya ya ya          "
    Dim Pointer As Integer = 0

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Label1.Text = BigStr.Substring(Pointer, 5)
        Pointer = Pointer + 1
        Pointer = Pointer Mod (BigStr.Length - 6)
    End Sub
End Class
别忘了启用计时器,你可以

Public Class Form1

    Dim BigStr As String = "         this is a very big string, and I want to slide it ya ya ya          "
    Dim Pointer As Integer = 0

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Label1.Text = BigStr.Substring(Pointer, 5)
        Pointer = Pointer + 1
        Pointer = Pointer Mod (BigStr.Length - 6)
    End Sub
End Class

别忘了启用计时器

这是一个有趣的问题。据我所知,这不是一个默认的行为,你可以打开和关闭。如果你真的想要它,你必须自己实现它。你的意思是(使用文本框)之类的东西吗。或者字符串在已分配给标签后应向左滚动(标签的文本已部分可见)?因此,也许,在延迟或其他事件之后(例如,在显示表单之后)?@Jimi no,文本已经被分配,并且莱克特的答案满足了我的需要,但是几秒钟后它崩溃了这是一个有趣的问题。据我所知,这不是一个默认的行为,你可以打开和关闭。如果你真的想要它,你必须自己实现它。你的意思是(使用文本框)之类的东西吗。或者字符串在已分配给标签后应向左滚动(标签的文本已部分可见)?因此,也许,在延迟或其他事件之后(例如,在表单显示之后)?@Jimi no,文本将已经被分配,并且Lectere的答案会满足我的需要,但是它会在几秒钟后崩溃。这在前几秒钟起作用,但一旦文本滑到末尾,我的应用程序就会崩溃并抛出错误“索引和长度必须引用字符串中的位置。“这和我上面的代码一样,100%有效。是你的适应错了。我已经测试了我的代码,一切正常,它跳回开始并再次滚动。您需要在字符串的末尾有一个大的空格,并在上面的代码示例中使用数字5和6。阅读错误消息,然后阅读此处;是的,但是使用提供的代码使得文本的可见部分非常小。你一次只能看到5个字母,这使得你很难真正理解文本。我对你的网站缺乏主动性感到惊讶。我提供的代码正是您所描述的。然后你错误地指责我的代码包含错误,而它不包含错误。你的适应能力可能很差。我建议您如何继续,但要真正阅读错误消息并根据它采取行动,需要做的事情太多了。我不会再帮你了,这不是编码服务。如果你真的无法理解这些材料,也许编码不适合你,你应该雇个人为你编程……没必要粗鲁。这里的一些人真的很友好,乐于助人,你似乎有些不同。无论如何,谢谢你的代码,我会试着问一些像我一样仍在学习编码的朋友。这在开始的几秒钟内有效,但一旦文本滑到末尾,我的应用程序就会崩溃,抛出错误“索引和长度必须指字符串中的一个位置”。这与我上面的代码一样,是100%有效的。是你的适应错了。我已经测试了我的代码,一切正常,它跳回开始并再次滚动。您需要在字符串的末尾有一个大的空格,并在上面的代码示例中使用数字5和6。阅读错误消息,然后阅读此处;是的,但是使用提供的代码使得文本的可见部分非常小。你一次只能看到5个字母,这使得你很难真正理解文本。我对你的网站缺乏主动性感到惊讶。我提供的代码正是您所描述的。然后你错误地指责我的代码包含错误,而它不包含错误。你的适应能力可能很差。我建议您如何继续,但要真正阅读错误消息并根据它采取行动,需要做的事情太多了。我不会再帮你了,这不是编码服务。如果你真的无法理解这些材料,也许编码不适合你,你应该雇个人为你编程……没必要粗鲁。这里的一些人真的很友好,乐于助人,你似乎有些不同。无论如何,谢谢你的代码,我会试着问一些像我一样仍在学习代码的朋友。