Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

is there a Marquee control in vb.net

Posted on 2004-10-14
3
Medium Priority
?
448 Views
Last Modified: 2010-05-18
is there a Marquee control in vb.net?? I'm sure I saw it somewhere but cannot locate it now!
0
Comment
Question by:visualbasic
  • 2
3 Comments
 
LVL 28

Expert Comment

by:iboutchkine
ID: 12308342
<html>
<head>
<title>Title</title>

<marquee align=center loop=infinite>
  Bla bla bla
  ..........      Taste great, too!
</marquee>


</body>
</html>

For example, to create a marquee that is 50 pixels tall and occupies one-third of the display window, use:
<marquee height=50 width="33%">

Space between marquee
<marquee vspace=10 hspace=10>

0
 

Author Comment

by:visualbasic
ID: 12308666
sorry I should have stated that I need this control for windows application
0
 
LVL 28

Accepted Solution

by:
iboutchkine earned 200 total points
ID: 12308913
'add timer textScroller

Public Class Form1
    Inherits System.Windows.Forms.Form

    Dim TextToScroll As String = "Iouri Boutchkine                        "
    Dim cbScrollingSpeedIs As Integer = 300

#Region " Windows Form Designer generated code "
#End Region


    Private Sub TextScroller_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextScroller.Tick
        Dim FirsttoLast As String
        FirsttoLast = Mid(TextToScroll, 1, 1)
        TextToScroll = TextToScroll.Remove(0, 1)
        TextToScroll = TextToScroll.Insert(Microsoft.VisualBasic.Len(TextToScroll), FirsttoLast)
        ScrollingText.Text = TextToScroll
    End Sub

    Private Sub StartScrolling_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StartScrolling.Click
        TextScroller.Enabled = True
    End Sub

    Private Sub StopScrolling_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StopScrolling.Click
        TextScroller.Enabled = False
    End Sub

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextScroller.Interval = cbScrollingSpeedIs
    End Sub
End Class
0

Featured Post

[Webinar] Cloud and Mobile-First Strategy

Maybe you’ve fully adopted the cloud since the beginning. Or maybe you started with on-prem resources but are pursuing a “cloud and mobile first” strategy. Getting to that end state has its challenges. Discover how to build out a 100% cloud and mobile IT strategy in this webinar.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
I think the Typed DataTable and Typed DataSet are very good options when working with data, but I don't like auto-generated code. First, I create an Abstract Class for my DataTables Common Code.  This class Inherits from DataTable. Also, it can …
In response to a need for security and privacy, and to continue fostering an environment members can turn to for support, solutions, and education, Experts Exchange has created anonymous question capabilities. This new feature is available to our Pr…
Is your data getting by on basic protection measures? In today’s climate of debilitating malware and ransomware—like WannaCry—that may not be enough. You need to establish more than basics, like a recovery plan that protects both data and endpoints.…
Suggested Courses
Course of the Month7 days, 19 hours left to enroll

824 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question