Neste banco existem 4 grupos de 28 combo, com o objetivo de soma em cada grupo.
No 1 grupo a esquerda tentei de 2 modos;
1)....
Private Sub SomaToqueD_BeforeUpdate(Cancel As Integer)
Me.SomaToqueTotal.Value = Me.Combo1 + Me.Combo2 + Me.Combo3 + Me.Combo4 + Me.Combo5 + Me.Combo6 + Me.Combo7 + Me.Combo8 + Me.Combo9 + Me.Combo10 + Me.Combo11 + Me.Combo12 + Me.Combo13 + Me.Combo14 + Me.Combo15 + Me.Combo16 + Me.Combo17 + Me.Combo18 + Me.Combo19 + Me.Combo20 + Me.Combo21 + Me.Combo22 + Me.Combo23 + Me.Combo24 + Me.Combo25 + Me.Combo26 + Me.Combo27 + Me.Combo28
End Sub
2).....
Private Sub Comando637_Click()
Me.SomaToqueTotal.Value = (Me.Combo1 + Me.Combo2 + Me.Combo3 + Me.Combo4 + Me.Combo5 + Me.Combo6 + Me.Combo7 + Me.Combo8 + Me.Combo9 + Me.Combo10 + Me.Combo11 + Me.Combo12 + Me.Combo13 + Me.Combo14 + Me.Combo15 + Me.Combo16 + Me.Combo17 + Me.Combo18 + Me.Combo19 + Me.Combo20 + Me.Combo21 + Me.Combo22 + Me.Combo23 + Me.Combo24 + Me.Combo25 + Me.Combo26 + Me.Combo27 + Me.Combo28)
End Sub
e só saem os números lado a lado.
Como resolver?
No 1 grupo a esquerda tentei de 2 modos;
1)....
Private Sub SomaToqueD_BeforeUpdate(Cancel As Integer)
Me.SomaToqueTotal.Value = Me.Combo1 + Me.Combo2 + Me.Combo3 + Me.Combo4 + Me.Combo5 + Me.Combo6 + Me.Combo7 + Me.Combo8 + Me.Combo9 + Me.Combo10 + Me.Combo11 + Me.Combo12 + Me.Combo13 + Me.Combo14 + Me.Combo15 + Me.Combo16 + Me.Combo17 + Me.Combo18 + Me.Combo19 + Me.Combo20 + Me.Combo21 + Me.Combo22 + Me.Combo23 + Me.Combo24 + Me.Combo25 + Me.Combo26 + Me.Combo27 + Me.Combo28
End Sub
2).....
Private Sub Comando637_Click()
Me.SomaToqueTotal.Value = (Me.Combo1 + Me.Combo2 + Me.Combo3 + Me.Combo4 + Me.Combo5 + Me.Combo6 + Me.Combo7 + Me.Combo8 + Me.Combo9 + Me.Combo10 + Me.Combo11 + Me.Combo12 + Me.Combo13 + Me.Combo14 + Me.Combo15 + Me.Combo16 + Me.Combo17 + Me.Combo18 + Me.Combo19 + Me.Combo20 + Me.Combo21 + Me.Combo22 + Me.Combo23 + Me.Combo24 + Me.Combo25 + Me.Combo26 + Me.Combo27 + Me.Combo28)
End Sub
e só saem os números lado a lado.
Como resolver?
- Anexos
- Sensibilidade.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (188 Kb) Baixado 5 vez(es)