Probleme de Langage

Version imprimable

Probleme de Langage

Bonjour

Passage par adresse.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 void fonction(int *ta,int *ti ) { int tampon; tampon=*ta; *ta=*ti; *ti=tampon; } etc.................... void main() { int a, b; etc...................... fonction(&a,&b); etc....................... }
1 - Comment ce code sera-t-il pour le langage de Visual Basic ?

2 - Langage de Visual Basic, Comment utiliser des tableaux et des chaînes de carctères comme argument d'une fonction ?

3 - Ou peut t on trouver des pdf (ou documents) explicitant très bien les procédures et les Fuction du Langage Visual Basic ?

Merci

20/08/2007, 10h53
khany

Tu devrais trouver réponse dans les multiples COURS ;)

Salut!
Je me connais pas trop en c mais c que j'ai vu me dit quelque chose.
Je pense que tu dois faire appel à la fonction swap de visual basic pour faire ce genre de manipulation! Sur certaines versions de VB cette commande ne passe pas ! Alors tu dois faire comme en C mais cette fois-ci en VB comme suit:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ...... 'Au cas où Swap ne marche pas sur ta version de vb! dim X(y) as integer 'y étant un nombre >=3 For i=1 to Y For j = 1 To Y If X(i) < X(j) Then t = X(i) X(i) = X(j) X(j) = t End If Next j Next i .... 'la suite de ton code
Si cela marche pas alors tu signales
;)

Citation:

Envoyé par kabalonda

.../...
Je pense que tu dois faire appel à la fonction swap de visual basic pour faire ce genre de manipulation! Sur certaines versions de VB cette commande ne passe pas !

Comme c'est mignon ; va falloir nous expliquer dans quelle version de VB «ça passe» :mouarf:
Citation:
Envoyé par kabalonda
Alors tu dois faire comme en C mais cette fois-ci en VB comme suit:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ...... 'Au cas où Swap ne marche pas sur ta version de vb! dim X(y) as integer 'y étant un nombre >=3 For i=1 to Y For j = 1 To Y If X(i) < X(j) Then t = X(i) X(i) = X(j) X(j) = t End If Next j Next i .... 'la suite de ton code
Si cela marche pas alors tu signales
;)
1°) magiklife n'a jamais fait allusion à un swap de tableau
2°) même pour un tableau on n'opère pas un swap valeur par valeur
3°) copymemory est l'issu générallement employée - voir également les gestions de pointeurs avec varptr, strptr, objptr
4°) VB, à défaut d'être un language réellement objet, est à l'origine un langage procédural -
on place donc le code dans une fonction ou une procédure «swap» que l'on pourra réutiliser ultérieurement.

Tant qu'à donner des conseils de programmation à quelqu'un qui découvre VB, autant lui donner les bons -
déjà que VB passe aux yeux des programmeurs C pour un langage de chaouïs.

21/08/2007, 10h56
magiklife

Remerciment

Bonjour,

Milles merci, pour les réponses.....
Kabalonda, je pense que tu n'as pas compris mon code.

Code:

void fonction(int *ta,int *ti )

est une fonction que j'ai crée ce n'est pas une fonction déjà préconçu.
Dans mon code

Code:

int a, b;

C'est que a et b sont tous des valeurs, mais pas des tableaux.
Je ne connait pas le langage VB. Mais je pense que tu n'as pas créé une fonction et en tu as fait des tableaux.
Khany, ce que je cherche ce sont des pdf explicitants bien les fonctions et procedures et aussi les tableaux et et les chaînes de caractères. Ou bien tout, simplement un pdf explicitant bien le langagede Visual Basic.
DarkVader, oui je n'ai rien coimpris sur swap, copymemory, strptr,.....
Mais ce que je veux connaître le Langage de Visual basic et ensuite plus tard
les fonctions déjà conçus dans Visual basic.

:merci: Merci
21/08/2007, 15h42
rv26t

Bonjour,

Si mes souvenir sont bon en c
&a : tu donne l'adresse
*ta : tu manipules le contenu
si tu veux simplement inverser 2 entiers représentés par des variables classiques en les passant par référence (adresse) à la fonction.
(en vb on dit par référence)

Dans la FAQ un exemple d'échange en vb donne l'explication

http://vb.developpez.com/faq/?page=Langage#byval_byref

aller sur "Qu'est-ce que ByVal et ByRef ?"

A+, Hervé
04/09/2007, 12h27
kabalonda
Wé, merci pour toutes les remarques!
Alors ce truc passe dans le Vb 6.0 et le VBA (Access, Excel,.....).!J'ai donné ce raisonnement par rapport à la mise en tampon des valeur:
Code:

1 2 3 4 ...... tampon=*ta , *ti=*ta, *tampon=*ti ....
Comme je l'ai dit, je me connais pas trop en C. Voila pourquoi j'ai peut être pas bien compris ton code! Je dois alors faire une comparaison entre Vb et C du coté des appels de fonction et leur création! Mais tous les bons cours du C sont en FTP mais avec ma connexion, je sais pas télécharger...
Mais on cherche toujours une solution avant que cela ne soit tard!
Merci...
:yaisse2:
04/09/2007, 13h38
LeForestier

Citation:

Envoyé par DarkVader

Comme c'est mignon ; va falloir nous expliquer dans quelle version de VB «ça passe» :mouarf:

Dans VB3... ou Turbo Basic ;)

Et il y a MSDN ausssi pour VB6 à télécharger gratuitement, je n'ai pas l'url sous la main mais une petite recherche...
A+
Edit: Après vérification, pas dans VB3 (je l'ai encore sur un portable...)

Citation:

Envoyé par magiklife

Bonjour

Passage par adresse.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
void fonction(int *ta,int *ti )
{ int tampon;
tampon=*ta; *ta=*ti; *ti=tampon;
}
etc....................
void main()
{
int a, b;
etc......................
fonction(&a,&b);
etc.......................
}

Bon, si mes souvenirs en C sont bon...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public function Swap( ByRef ta as integre, Byref ti as integer) as boolean
   dim Tampon as integer
   Tampon = ta
   ti = ta
   ta = tampon
end sub
 
 
'dans le corp d'une fonction ou sub
   dim ti as integer, ta as integer, e as boolean
   'rem exemple
   ti = 5: ta = 10
   e = swap (ti,ta)
   'rem à l'arrivée valeur inversée

Je crois avoir bien traduit la fonction...
A+