Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic récuperation de la valeur d'une chaine

récuperation de la valeur d'une chaine

21 réponses
Avatar
roms
Bonjour,
Je voudrais récuperer la valeur d une chaine de caractere
par ex: a="bouton1" je voudrais recuperer bouton1 pour l utiliser avec un
attribut: bouton1.caption.....

Merci de votre aide
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
Driss HANIB
pas possible de créer des boutons indexés en VBA.
c'est cà qui complique..

"LE TROLL" <le a écrit dans le message de
news:%23j%
Re salut, tiens voilà du code, mais je ne sais pas
si les fonctions sont exactement les mêmes en vbA:
Faut déclarer 10 boutons du même nom (0 à 9), puis tu
supprime le 0, c'est plus simple, donc ça fait de 1 à 9.
Laisse les noms d'origine aux boutons, c'est mieux pour
comprendre...

Dim etat(9) As Byte ' variables globales
Dim i As Long
'
Sub Form_Load() ' point d'entrée dans la procédure
For i = 1 To 9
etat(i) = 0
Next i
End Sub
'
Sub Command1_Click(Index As Integer) ' gestion des 9 boutons
etat(Index) = 1
For i = 1 To 9 ' marquage du bouton touché
If etat(i) = 0 Then Exit Sub
Next i
For i = 1 To 9 ' test si 9 boutons actionnés
Command1(i).Enabled = False ' si oui = action
Next i
End Sub
----------------- testé en VB, ça marche!!!


"roms" a écrit dans le
message de news:

> En fait je suis tres tres novice et je dois programmer un
> morpion en VBA!!!
> Pour ca j utilise 9 bouton(btn1, btn2, ...,btn9) et une
> fois qu un joueur a
> gagné
> je veut les bloquer voici ma boucle
>
> for j =1 to 9
> a= "btn" & j
> a.locked=true
> next
> mais la valeur de a est "btn1" donc ca bloque, je voudrais
> simplement me
> debarasser des " " y a t il une fonction qui existe, sinon
> comment en créer
> une tres simplement!!
> Merci bcp pour vos réponses respectives




Avatar
scraper
Bonjour Driss HANIB, dans le message
news:
tu disais :


pas possible de créer des boutons indexés en VBA.
c'est cà qui complique..



tu perds ton temps ...

en outre, tu lui a déjà dit la semaine dernière ;-)



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
scraper
Bonjour LE TROLL, dans le message
news:%23j%
tu disais :


Re salut, tiens voilà du code, mais je ne sais pas
si les fonctions sont exactement les mêmes en vbA:



roms a bien précisé VBA !!!!


quand _tu_ sait pas, *tu* fermes ta *** :-)

.... ça nous fera des vacances, pour changer de tes débilités quotidiennes


au fait, essaie donc de me dire que ce que j'ai suggéré ne fonctionne pas ?
;-)


pitoyable ...



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
LE TROLL
On t'a rien demandé pieds plat, va faire ton service
militaire pour être utile aux autre, dégage--------->
----------

"scraper" a écrit dans le message de
news:
Bonjour Driss HANIB, dans le message
news:
tu disais :


pas possible de créer des boutons indexés en VBA.
c'est cà qui complique..



tu perds ton temps ...

en outre, tu lui a déjà dit la semaine dernière ;-)



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper


Avatar
LE TROLL
Je n'ai pas regardé ce que tu a suggéré, j'ai simplement
vu que tu disais ne pas connaître le vbA, alors comme je
suis certain que tu ne sais pas non plus programmer, y
compris en VB, ben je me demandais pourquoi tu venais faire
chier ici :o)
-----------

"scraper" a écrit dans le message de
news: %
Bonjour LE TROLL, dans le message
news:%23j%
tu disais :


Re salut, tiens voilà du code, mais je ne sais pas
si les fonctions sont exactement les mêmes en vbA:



roms a bien précisé VBA !!!!


quand _tu_ sait pas, *tu* fermes ta *** :-)

.... ça nous fera des vacances, pour changer de tes
débilités quotidiennes


au fait, essaie donc de me dire que ce que j'ai suggéré ne
fonctionne pas ? ;-)


pitoyable ...



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper


Avatar
LE TROLL
Bon, ben comme en VB on me dit qu'on ne peut indicer les
objes, voici un code à plat qui marche en VB...

' boutons bloqués
'
Dim etat(9) As Byte
Dim i As Long
'
Sub Form_Load()
For i = 1 To 9
etat(i) = 0
Next i
End Sub
'
Sub Command1_Click()
etat(1) = 1
Call teste
End Sub

Sub Command2_Click()
etat(2) = 1
Call teste
End Sub

Sub Command3_Click()
etat(3) = 1
Call teste
End Sub

Sub Command4_Click()
etat(4) = 1
Call teste
End Sub

Sub Command5_Click()
etat(5) = 1
Call teste
End Sub

Sub Command6_Click()
etat(6) = 1
Call teste
End Sub

Sub Command7_Click()
etat(7) = 1
Call teste
End Sub

Sub Command8_Click()
etat(8) = 1
Call teste
End Sub

Sub Command9_Click()
etat(9) = 1
Call teste
End Sub

'
Sub teste()
For i = 1 To 9
If etat(i) = 0 Then Exit Sub
Next i
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = False
Command7.Enabled = False
Command8.Enabled = False
Command9.Enabled = False
End Sub
-------------------------------------

"roms" a écrit dans le
message de news:

Bonjour,
Je voudrais récuperer la valeur d une chaine de caractere
par ex: a="bouton1" je voudrais recuperer bouton1 pour l
utiliser avec un
attribut: bouton1.caption.....

Merci de votre aide


Avatar
scraper
Bonjour LE TROLL, dans le message
news:
tu disais :


Bon, ben comme en VB on me dit qu'on ne peut indicer les
objes, voici un code à plat qui marche en VB...



t'as pas plus long ? ;-)

minable, ton code ...

il y a peu, tu te moquais d'un contributeur qui exposait une méthode (un
peu) longue ... mais propre, elle ;-)

aurais tu la mémoire sélective ? sans doute l'âge ...

moi pas ;-)



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
LE TROLL
Oh l'autre, il critique mon code, tu connais pas ça, alors
occupes-toi de tes macros dans tes forums boiteux, et va
jouer le MVP ailleurs!
--------> dégage



"scraper" a écrit dans le message de
news: %
Bonjour LE TROLL, dans le message
news:
tu disais :


Bon, ben comme en VB on me dit qu'on ne peut indicer
les
objes, voici un code à plat qui marche en VB...



t'as pas plus long ? ;-)

minable, ton code ...

il y a peu, tu te moquais d'un contributeur qui exposait
une méthode (un peu) longue ... mais propre, elle ;-)

aurais tu la mémoire sélective ? sans doute l'âge ...

moi pas ;-)



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper


Avatar
roms
Merci pour les idées (les coups de gueules n etant pas necessaires... ;-) )

J ai essayé de faire appele a une fonction supplementaire bouton(i) et ca
foire encore et tjs!!!!!
c est vraiment enervant!!!!!!!!!!!quelle est la difference entre VB et VBA??
Avatar
scraper
Bonjour LE TROLL, dans le message
news:
tu disais :


Oh l'autre, il critique mon code, tu connais pas ça, alors
occupes-toi de tes macros dans tes forums boiteux, et va
jouer le MVP ailleurs!



tu appelles ça un code ?? ;-)

c'est loin de valoir 10¤ :-D

--------> dégage



rofl lol rofl

dans tes rêves ;-)

usurpateur ...


--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
1 2 3