effacer textbox a l'ouverture de la form et petite question sur Base de Données.Résolu

Question

Bonjour tout le monde J'ai un probleme, j'ai fais un prog qui permet d'envoyer un mail et et de l'enregistrer dans une base de données ACESS. Je les fais en 2 form La premiere pour envoyer le mail et l'enregitrer si l'utilisateur le veut. La seconde form c'est pour visualiser les données enregistrer. Ca fonctionne tres bien, mai le probleme et que l'orsque j'ouvre la premiere form les deerniers données enregistré saffiche. donc, j'ai fais le code ci-dessous, mais ca ne fontionne pas Je veux cas l'ouverture de la form rien ne s'afficha dans les textBox. Private Sub Form_load() Dim remply As String remply "txtto.Text "" , objet.Text = "", Text1.Text = "" " If remply Then txtto.Text = "" txtto.SetFocus objet.Text = "" objet.SetFocus Text1.Text = "" Text1.SetFocus End If Je vais instraler mon prog sur d'autre ordinateur et je voudrais savoir me faudra t'il un fichier pour l'utilisation de la table ACCESS sur d'autre ordinateur. Mercie d'avance pour vos conseil. Cordiallement A bientôt

valtrase · Accepted Answer

Re,
B&#233; si tu utilises un controle Data ou Adoc sur ta form VB6 par exemple tu n'a besoin de rien de plus pour acc&#233;der aux donn&#233;es de ta base de donn&#233;e.

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

jpleroisse · Answer

C'est ta variable remply qui bloque, en plus tu ne peux pas donner le focus &#224; plusieur TxtBox en m&#234;me temps.

Private Sub Form_Load()
txtto.Text = ""
txtto.SetFocus
objet.Text = ""
Text1.Text = ""
End Sub

jpleroisse

valtrase · Answer

Salut,
Tu peux mettre ceci dans l'&#233;venement FormLoad de ta form
 
Dim Mycontrol As Object 




For Each Mycontrol In Me.Controls 


  If TypeName (Mycontrol) "TextBox" Then Mycontrol.Text "" 


Next 

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

developvbdebut · Answer

Bonjour tout le monde

j'espere que vous avez bien dormi

mercie valtrase ca marche.

Personne n'a de reponse concernant ma derniere question ci dessous?

"Je vais instraler mon prog sur d'autre ordinateur et je voudrais savoir me faudra 
t'il un fichier pour l'utilisation de la table ACCESS sur d'autre ordinateur."

Mercie.

Cordiallement

A bient&#244;t

developvbdebut · Answer

Rebonjour tout le monde

Merci de votre aide

Cordiallement

A bient&#244;t

Effacer textbox a l'ouverture de la form et petite question sur Base de Données.

5 réponses

Discussions similaires