Sujet Précédent Sujet Suivant

De plus ebn plus facile mais je n'arrive pas a reflechir

cs_pierre81 Messages postés 38 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 24 juin 2003 - 3 juin 2003 à 17:14
cs_Zoltan67 Messages postés 91 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 25 juin 2003 - 3 juin 2003 à 17:37

Comment on fait pour utilisé ca ::::

Public Function ComputerName() As String
' Retourne le nom de l'ordinateur
Dim stTmp As String, lgTmp As Long
stTmp = Space$(250)
lgTmp = 251
Call GetComputerName(stTmp, lgTmp)
ComputerName = Split(stTmp, Chr$(0))(0)
End Function

Merci

8-) CAILLOUX 8-)

2 réponses

Réponse 1 / 2

cs_Zoltan67 Messages postés 91 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 25 juin 2003 1
3 juin 2003 à 17:36

tu fais :
mavariable = ComputerName
et c tout

Réponse 2 / 2

cs_Zoltan67 Messages postés 91 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 25 juin 2003 1
3 juin 2003 à 17:37

avec mavariable de type string bien sur

Discussions similaires

Problème avec le ?! pour matcher un mot non suivi d'une parenthèse