[résolu] VB.NET ...

VB.NET ... [résolu] - VB/VBA/VBS - Programmation

Marsh Posté le 19-04-2005 à 02:11:03    

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
Reply

Marsh Posté le 19-04-2005 à 02:11:03   

Reply

Marsh Posté le 19-04-2005 à 17:51:15    

up

Reply

Marsh Posté le 19-04-2005 à 18:20:25    

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

Reply

Marsh Posté le 19-04-2005 à 18:46:17    

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

Reply

Marsh Posté le 19-04-2005 à 20:49:46    

UP

Reply

Marsh Posté le 19-04-2005 à 21:41:41    

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 :
  1. Public Class Form1
  2.     Inherits System.Windows.Forms.Form
  4.     Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
  5.         Dim Frm As New Form3
  6.         Frm.FormParent = Me
  7.         Label1.Enabled = False
  8.         Frm.ShowDialog()
  9.     End Sub
  11. End Class


 

Code :
  1. Public Class Form3
  2.     Inherits System.Windows.Forms.Form
  4.     Private frmParent As Form1
  6.     Public Property FormParent() As Form1
  7.         Get
  8.             Return frmParent
  9.         End Get
  10.         Set(ByVal Value As Form1)
  11.             frmParent = Value
  12.         End Set
  13.     End Property
  15.     Private Sub Form3_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
  16.         frmParent.Label1.Enabled = True
  17.     End Sub
  19. End Class


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

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

Marsh Posté le 20-04-2005 à 19:43:15    

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?

Reply

Marsh Posté le 20-04-2005 à 19:45:54    

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


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

Marsh Posté le 20-04-2005 à 20:11:35    

Process.Start("fichier.exe" )


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

Marsh Posté le 20-04-2005 à 20:26:05    

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 :
  1. Dim reader As StreamReader = New StreamReader("c:\\fich.txt" )
  2. TextBox.Text = reader.ReadToEnd()
  3. 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 :
  1. Dim reader As StreamReader = New StreamReader("c:\\fich.txt", Encoding.GetEncoding("iso-8859-1" ))
  2. TextBox.Text = reader.ReadToEnd()
  3. reader.Close()


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

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

Marsh Posté le 20-04-2005 à 20:26:05   

Reply

Marsh Posté le 20-04-2005 à 20:46:26    

Code :
  1. 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
Reply

Marsh Posté le 20-04-2005 à 21:07:07    

rajoute un

Code :
  1. Imports System.Text


au début de ton programme


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

Marsh Posté le 20-04-2005 à 21:40:15    

un grand merci!


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

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed