Seguro que si lo presentas ganas.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Sub TrackBar1_Scroll(sender As Object, e As EventArgs) Handles TrackBar1.Scroll
Dim scv As Integer = TrackBar1.Value.ToString
Dim scc As Integer = TrackBar1.SmallChange
Dim uni As String = "ms"
If scv = 1000 Then
uni = "s"
scv = scv \ 1000
End If
Label4.Text = scv & uni
If scv = 10 Then
scc = 15
ElseIf scv = 25 Then
scc = 25
ElseIf scv = 50 Then
scc = 50
ElseIf scc = 1000 Then
scc = 1000
End If
End Sub
Cita de: OmarHack en 3 Julio 2013, 18:55 PM
programas hechos
If File.Exists(patha) Then
File.Delete(patha)
End If
Cita de: EleKtro H@cker en 3 Julio 2013, 14:31 PM
No quiero desvirtuar mucho el tema, pero por curiosidad cual era el fallo?