VB6 équivalent de la chaîne.IsNullOrEmpty

Je suis en train de faire un travail sur une application existante, et mon VB6 compétences ne sont pas super. J'ai besoin de vérifier si une Chaîne de terrain a été initialisé et réglé sur une valeur autre que null/rien ou une chaîne vide. En C# que je venais de faire quelque chose comme:

if (string.IsNullOrEmpty(myObj.Str))

Je ne suis pas sûr de ce que l'équivalent de ce fut en VB6, et je suis nerveux au sujet de l'aide If myObj.Str = "" et d'appel, il est bon. Quelle est la manière correcte de le faire?

Pour clarifier, je veux quelque chose qui renvoie True si les conditions suivantes sont remplies:

Le domaine n'a pas été initialisée
Le champ est une chaîne vide (str = "", length = 0)
Le champ est null, ou Rien, ou vbnull, ou quelle que soit la forme de la valeur null s'applique à VB6 chaînes.

Le domaine était à l'origine un Long, et le code, je suis en remplacement de vérifier si elle a été fixée à 0.

InformationsquelleAutor Justin Morgan | 2012-01-06

string vb6

41

VB6 a été conçu pour être facile

Utilisation
```
If str = "" Then 
  ' uninitialised, null or empty ""
```
- Chaînes sont automatiquement initialisées à [modifier] une chaîne nulle.
- La chaîne null est vbNullString.
- Mais ne vous inquiétez pas sur des chaînes vides. Une VB6 à une chaîne vide est impossible de distinguer une chaîne vide "" pour (presque) toute manipulation de chaîne.
- Casting vbNullString à LPCSTR argument d'une fonction de l'API peut être un problème.
- Vrai (mais assez rare). Je vais modifier à-dire "presque tout"
- Incorrect. Les chaînes ne sont pas automatiquement initialisé à vide. À l'aide de StrPtr(s) renvoie 0 pour une chaîne nulle(vbNullString) et StrPtr("") sera de retour l'adresse de la chaîne vide. Cependant, VB6 vraiment de les traiter à la fois le même, c'est seulement les appels d'API que peut de soins.
- C'est bon de savoir. Je vous remercie.
- C'est un piège lors de la conversion de VB.Net. Dans VB.Net vbNullstring<>String.Vide
- Merci de remarquer que les chaînes sont initialisées à null cordes, j'ai modifié en conséquence. Curieusement le VB6 documentation dit chaînes sont initialisées à une chaîne vide, mais je suppose que le fait qu'une chaîne null est utilisé pour être considéré comme un détail d'implémentation, comme le VB6 designers s'est efforcé de rendre nul chaîne de caractères impossibles à distinguer à partir d'une chaîne vide. (msdn.microsoft.com/en-us/library/aa243352(v=VS.60).aspx) qui
- Êtes-vous sûr? Mon VB2008 donne True quand j'execute Debug.Print(vbNullString = String.Empty)
- lire ceci: vbforums.com/showthread.php?t=561513
InformationsquelleAutor MarkJ
11

Les plus optimisés et sûr de répondre à vos 3 exigences est comme suit:
```
If LenB(myObj.Str) = 0 
Then Debug.Print "String is empty/null/not initialized" 
Else Debug.Print "Not Empty"
```
- +1 Test de la Longueur d'une chaîne est en effet le plus efficace/puissant moyen de tester une chaîne de longueur nulle.
- Test de la longueur est le plus puissant moyen de tester une chaîne de longueur nulle, mais c'est moins lisible qu'un simple str = "". Quelle est la fréquence de la performance de vraiment important?
InformationsquelleAutor Warren Rox
3

utilisation Est Null pour les morsures ou n'est rien pour les objets

utilisation len("chaîne") au lieu de "chaîne"="" parce que c'est plus rapide
```
Dim s As String

If Not (s Is Null) Then
  MsgBox "SET"

  if (len(s)>0) then
    MsgBox "size > 0"
  else
    MsgBox "size = 0"
  end if
Else
  MsgBox "not SET"
End If
```
ce qui concerne
- Et pour la chaîne vide utiliser Si LenB(s) = 0 Alors
- edit* ^ ce qu'il a dit. --il veut également vérifier la présence d'une initialisé chaîne vide ou 0 longueur, de sorte également vérifier pour s == ""
- Est Null pour cordes est incorrect en VB6 ou VB.Net. Utilisez simplement = "" pour VB6 et dans VB.Net l'utilisation n'Est Rien
InformationsquelleAutor Thomas
2

J'ai essayé, If str = "" Puis

mais il ne fonctionne pas.

La meilleure façon de déterminer si la chaîne est nulle est:

If IsNull(str) Puis

' Cela fonctionne parfaitement

InformationsquelleAutor Virendra Vaishnav
0

Comme "Nuls" et "les Cordes à Vide" sont en fait des valeurs différentes, cette approche peut capturer à la fois pour vous facilement:
```
If strValue & "" = "" Then
    'This is Null
Else
    'This is NOT Null
End If
```
- Trim(strValue & vbNullString) = vbNullString permettra de saisir l'espace-remplies.
- Incorrect. Les valeurs null et les chaînes vides sont des valeurs identiques en VB6 (et VB.Net).
- Oups, mal lu, VBA, désolé.
- C'est un peu bizarre, Ms Access 2000 - 2003 utilise VB6 et certainement les traite comme des valeurs différentes. Sauf que c'est à faire avec le Jet aspect de la tables.
InformationsquelleAutor Matt Donnan
0

Simplement l'ajout d'info à MarkJ de réponse. Si vous travaillez avec un jeu d'enregistrements, ce
```
if rs.fields.item("rsField").value = "" then
```
Génèrera une erreur d'exécution dans le cas où l'élément est null. Vous devriez faire ceci:
```
if rs.fields.item("rsField").value & "" = "" then
```
Bonne chance.

InformationsquelleAutor Gonzalo
0

'L'aide de VbNullstring peut être un moyen très efficace
```
Dim YourString as string  
dim HasValue as boolean

If YourString = vbnullstring then  
    HasValue = False  
Else  
HasValue = True  
End if
```
- Ne pas écrire de code comme celui-ci; écrire HasValue = YourString <> vbNullString à la place: c'est plus direct, le If est complètement inutile ici. En outre, il n'y a pas de raison de plus écrire ce en VB6. Vous pouvez simplement dire HasValue = YourString <> ""
InformationsquelleAutor KoyKoy

Vous devez vous connecter pour publier un commentaire.