Visual Basic - Ayuda!! Como puedo aplicar dry dont repeat yourself en vb.net

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Ayuda!! Como puedo aplicar dry dont repeat yourself en vb.net

Publicado por jack (1 intervención) el 31/10/2022 22:38:01
hola, necesito ayuda para simplicar estas condicionales

LabelHora.Text = Now.ToString("HH:mm:ss") ''formato 24 horas
If LabelHora.Text = "06:00:30" Then
Open()
End If
If LabelHora.Text = "06:01:10" Then
Open()
End If
If LabelHora.Text = "07:09:30" Then
Open()
End If
If LabelHora.Text = "07:11:10" Then '
Open()
End If

un ejemplo: Dim hora_actual() As String = {"06:00:30", "07:00:30", "08:00:30"}
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 145
Ha aumentado 1 puesto en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Ayuda!! Como puedo aplicar dry dont repeat yourself en vb.net

Publicado por Sah1d Ra (191 intervenciones) el 01/11/2022 16:36:48
ejemplo 1
1
2
3
4
5
6
7
8
9
10
LabelHora.Text = Now.ToString("HH:mm:ss") 'formato 24 horas
If LabelHora.Text = "06:00:30" Then
     Open()
ElseIf LabelHora.Text = "06:01:10" Then
     Open()
ElseIf LabelHora.Text = "07:09:30" Then
     Open()
EelseIf LabelHora.Text = "07:11:10" Then '
     Open()
End If

ejemplo 2
1
2
3
4
5
LabelHora.Text = Now.ToString("HH:mm:ss") ''formato 24 horas
If LabelHora.Text = "06:00:30" Then Open()
If LabelHora.Text = "06:01:10" Then Open()
If LabelHora.Text = "07:09:30" Then Open()
If LabelHora.Text = "07:11:10" Then  Open()

ejemplo 3
1
2
3
4
LabelHora.Text = Now.ToString("HH:mm:ss") ''formato 24 horas
If LabelHora.Text = "06:00:30" or LabelHora.Text = "06:01:10" or LabelHora.Text = "07:09:30" or LabelHora.Text = "07:11:10" Then
  Open()
End if
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar