begin process at 2010 03 21 11:47:50
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Control

 > INPUTBOX PERSONNALISABLE AVEC LE CODE SOURCE VB

INPUTBOX PERSONNALISABLE AVEC LE CODE SOURCE VB


 Information sur la source

Note :
10 / 10 - par 1 personne
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Control Source .NET ( DotNet ) Classé sous :InputBox, InputBoxPerso, MsgBox, MessageBox, Personnaliser Niveau :Débutant Date de création :02/05/2009 Vu / téléchargé :3 276 / 368

Auteur : Patrice99

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note


 Description

Voici une boite de dialogue (qui fonctionne à peu près comme le InputBox classique, sauf le retour de la saisie) que l'on peut personnaliser. D'après la source en C# :
www.codeproject.com/KB/edit/InputBox.aspx
Conver tie via :
www.developerfusion.com/tools/convert/csharp-to- vb

Dans le InputBox classique, le seul moyen (à ma connaissance) de savoir si on a cliqué sur Annuler est de voir si la chaîne de retour est vide, tandis qu'ici, on distingue les 2 cas.

J'ai fait un exemple de personnalisation de la boite de dialogue par le choix supplémentaire d'un type quelconque à effectuer (type 1 ou type 2 par exemple).


 Conclusion

Le 1er problème, c'est que, comme avec la source d'origine en C#, les contrôles sont créés dynamiquement, on ne les voit pas dans le désigneur de Visual Studio, ce qui n'est pas pratique (on est obligé de créer des contrôles à part dans une feuille puis de copier/coller le code source, et il faut ajuster la position des contrôles).

Le second problème, c'est que du coup, pour faire une personnalisation du code, c'est plus simple de dupliquer le code source. L'idéal serait de faire un héritage en POO pour ne modifier que ce qui est nécessaire (mais ce n'est pas sûr que cela en vaille le coup pour un code aussi simple) : si quelqu'un a une meilleure solution que la mienne, je suis preneur (j'ai du aller vite sur cette source ; je pense qu'il devrait être possible de partir d'une feuille normale, avec quand même un appel depuis un shared sub, ou sinon tant pis pour le shared sub, un new InputBoxPerso fera l'affaire à l'usage ; repartir de zéro serait le plus simple ?).

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source .NET (Dotnet) CRÉER UN VRAI OCX EN DOTNET
Source avec Zip Source avec une capture Source .NET (Dotnet) EXCELDOTNET : PROGRAMMER EXCEL EN DOTNET SANS VBA NI VSTO
Source avec Zip VBFACTURATION : LE CODE LE + SIMPLE POSSIBLE EN VBA POUR GÉR...
Source avec Zip Source avec une capture Source .NET (Dotnet) TRADUCTEUR GOOGLE : INTERFACE WINFORM POUR LE SERVICE DE TRA...
Source avec Zip ANALYSE SPECTRALE SOUS EXCEL (TFR OU FFT)

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) OUVRIR UNE BASE DE DONNÉES DANS PLUSIEURS DATAGRIDVIEW DANS ... par PHILOUVB
Source .NET (Dotnet) CONTROLS PERSONALISÉ TEXTBOX par rodcobalt22
Source avec une capture Source .NET (Dotnet) CREATION DE CONTROLS DYNAMIQUE + DEPLACEMENT ET REDIMENTION ... par tresorsdevie
Source avec Zip Source avec une capture USERCONTROL AVEC PROPERTIES PERSONALISABLE par Polack77
Source avec Zip Source avec une capture BOUTON UP_DOWN par epson1

 Sources en rapport avec celle ci

Source avec Zip TRADUCTEUR DE CONTROL, INPUTBOX ET MSGBOX par FrankyPotvin
Source avec Zip Source avec une capture Source .NET (Dotnet) MESSAGEBOX D'ERREUR COMPLET par NHenry
Source avec Zip ERROR MESSAGE : ENVOYER DES MESSAGE D'ERREUR EN MSGBOX AVEC ... par Alucard49000
[ASTUCE] MESSAGEBOX QUI N'ARRETE PAS LE PROCESSUS COURANT par econs
Source avec Zip .: IMAGE DANS MSGBOX :: TRAFFICOTAGE RIGOLO :. par Alain Proviste

Commentaires et avis

Commentaire de Londonic le 04/05/2009 09:29:54 10/10

