convertion vb6 vers vb 2005 express

Question

Bonjour à tous,

J'ai converti un projet VB6 avec VB 2005 express et une impossibilité de conversion s'est produite comme indiqué ci-dessous (UPGRADE_WARNING: Impossible de résoudre la propriété par défaut de l'objet tmp)
Pouvez-vous me dire comment modifier mes lignes de codes pour que ça marche sous VB 2005 express.
Merci.
Pour info, j'avais créé un  groupe de controle comprenant 10 textbox dans lesquels du texte (contenu dans le fichier carte.txt) s'incrivait en cliquant un bouton de commande.
Encore merci.

PrivateSub Command45_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command45.Click

Dim tmp 
As
Object
Dim ouvrir 
As
Object
FileClose()

If



 Text11.Text = 

"CARTE"



Then

FileOpen(1, 

"C:\Program Files\Projet\carte.txt"
, OpenMode.Input)


For
 ouvrir = 0 

To
 9
tmp = LineInput(1)


'UPGRADE_WARNING: Impossible de résoudre la propriété par défaut de l'objet tmp.

Text14(ouvrir).Text = tmp


Next
 ouvrir
FileClose()
End

If
End
Subzazsze

cs_casy · Answer

Essaye déjà ça pour voir : ~~Dim tmp As~~ ~~Object~~ Dim tmp As String Dim ouvrir As Object ---- Sevyc64 (alias Casy) ----

# LE PARTAGE EST NOTRE FORCE #

zazsze · Answer

Le problème réside maintenant dans la ligne de code
Text14(ouvrir).Text = tmp

Il y a une erreur avec (ouvrir) 

En fait, ce que je voudrai, c'est qu'en cliquant sur le bouton de command (Button1), le contenu de mon fichier texte (C:\Program Files\Projet\carte.txt) s'ouvre dans 3 textbox (textbox1, textbox2 et textbox3).
Si vous connaissez le solution (sous vb 2005 express) ça m'arrangerai vraiment

Merci quand même pour la première réponse

cs_casy · Answer

ouvrir doit etre de type Integer.

Ensuite, il faut voir à quoi correspond Text14. Est-ce une textbox seule, ou un groupe de textbox.

Les groupes de controles comme en VB6 n'existe plus en .NET. Pour regrouper des controles, il faut le faire manuellement en passant par les collections.

Exemple simpliste d'utilisation des collections : soit 10 textbox sur ta page nommées textbox1 à textbox10 

Dim TxtBoxColl As New Collection

TxtBoxColl.Add(TextBox1)
TxtBoxColl.Add(TextBox2)
TxtBoxColl.Add(TextBox3)
TxtBoxColl.Add(TextBox4)
TxtBoxColl.Add(TextBox5)
TxtBoxColl.Add(TextBox6)
TxtBoxColl.Add(TextBox7)
TxtBoxColl.Add(TextBox8)
TxtBoxColl.Add(TextBox9)
TxtBoxColl.Add(TextBox10)

Dim tmp As TextBox
For i As Integer = 1 To TxtBoxColl.Count
        tmp = TxtBoxColl(i)
        tmp.Text = tmp.Name
Next

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

zazsze · Answer

Merci mais trop compliqué pour moi, je repaserai une autre fois car je ne veux pas polluer le forum
Salut

Convertion vb6 vers vb 2005 express

4 réponses

Votre réponse

Discussions similaires