Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008
-
14 avril 2008 à 14:16
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 2012
-
15 avril 2008 à 16:05
Bonjour à tous,
voila j'ai réussi à générer des textbox sous forme d'équation:
http://imageshack.us maintenant j'aimerai que apparaisse dans la textbox1 1 , textbox2 2 , textbox3 = 3 ,.......etc
quenlqu'un pourrai m'aider svp ??
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 15 avril 2008 à 11:51
Re,
Effectivement j'avais pas su lire
Est ce que l'ordre de création est important? je veux dire par là que actuellement tu as par exemple les indices suivant pour les textbox
Essaie peu etre cela. mais a présent les indices sont modifés.
Private Sub Command1_Click()
Dim NumTxt As Integer
Dim i As Integer ' ATTENTION comme i, n, m etaient
Dim Colonne As Integer
Dim Ligne As Integer
Text1(0).Visible = True
Text1(0).Text = "1"
NumTxt = CInt(Text2(0).Text)
If Text1.Count <> 1 Then
For g = Text1.Count - 1 To 1 Step -1
Call Unload(Text1(g))
Next
End If
For i = 1 To ((NumTxt) ^ 2) - 1
Call Load(Text1(i))
With Text1(i)
Colonne = i Mod NumTxt If Colonne 0 Then Ligne Ligne + 1
.Visible = True
.Text = CStr(Colonne + 1)
.Left = Text1(0).Left + (Colonne * Text1(0).Width) + 15
.Top = Text1(0).Top + (Ligne * Text1(0).Height)
End With
Next i
End Sub , ----
[code.aspx?ID=41455 By Renfield]
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 15 avril 2008 à 14:38
RE,
Si la chaine "fixe" ne change pas d'une ligne à l'autre, regarde comment concaténer une chaine de caractère. Car en fin de compte ce n'est rien de plus que cela.
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 14 avril 2008 à 14:48
Salut,
Private Sub Command1_Click()
Dim NumTxt As Integer
Dim i As Integer ' ATTENTION comme i, n, m etaient
Dim n As Integer 'comme tu les déclarais des Varaint
Dim m As Integer, z As Integer
If Text1.Count <> 1 Then
For g = Text1.Count - 1 To 1 Step -1
Call Unload(Text1(g))
Next
End If
r = 0
For i = 1 To ((NumTxt) ^ 2) - 1
r = r + 1
Call Load(Text1(i))
Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008 14 avril 2008 à 15:06
merci pour la réponse j'y avait deja pensez mais je me suis mal exprimé; :s
comme je l'ai dit c'est sous forme d'équation alors au lieu d'écrire verticalement, il faudrai que les chiffres s'incrémente horizontalement et à chaque lignes reviennent de zéro.
voila je pense être bien clair.
si pas demander explication ^^
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 14 avril 2008 à 15:14
Re,
Sais pas si j'ai tout compris mais essaie ceci alors. (sert toi de ton test
If r Mod (NumTxt) = 0 Then Qui te permet de savoir QUAND tu change de colonne)
Private Sub Command1_Click()
Dim NumTxt As Integer
Dim i As Integer ' ATTENTION comme i, n, m etaient
Dim n As Integer 'comme tu les déclarais des Varaint
Dim m As Integer, z As Integer
If Text1.Count <> 1 Then
For g = Text1.Count - 1 To 1 Step -1
Call Unload(Text1(g))
Next
End If
r = 0
n = 1
For i = 1 To ((NumTxt) ^ 2) - 1
r = r + 1
n = n + 1
Call Load(Text1(i))
Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008 15 avril 2008 à 13:49
merci bien c'est nikel mais j'aurai une autre question encore.
désoler de t'embeter mais je débute.
donc : est-il possible en plus des chiffres entré une lettre dans chaque textbox
exemple : I1, I2, I3, I4, I5,......???
et sinon pour ces textbox la l'ordre des indices n'a pas d'importance donc je te remercie encore une fois ;)
Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008 15 avril 2008 à 14:34
oui oui j'ai bien compris le programme et donc je sais comment les chiffres sont inscrit seulement.
je ne sais pas quel code utiliser pour pouvoir entré une lettre "fixe" en plus des chiffres dans chaque textbox
Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008 15 avril 2008 à 15:23
il y as quand meme un problème que je n'arrive pas à résoudre.
si j'ai bien compris tu géneres les textbox par ligne et non par colonnes pour pouvoir y introduire les chiffres
mon problème : quel valeur changé pour pouvoir décaler les texbox de chaque ligne et non de chaque colonnes ??
Antikaal
Messages postés13Date d'inscriptiondimanche 3 décembre 2000StatutMembreDernière intervention15 avril 2008 15 avril 2008 à 15:38
je voudrai savoir comment déplacer vers la droite,avec un même esapce, chaque textbox de chaque ligne.
Ce qui aurai pour effet de créer un espace entre chaque colonne.