Advertisement
Guest User

Untitled

a guest
Jul 5th, 2017
51
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.     Private Sub btnClear_Click(sender As Object, e As EventArgs) Handles btnClear.Click
  2.         ListView1.Items.Clear()
  3.         cbxCantidadDias.SelectedIndex = -1
  4.         rbMatrimonial.Checked = False
  5.         rbPresidencial.Checked = False
  6.         rbSencilla.Checked = False
  7.         txtNombreDelCliente.Clear()
  8.         txtMontoTarifaDiaria.Clear()
  9.         txtNumeroDeLaHabitacion.Clear()
  10.         txtNombreDelCliente.Focus()
  11.         lstPlanilla.Clear()
  12.  
  13.     End Sub
  14.  
  15.     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  16.         Application.Exit()
  17.     End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement