Hi,
Could sombody let me know the details of the following code word by word:VB Code:
Private Sub cboAccType_Click() Set rsTemp = New ADODB.Recordset rsTemp.Open "Select * FROM tblAccTypes WHERE AccountName='" & cboAccType.Text & "'", cnBank, adOpenKeyset, adLockOptimistic With rsTemp If .RecordCount > 0 Then lblMin = !MinBalance Else Exit Sub End If End With End Sub
Edit: Added [vbcode][/vbcode] tags for clarity. - Hack




Reply With Quote