Formidable! Pourquoi se casser la tête a dessiner des formulaires quand on a de tels outils ? Il faudra inventer une forme d'analyse des charges à base de choix dichotomiques courants (input1) et de cas numérisés (input2). On y développerait rapidement les primitives et ça laisserait plus de temps pour le visuel qu'on a trop tendance à bacler depuis que ca se développe avec des glisser/coller.
- En tout cas merci, c'est le genre d'objet qu'on remet toujours à plus tard, comme la configuration. Je regrettais mon impasse et je peux tourner la page.
Merci encore.

Commentaire de Patrice99 le 04/05/2009 09:59:55

Merci. C'est vrai que ça fait un moment que j'avais aussi besoin de ce bout de code réutilisable, qui évite de faire un formulaire dédié, et qui s'utilise aussi simplement que le InputBox d'origine. Reste quand même les 2 petits problèmes évoqués mais peut être que quelqu'un apportera une solution.

Commentaire de Londonic le 04/05/2009 17:58:01

Peut-être le quelqu'un en profitera pour mettre aussi la "MessageBox" dans la boite à outils
A+

Commentaire de Patrice99 le 14/09/2009 11:48:24

Des jolis MessageBox en C# ici :
www.codeproject.com/KB/vista/Vista_TaskDialog_Wrapper.aspx

Commentaire de Londonic le 14/09/2009 16:17:27


'Rem J'aimerais bien retrouver le code ou j'ai pompé ce truc, mais ça marche.

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class toto
    Inherits System.Windows.Forms.UserControl


    Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser
    'Requise par le Concepteur Windows Form
    Private components As System.ComponentModel.IContainer
    'Form remplace la méthode Dispose pour nettoyer la liste des composants.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.WebBrowser1 = New System.Windows.Forms.WebBrowser
        Me.SuspendLayout()
        '
        'WebBrowser1
        '
        Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.WebBrowser1.Location = New System.Drawing.Point(0, 0)
        Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
        Me.WebBrowser1.Name = "WebBrowser1"
        Me.WebBrowser1.Size = New System.Drawing.Size(284, 264)
        Me.WebBrowser1.TabIndex = 0
        '
        'toto
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.Controls.Add(Me.WebBrowser1)
        Me.Name = "toto"
        Me.Size = New System.Drawing.Size(284, 264)
        Me.ResumeLayout(False)

    End Sub


End Class



Public Class toto


    Sub New()
        InitializeComponent()
        WebBrowser1.Navigate("http://bt.my.yahoo.com/")
    End Sub

End Class

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

msgbox et inputbox [ par xvr232 ] Slt!Comment faire pour afficher une msgbox ou une inputbox et garder la feuille active? (la msgbox est visible, mais les clics sur les objets de la fe Renvoyer une valeur dans un MsgBox [ par Vbsupernul ] Voilà, c'est un truc tout con, je voudrais savoir comment renvoyer la valeur d'un InputBox, du styleage=InputBox("Veuillez entrer votre age") MsgBox(" msgbox et inputbox [ par kscm ] Pourquoi la forme active est elle masquée lors de l'apparition d'un msgbox ou inputbox ?Merci d'avance Changer le style d'un MSGBOX et INPUTBOX [ par algo69 ] Y a t-il un moyen de changer la forme ou le style d'une boite de dialogue Inputbox et msgbox (couleur, longueur etc...)?Merci saisie inputbox vers msgbox [ par developvbdebut ] Bonjour tout le monde!J'ai réalisé une saisie d'information avec inputbox, la réponse de la saisie apparaitra dans le msgbox.Voicie le code ci-dessous TextBox, inputBox, msgBox...mâle ou femelle?? [ par binette1er ] Bonjour, Une p'tite question d'orthographe (et oui..c'est utile ausssi!!)les objets textBox, listbox,msgBox, comboBox ont ils un genre défini??parce q paramétrer les boutons des inputbox et msgbox [ par soklouise ] Comment faire pour personnaliser des boutons des inputbox ou msgbox, c'est à dire pouvoir changer les caption des boutons.Par exemple au lieu d'affich messagebox erreur ou mise en garde [ par Daydayer ] je sais comment cr&#233;er une msgbox simple (avec le bouton ok&nbsp;etc) mais jevoudrais savoir qu'est ce qu'il faut faire pour avoir une msgbox&nbsp Personalisation des msgbox/inputbox [ par boudzz ] Bonjour, J'ai lu de nombreux propos &#224; ce sujet mais je reste dans l'impasse. En effet, comme le sujet l'indique, je cherche &#224; personaliser Gestion de l'affichage d'un messageBox [ par ricomiracle ] Bonjour, Je d&#233;veloppe sous VB6 un outil utilisant MsOffice (automation) et j'ai un probl&#232;me: lorsque j'affiche des msgbox, je ne les vois pa


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,406 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales