[résolu] VB.NET ...

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [résolu] VB.NET ...

4in

hello

voila sur la form1 se trouve un button1

lorsqu'on clique button1
-> ça ouvre une form2
-> et désactive button1

comment faire pour que lorsque je ferme form2 -> ça réactive button1 ?

ou sinon comment faire pour que le focus reste obligatoirement sur form2 tant que celle-ci n'est pas fermée?

merci

P.S. je ne suis pas informaticienne

Message édité par #SubZero le 21-04-2005 à 14:57:29

Publicité

4in

FlorentG

Unité de Masse

1) Dans l'évènement Close de la form, tu réactive le button1
2) Faut l'ouvrir avec ShowDialog

4in

c'est ce que j'ai tenté de faire hier
mais le bouton en question qui est en fait un label dans mon code "label1" est déclaré dans la class Form1

et inconnu non reconnu dans la Form3 (voir ci-dessous en rouge)
----------------------------------------------------------------

Public Class Form1
Inherits System.Windows.Forms.For

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

Dim frm As New Form3
frm.Show()

Label1.Enabled() = False 'je désactive le label dès le 1er click (ça marche)
End Sub
End Class

Public Class Form3
Private Sub Form3_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
Label1.Enabled() = True '-> erreur de compil: label1 not declared!
End Sub
End Class

4in

Harkonnen

Modérateur
Un modo pour les bannir tous

utilise les balises cpp et /cpp pour afficher le code stp, au lieu d'utiliser de la couleur. c'est fait pour ça et c'est bien plus lisible

pour ton cas, le mieux est de faire mumuse avec les propriétés.

Code :

Public Class Form1
Inherits System.Windows.Forms.Form
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
Dim Frm As New Form3
Frm.FormParent = Me
Label1.Enabled = False
Frm.ShowDialog()
End Sub
End Class

Code :

Public Class Form3
Inherits System.Windows.Forms.Form
Private frmParent As Form1
Public Property FormParent() As Form1
Get
Return frmParent
End Get
Set(ByVal Value As Form1)
frmParent = Value
End Set
End Property
Private Sub Form3_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
frmParent.Label1.Enabled = True
End Sub
End Class

Message édité par Harkonnen le 19-04-2005 à 21:59:25

---------------
J'ai un string dans l'array (Paris Hilton)

4in

ok merci!!!

t'inquiète pas je vais pas vvous embetez longtemps avec mes pb en VB, je fais pas mumuse, j'ai juste un ptit truc à présenter et après terminé..

sinon j'ai une question: les fichiers textes que je fais afficher dans une textbox, contiennent des lettres accentuées or celles-ci n'apparaissent pas dans la textbox!

-> y a t il un paramètrage à effectuer pour corriger ça svp?

4in

comment lancer un fichier.exe depuis un programme VB.net svp?

Message édité par #SubZero le 21-04-2005 à 14:53:16

Harkonnen

Modérateur
Un modo pour les bannir tous

Process.Start("fichier.exe" )

---------------
J'ai un string dans l'array (Paris Hilton)

Harkonnen

Modérateur
Un modo pour les bannir tous

4in a écrit :

sinon j'ai une question: les fichiers textes que je fais afficher dans une textbox, contiennent des lettres accentuées or celles-ci n'apparaissent pas dans la textbox!

-> y a t il un paramètrage à effectuer pour corriger ça svp?

je suppose que tu utilises le code que je t'ai donné dans un topic précédent pour lire ton fichier texte :

Code :

Dim reader As StreamReader = New StreamReader("c:\\fich.txt" )
TextBox.Text = reader.ReadToEnd()
reader.Close()

Pour lire les caractère accentués, tu dois spécifier l'encodage des caractères de ton streamreader (iso-8859-1 par exemple) :

Code :

Dim reader As StreamReader = New StreamReader("c:\\fich.txt", Encoding.GetEncoding("iso-8859-1" ))
TextBox.Text = reader.ReadToEnd()
reader.Close()

Message édité par Harkonnen le 20-04-2005 à 20:27:35

---------------
J'ai un string dans l'array (Paris Hilton)

Publicité

4in

Code :

Dim reader As StreamReader = New StreamReader("c:\\fich.txt", Encoding.GetEncoding("iso-8859-1" ))

encoding not declared :??:

Message édité par #SubZero le 20-04-2005 à 20:46:48

Harkonnen

Modérateur
Un modo pour les bannir tous

rajoute un

Code :

Imports System.Text

au début de ton programme

---------------
J'ai un string dans l'array (Paris Hilton)

4in

un grand merci!

Message édité par #SubZero le 20-04-2005 à 21:40:24

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[résolu] VB.NET ...

Sujets relatifs
Quel est ce langage ? -- RESOLU --	[php/js] recuperer une variable js dans une popup -=resolu=-
[VB .NET] Empaquetage - création de setup	Acces 2003 et vb.Net
lecture/écriture binaire (depuis URL) [Résolu]	[JAVA]Pb retour variable... [Résolu]
[resolu][MYSQL] CREATE VIEW ???	[C] Stocker une valeur entière dans un char * [Résolu]
taille d'une chaine de caratere? [RESOLU]	[RESOLU] - Superposer 2 Div en position:relative ?
Plus de sujets relatifs à : [résolu] VB.NET ...

Page générée en 0.083 secondes