• 02-06-2010, 01:35:30
    #10
    arkadaşlar cevap yokmu

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Timer1.Interval = 1000
    Timer1.Start()
    Me.Hide()
    Me.Opacity = 0
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Static i As Integer
    i += 1
    If i = 5 Then

    My.Computer.Keyboard.SendKeys("{UP}", True)
    My.Computer.Keyboard.SendKeys("~", True)

    i = 0
    End If
    End Sub


    su kodu exeye çeviren?
  • 02-06-2010, 01:44:31
    #11
    c# ile yaptım birtane deneyip bak sorun varsa konu altından yazarsın.



    private void Form1_Load(object sender, EventArgs e)
            {
                zaman.Interval = 5000;
                zaman.Start();
                this.Hide();
                this.Opacity = 0;
    
    
    
    
            }
    
            private void zaman_Tick(object sender, EventArgs e)
            {
    
                for (i = 0; i <= 1; i++)
                
              
                    SendKeys.Send("{up}");
                    SendKeys.Send("{enter}");
    
    
                }
            }
        }
    Download :http://rapidshare.com/files/39419984...enter.exe.html