비쥬얼 베이직 코딩

소개글

비쥬얼 베이직 코딩에 대한 보고서 자료입니다.

목차

많이 사용하는 코딩의 예문들.

본문내용

1.Recordset
.Delete
.MoveNext
If .EOF Then .MoveLast
End With
Exit Sub
deleteErr:
MsgBox err.Description
End Sub
Private Sub mnu레코드추가_Click()
On Error GoTo Adderr
Adodc1.Recordset.AddNew
txt사원번호.SetFocus
Exit Sub
Adderr:
MsgBox err.Description
End Sub
Private Sub mnu새로고침_Click()
On Error GoTo err
Adodc1.RecordSource = "select*from 인사 order by 사원번호"
Adodc1.Refresh
Exit Sub
err:
MsgBox "에러가 발생했습니다"
End Sub
Private Sub mnu실수령액계산_Click()
On Error GoTo err
With Adodc1.Recordset
.MoveFirst
Do Until .EOF
!실수령액 = !기본급 + !수당 + !상여금 - !공제
.MoveNext
Loop
End With
Exit Sub
err:
MsgBox "안된당 ㅠ.ㅠ"
End Sub

키워드

비쥬얼 베이직,   VB,   coding,   비쥬얼 코딩,   비쥬얼 베이직 coding,   비쥬얼 베이직 코딩