분류 전체보기202 Textbox 엔터키 텍스트박스에서 엔터키 감지하기 + 다른 프로시져에서 버튼 클릭 이벤트를 활성화하는 방법이다. 텍스트박스 이름은 TextBox1, 버튼 이름은 Button1 Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As _ system.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown If e.KeyCode = Keys.Return Then Button1_Click(sender, New System.EventArgs()) End If End Sub 2018. 3. 16. Textbox에 숫자만입력 Textbox1.text 에 숫자만 들어가도록 하려면 KeyPrees ?? 이벤트에 키프레스 이벤트에 추가하면됨 아래 코딩하면 해당 Textbox1.text 에는 숫자만 들어감.-------------------------------------------------------------------------- If Not Char.IsDigit(e.KeyChar) And Not Char.IsControl(e.KeyChar) Then e.Handled = True End If ============================================================다른 방법 Private Sub TextBox11_KeyPress(sender As Object, e As KeyPressEv.. 2018. 3. 16. 날짜 계산 Dim ChangeDay As Integer ChangeDay = DateDiff(DateInterval.Day, 지정한날짜, 현재) ================================================= for 문을 통해 datagridview 내 값에서 계산 '날짜 계산 방식 For i = 0 To DataGridView1.RowCount - 1 DataGridView1.Rows(i).Cells(2).Value = DateDiff(DateInterval.Day, DataGridView1.Rows(i).Cells(0).Value, DataGridView1.Rows(i).Cells(1).Value) '정지신청가능일 구하기(정지신청일에서 1년 1일 더한 값) DataGridView1.Ro.. 2018. 3. 16. Datagridview 덧셈 Dim 총정지일수 As String총정지일수 += DataGridView1.Rows(i).Cells(2).Value Label1.Text = 총정지일수 2018. 3. 16. 이전 1 ··· 46 47 48 49 50 51 다음