tengo este código asociado a un timer,que cada 30 segundos abre estas dos webs a la vez,pero lo que quiero es que me abra una cada 30 segundos,primero una y después a los 30 segundos la otra como lo debería hacer
Public Class Form1
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim url As String = "http://www.facebook.com"
Process.Start(url)
Dim url2 As String = "https://www.google.es"
Process.Start(url2)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 30000
End Sub
End Class
Esto deberia funcionar.
Public Class Form1
Dim cambio As Boolean = false
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim url As String = ""
If cambio Then
url = "http://www.facebook.com"
Else
url = "https://www.google.es"
End If
cambio = Not cambio
Process.Start(url)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 30000
End Sub
End Class
Saludos.
Cita de: Maurice_Lupin en 11 Abril 2014, 16:53 PM
Esto deberia funcionar.
Public Class Form1
Dim cambio As Boolean = false
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim url As String = ""
If cambio Then
url = "http://www.facebook.com"
Else
url = "https://www.google.es"
End If
cambio = Not cambio
Process.Start(url)
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 30000
End Sub
End Class
Saludos.
Va perfecto gracias
;-)