Jump to content
Fórum Script Brasil
  • 0

geração de parcelas


Question

Estou tentando incrementar um código que até então funciona perfeitamente no parcelamento, algo básico e simples que adaptei, neste código:
Private Sub btnGerar_Click()
Dim I As Integer
Dim StrDateAdd As Date
Dim StrValorParc As Double
Dim Parc As String

StrValorParc = Me.txtValor_Total
For I = 1 To Me.txtParc
StrDateAdd = DateAdd("m", I, Format(Me.txtData, "dd/mm/yyyy"))
StrParc = I & "/" & Me.txtParc
CurrentDb.Execute "INSERT INTO TBL_parcelamento_vendas(unidade_ctr,data_vcto,valor_pc)" _
               & " Values(""" & Me.txtDescricao.Value & """,#" & Format(StrDateAdd, "mm/dd/yyyy") & "#, """ & StrValorParc & """);"
               
Next I
Me.lstParcelas.Requery
End Sub


preciso que na medida que forem sendo criadas as parcelas seja preenchido o campo "descr_parc com a palavra "mensal" nesta mesma tabela, meus conhecimentos são bem limitados com certeza para o pessoal do forum será facil ..rsrs
 
Link to post
Share on other sites

1 answer to this question

Recommended Posts

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      148713
    • Total Posts
      644521
×
×
  • Create New...