Discussion :

[maxtin]

Bonjour, jutilise VB4 (oui je sais...) et jaimerais bien utiliser les fonctions similaires a Mid() et Format() sans toutefois utiliser ces dernieres. La raison a ceci est que ces fonctions causent des problemes lorsque je nai pas les bonnes references a Excel.

En gros, existe-t-il des fonctions similaire qui nimplique pas les references de librairie? (pur VB)?


en passant Round() nexiste pas en VB4...


Merci

[Phifi]

Mid() et Format()... causent des problemes lorsque je nai pas les bonnes references a Excel.

Mais ce sont des fonctions VB à part entière ! Tu n'as besoin d'aucune référence , le problème doit venir d'ailleurs !

Quelles erreurs ?

[Cravis]

Je ne sais pas pour format mais tu peux recréer la fonction Mid ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Public Function MyMid(Mystr As String, iDeb As Integer, iLong As Integer) As String
    MyMid = Left(Right(Mystr, Len(Mystr) - iDeb), iLong)
End Function

En utilisant juste Right, Left et Len.

[maxtin]

Je ne sais pas pour format mais tu peux recréer la fonction Mid ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Public Function MyMid(Mystr As String, iDeb As Integer, iLong As Integer) As String
    MyMid = Left(Right(Mystr, Len(Mystr) - iDeb), iLong)
End Function

En utilisant juste Right, Left et Len.

Left et right me causent le meme probleme

[ucfoutu]

Bonjour,

1) pour autant que je me le rappelle, VB4 utilise toutes les fonctions habituelles de traitement des chaînes de caractères (les mêmes que celles qu'utilise VB6 à l'exception de Replace, Join, InstrRev et Split.
2) pour autant que je me le rappelle également, vb4 impose l'addittion du suffixe & de typage (Len&, Left$, Right$, etc...)

3) tu ne nous précises pas (et c'est important) ta version VB4 ? est-elle VB4 32 bits ?

AJOUT : même le Basic le plus élémentaire (World Basic) qu'utilisaient les très anciennes versions de Word (avant VBA) était doté de ces fonctions (avec, également, utilisation du suffixe & de typage)...

J'en conclus que :
- soit tu utilises mal ces fonctions
- soit ton Vb4.exe est abimé ... et ilo conviendrait alors de réinstaller VB4
- soit les mots réservés correspondant à ces fonctions ont été utilisés (dans cette appli ou une autre) comme noms de variable... ce qui égare vb4... ==>> réinstallation également dans ce cas.

[AlainTech]

Dès qu'il y a référence manquante, certaine fonction de base ne sont plus reconnues.

Il serait bien plus intelligent de gérer le problème des références plutôt que de chercher des "alternatives".

[LeForestier]

Bonjour,
J'ai travaillé avec VB3 et l'habitude d'ajouter $ à toutes les fonctions qui traite les variables string, Mid$, Left$ etc... venait des basic antérieur et n'était plus nécessaires.
Fait sur VB3, Eh oui, je l'ai encore..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub Form_Load ()
    a = "BBBBBBBB"
    b = Mid(a, 2, 1)
    Debug.Print a, b  'donne - BBBBBBBB           B
End Sub

mais tu emploi VB4 ou VBA sur Excel ? tu parle des 2 ?
A+