uen tite kestion mais alors vraiment tres tres conne :p - Programmation
Marsh Posté le 15-11-2001 à 01:07:01
un truc du genre
Dim maVariable As String
maVariable= Me.Text1.Value
Marsh Posté le 15-11-2001 à 01:51:18
ça fait lgtps que j'en ai plus fais...
c'est comme le this en C++
ça vaut dire l'objet en cours.
Marsh Posté le 15-11-2001 à 02:05:46
ca me fais une erreur de compile la dessus :
Private Sub Text1_Change()
Marsh Posté le 15-11-2001 à 10:25:10
tu veux en faire koi de ta variable ?
pq dans l'évenement "Change()" ?
Marsh Posté le 15-11-2001 à 14:02:22
Si mes souvenirs sont bons je dirai:
dim mavariable
Private Sub Text1_Change()
mavariable = text1.text
End Sub
Marsh Posté le 15-11-2001 à 14:28:38
Si tu fais :
Private Sub Text1_Change()
dim mavariable as string
mavariable = text1.text
End Sub
Et bien à chaque fois que la zone de texte change, mavariable change aussi.
Mais il te sera inutile car tu pourras utiliser mavariable que dans l'évènement Change.
Je te conseille de créer une zone de texte, et à côté un bouton, ou dedans tu mets :
dim mavariable as string
mavariable = text1.text
Et dans ce même bouton tu utilises mavariable, pour faire une opération par exemple (auquel cas tu mets 'dim mavariable as integer' au lieu de 'string'
Marsh Posté le 15-11-2001 à 16:29:07
bon alors je vous montre mon programme que je voulais realiser, pk la j y arrive po
bon ces un prog pour convertir une ip sous un autre format :
Dim ip1 As Integer
Dim ip2 As Integer
Dim ip3 As Integer
Dim ip4 As Integer
Dim ip5 As Integer
Dim ip6 As Integer
Dim ip7 As Integer
Dim ip8 As Integer
Dim ipfinal As Integer
Private Sub Command1_Click()
ip5 = ip1 * ....
ip6 = ip2 * ....
ip7 = ip3 * ....
ip8 = ip4 * ....
ipfinal = ip5 + ip6 + ip7 + ip8
MsgBox (ipfinal)
End Sub
Private Sub Text1_Change()
ip1 = Text1.String
End Sub
Private Sub Text2_Change()
ip2 = Text2.String
End Sub
Private Sub Text3_Change()
ip3 = Text3.String
End Sub
Private Sub Text4_Change()
ip4 = Text4.String
End Sub
la ca me fais une erreur de compile au moment ou j essaie de mettre un nombre ds une des textbox !
ca ressemblerai a ca en fait :
[edtdd]--Message édité par djtoz--[/edtdd]
Marsh Posté le 16-11-2001 à 05:35:44
Euh, j'y connais pas grand chose en visual basic...mais la tu tenterais pas de mettre du texte dans une variable integer ? sans aucune conversion explicite ?
integer = string ca me semble moyen...
Marsh Posté le 16-11-2001 à 09:29:55
C'est sa la magie de VB. Il fait des conversions implicite dans tous les sens sans sourciller...
Ca donne un code à ch..., mais ça permet d'aller vite
Sinon, ton prog je le ferais comme ça :
Dim ip5 As Integer
Dim ip6 As Integer
Dim ip7 As Integer
Dim ip8 As Integer
Dim ipfinal As Integer
Private Sub Command1_Click()
ip5 = CInt(Text1.value) * ....
ip6 = CInt(Text2.value) * ....
ip7 = CInt(Text3.value) * ....
ip8 = CInt(Text4.value) * ....
ipfinal = ip5 + ip6 + ip7 + ip8
MsgBox (ipfinal)
End Sub
Le CInt est une conversion explicite, mais tu peux à la limite t'en passer.
Et tu laisses tomber les affectations de variables dans les Change().
D'autres questions ?
[edtdd]--Message édité par Miles V--[/edtdd]
Marsh Posté le 16-11-2001 à 22:31:55
k j ai essayer ce ke tu a ecris Miles V
mais y a un prob de compil la aussi
qd je clic sur convertir, me dit:
Erreur de compilation
methode ou membres de donnees introuvable
Marsh Posté le 14-11-2001 à 21:51:05
vous foutez po de ma gueule siouplez
je debute en visual basic
j arrive pas a associer ce que je rentre ds une textbox a une variable, la qd ma textbox est cree, j ai ca:
Private Sub Text1_Change()
End Sub
si je rentre un chiffre ds ma textbox, je veut l associer a une variable !
komen k on fais ?