[Message Deleted] [modified]

[JAYRAJ GIRI]

Public Class Form1 Dim flag As Integer = 1 Dim tem, j As Integer Private Sub timer(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim path As String = "C:\C#\LED\off.gif" Dim path1 As String = "C:\C#\LED\on.gif" Me.PictureBox1.Image = Image.FromFile(path) If j <= Val(Me.TextBox2.Text) Then If flag = 1 Then Me.PictureBox1.Image = Image.FromFile(path) flag = 0 ElseIf (flag = 0) Then Me.PictureBox1.Image = Image.FromFile(path1) flag = 1 End If j = j + 1 If j = Me.TextBox2.Text Then Timer1.Interval = Me.TextBox3.Text * 1000 j = 0 End If End If End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click tem = Math.Floor(Val(Me.TextBox1.Text / Me.TextBox2.Text)) Timer1.Enabled = True Timer1.Interval = tem * 1000 End Sub End Class

modified on Monday, March 9, 2009 3:33 PM

[ABitSmart]

JAS GIRI wrote:

How to remove Browser comparability

What do you mean ? Can you reframe your question ?