6
votes

Nombres avec des zéros de premier plan, utilisant VB6

Comment puis-je ajouter des zéros principaux à un numéro? Par exemple: xxx pré>

si stracctnumber code> est inférieur à 15 caractères, puis ajoutez des zéros de tête au numéro de compte. P>

Le chiffre final devrait être P>

stracctnumber = "000000987654321"

number-formatting vb6

0 commentaires

3 Réponses :

5
votes

strAcct = Right("000000000000000" & strAcct, 15)
Note that concatenation is relatively 'expensive'. If this is just for display, rather than modifying the underlying value, consider using the Format() function.

1 commentaires

La chose est que le stracct peut changer. Parfois, cela va t'aimer parfois 12 ou 13 ou 9 cela fonctionne toujours?

16
votes

stracctnumber = Format(stracctnumber, String(15, "0"))

3 commentaires

Fonctionne pour numérique stracctnumber seulement. droite (..., 15) fonctionne pour n'importe quelle chaîne.


                                                
                                                                                            
                                                    @WQW - question est "Comment ajoutez des zéros de tête à un numéro  "                                                

                                                
                                                                                            
                                                    @MarkJ: ne crois pas ça! Lire le code:  DIM StracCTnumber en tant que chaîne


                        
                                            
                            
                                
                                    -1
 votes
                                
                            
                            
                                
                                      b8 = format ((format (B2, "###, ###")), "@@@")  

 Ceci est d'ajouter des espaces à gauche. 

 fonctionne bien dans VBA Excel .....                                 


                                                                    
                                    
                                    
                                        0 commentaires


            
                
		    
                    Articles qui pourrait vous intéresser :
                                            
                            NumberFormat.getCurrencyInstance () ne renvoie pas le symbole de devise pour les paramètres régionaux CHINE et FRANCE (jdk-1.8)                        
                        
                                            
                            Comment séparer les nombres par des virgules dans EditText                        
                        
                                            
                            Laravel - Comment convertir mille virgules en nombre décimal                        
                        
                                            
                            Conversion d'un nombre de bigdecimaux au format de ###. #