Results 1 to 6 of 6

Thread: Falashing and fore font

  1. #1

    Thread Starter
    Addicted Member
    Join Date
    Sep 2002
    Posts
    137

    Question Falashing and fore font

    Hi all

    1- Is it possible to change fore font on the msgbox?

    2 - Is it possible to make the fore font on the msgbox flashing?

    Any one can help please ?

    Many thanks in advance

    vbnt

  2. #2
    PowerPoster
    Join Date
    Aug 2001
    Location
    new jersey
    Posts
    2,904
    you can do pretty much anything you want to the msgbox control using subclassing and API calls

  3. #3

    Thread Starter
    Addicted Member
    Join Date
    Sep 2002
    Posts
    137
    Many thanks phinds

    Can you post example please ?

    Thank you

  4. #4
    The picture isn't missing BuggyProgrammer's Avatar
    Join Date
    Oct 2000
    Location
    Vancouver, Canada
    Posts
    5,217
    uhh.... if you want flashing then you are better off making your own message box with forms and a timer or something similar that will flash the text.
    Remember, if someone's post was not helpful, you can always rate their post negatively .

  5. #5
    PowerPoster
    Join Date
    Aug 2001
    Location
    new jersey
    Posts
    2,904
    Can you post example please ?
    poke around on planetsourcecode or any of several other sites referenced via the link down below my name

  6. #6
    INXSIVE Bruce Fox's Avatar
    Join Date
    Sep 2001
    Location
    Melbourne, Australia
    Posts
    7,429
    Show your Form(MessageBox) as 'Modal':

    VB Code:
    1. Option Explicit
    2.  
    3. Private Sub Form_Load()
    4.    With Label1
    5.       .ForeColor = vbBlue
    6.       .FontName = "Arial"
    7.       .FontSize = 12
    8.       .Caption = "This is a test"
    9.    End With
    10.  
    11.    Timer1.Interval = 500
    12.    Timer1.Enabled = True
    13. End Sub
    14.  
    15. Private Sub Timer1_Timer()
    16.    If Label1.ForeColor = vbRed Then
    17.       Label1.ForeColor = vbBlue
    18.    Else
    19.       Label1.ForeColor = vbRed
    20.    End If
    21. End Sub

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width