Afficher une variable texte dans un Frm.captionRésolu

Question

Je ne trouve pas la m&#233;thode &#224; utiliser pour l'affichage de la variable en l'occurrence frm1.nom 

dans le frm2.caption.



Merci d'avance

Gobillot · Accepted Answer

et &#224; quel moment est charg&#233; Nom ?

Nom = txtNom.text     'surtout pas de Val() 

Frm2.Show

c'est ce que je venais d'&#233;crire !!!!
Daniel

jpleroisse · Answer

Bonsoir,

frm2.Caption = frm2.Name



jpleroisse

Alaundyr · Answer

En fait, la vraie ligne de commande est celle-ci : 

frm2.Caption = "Nombre myst&#232;re - [ PC ] contre [" + frm1.Nom + "]"

et Ca fonctionne pas comme &#231;a

Gobillot · Answer

Private Sub Form_Load()

    Dim Nom As String

    Nom = "Alaundyr"

    Frm2.Show

    Frm2.Caption = "Nombre myst&#232;re - [ PC ] contre [" + Nom + "]"

End Sub


Daniel

cs_casy · Answer

comme te la dis JP



frm2.Caption = "Nombre myst&#232;re - [ PC ] contre [" + frm1.Name + "]"




<hr size="2" width="100%">Si le cerveau &#233;tait assez simple pour que nous puissions le comprendre,

nous serions assez b&#234;te pour ne pas le comprendre malgr&#233; tout.

Alaundyr · Answer

Euh, exusez moi, j'ai du mal m'exprimer, quand j'utilise la variable frm1.Nom, il s'agit d'une variable d&#233;finie par l'utilisateur et non le nom de la fen&#234;tre, d&#233;sol&#233;, c'est ma faute, Par contre Daniel, le probl&#232;me vient du fait que je dois prendre ma variable globale et donc sp&#233;cifier son origine non? 
Le "Nom" seul m'affiche un blanc

Alaundyr · Answer

Quant au frm1.Nom il m'affiche un 0.

cs_DARKSIDIOUS · Answer

Est-ce que ta variable Nom est bien d&#233;clar&#233;e en Public dans la partie d&#233;claration de ta feuille ? Si non, mets l&#224; en public !

DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) : www.ProgOtoP.com/popapi/

Alaundyr · Answer

Oui elle est en Public sur le frm1 et en type String, c'est pourquoi j'essayer d'utiliser le frm1.Nom

Gobillot · Answer

et o&#249; il est ce code ?

s'il est sur frm1 il y a pas besoin du nom de la Forme

s'il est sur fmr2, il doit d&#233;finit en Public.

et aussi remplace tes "+" par des "&"



'sur frm1

Dim Nom As String

 frm2.Caption = "Nombre myst&#232;re - [ PC ] contre [" & Nom & "]"


'sur frm1 ou dans un module

Public Nom As String

'sur frm2

Me.Caption = "Nombre myst&#232;re - [ PC ] contre [" & frm1.Nom & "]"


Daniel

Alaundyr · Answer

Je r&#233;capitule pour &#234;tre plus clair :

J'ai 2 fen&#234;tres :   
 
frm1 :  C'est la qu'est pos&#233;e la variable Nom en public - string, voici le code :
Public Nom As String

frm2 : Dans le form_load j'ai pos&#233; le frm2.caption de fa&#231;on &#224; obtenir le texte de la variable public "Nom", le code est l&#224; :
Private Sub Form_Load()
frm2.Caption = "Nombre myst&#232;re - [ PC ] contre [" & frm1.Nom & "]"

Le probl&#232;me est qu'en utilisant cette commande, c'est un 0 qui s'affiche plut&#244;t que la variable.

Alaundyr · Answer

Il n'est possible que d'entrer des caract&#232;res alphanum&#233;riques dans la variable Nom (txtNom.text) en r&#233;alit&#233;.

jpleroisse · Answer

Re,

Si cel&#224; ne correspond pas, alors montre ton code!



Dans un Module

Public frm1 As String



Dans le code de frm2



Private Sub Form_Load()

frm1 = "Salut"

Form2.Caption = frm1

End Sub



jpleroisse

Alaundyr · Answer

Je crois avoir trouv&#233; d'ou &#231;a venait, c'est lors de l'affectation de txtNom.text &#224; Nom, 
J'avais utilis&#233; la m&#233;thode Nom = val(txtNom.text), donc fatalement, mais je dois utiliser quoi &#224; la place?

Alaundyr · Answer

Encore une fois, c'est bon, je vous remercie tous pour vos r&#233;ponses si sympathiques. et pour la derni&#232;re fois pardon.

Alaundyr · Answer

Oui, tu avais mis ton doight sur le probl&#232;me :). Chapeau, et merci encore... Je vous ai fait tourner en bourrique pour rien, j'ai un peu l'air con l&#224;

jpleroisse · Answer

Excuse, je n'avais pas vu que tu avais post&#233;s ton code, en tout cas j'ai essay&#233; ceci.

Dans un Module

 Public frm1 As String

 

 Dans le code de frm2

 Private Sub Form_Load()

 frm1 = "Salut"

 Form2.Caption = "Nombre myst&#232;re - [ PC ] contre [" & frm1 & "]"

 End Sub



Form2.Caption me donne  Nombre myst&#232;re - [ PC ] contre [Salut]



jpleroisse