Click here to Skip to main content
Rate this: bad
good
Please Sign up or sign in to vote.
See more: VB.NET Forms
If you have ever wondered how to make FormSlideEffect in VB.NET, your on the right place.Open your Visual Basic 2008/201, and name your application as FormSlideEffect and hit Enter.Than set the form weight to 383, and width to 362.Nov add a one button from Toolbox and name it plus.Now add one group box and place it on your form.Ok it's code time, double click form 1 and paste the following code:
'FormSlidingEffect
'VB.NET
'cooded by AmarTufo
'23.11.2012, AmarTufo
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Public Class Form1
    'This is for button+s to change the look of pointer;
    'when you go forward the pointer changes to backward, othervise it changes
    'to forward;
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Enabled = True
        Button1.Visible = False
        Button2.Visible = True
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer2.Enabled = True
        Button2.Visible = False
        Button1.Visible = True
    End Sub
    'timer is required for sliding effect
    'in our case you will need to add two timers
    'and set their interval of booth to 5
    'remember booth timers are enabled = false
    'the sintax is:> Timer1.Enabled = False
    '::::::::::::::> Timer2.Enabled = False
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Me.Width += 2
        If Me.Width = 595 Then
            Timer1.Enabled = False
        End If
    End Sub
 
    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Me.Width -= 2
        If Me.Width = 383 Then
            Timer2.Enabled = False
        End If
    End Sub
 
And this is how you can make your own FormSlideEffect;
 
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::>
 
this article is written by Amar Tufo, who wood like to specialy thanks to CodeProject and it's team;
Posted 22-Nov-12 10:20am
Comments
Marcus Kramer at 22-Nov-12 16:43pm
   
You should submit this as a tip/trick and not a question in Q&A.
Go through this link to do that.
And then remove your question again before people start reporting it as a non-question. Cheers.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
0 OriginalGriff 375
1 Sergey Alexandrovich Kryukov 329
2 CPallini 260
3 DamithSL 214
4 Maciej Los 197
0 OriginalGriff 5,455
1 DamithSL 4,457
2 Maciej Los 3,885
3 Kornfeld Eliyahu Peter 3,480
4 Sergey Alexandrovich Kryukov 3,115


Advertise | Privacy | Mobile
Web02 | 2.8.141216.1 | Last Updated 22 Nov 2012
Copyright © CodeProject, 1999-2014
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100