Contrôle TextBox pour les utilisateurs de Visual Basic 6.0
Mise à jour : novembre 2007
Le contrôle TextBox de Visual Basic 6.0 est remplacé par le contrôle Windows Forms TextBox dans Visual Basic 2008. Les noms de certains événements, propriétés, méthodes et constantes ont changé. En outre, dans certains cas, leur comportement est également différent.
Différences conceptuelles
Dans Visual Basic 6.0, la propriété MaxLength détermine le nombre des caractères qui peuvent être entrés dans un contrôle TextBox. Si vous essayez d'insérer du texte par programme, le texte sera tronqué à la longueur spécifiée par la propriété MaxLength.
Dans Visual Basic 2008, le comportement de la propriété MaxLength ne s'applique plus au texte qui est ajouté par programme. Pour dupliquer le comportement de Visual Basic 6.0, vous devez tronquer la chaîne vous-même.
Dans Visual Basic 6.0, la propriété PasswordChar est de type String ; dans Visual Basic 2008, elle est de type Char.
De plus, de nombreuses différences conceptuelles s'appliquent à tous les contrôles, y compris des différences relatives à la liaison de données, la gestion des polices, les opérations de glisser-déplacer, la prise en charge de l'aide, etc. Pour plus d'informations, consultez Concepts Windows Forms pour les utilisateurs de Visual Basic 6.0.
Modifications du code du contrôle TextBox
Les exemples ci-dessous illustrent les différences entre les techniques de codage dans Visual Basic 6.0 et dans Visual Basic 2008.
Modifications du code pour la recherche dans un contrôle TextBox
Le code suivant montre comment rechercher une chaîne dans un contrôle TextBox et la mettre en surbrillance.
' Visual Basic 6.0
Private Sub Form_Load ()
Text1.Text = "Two of the peak human experiences"
Text1.Text = Text1.Text & " are good food and classical music."
End Sub
Private Sub Form_Click ()
Dim Search, Where
' Get search string from user.
Search = InputBox("Enter text to be found:")
' Find string in text.
Where = InStr(Text1.Text, Search)
If Where Then
Text1.SetFocus
Text1.SelStart = Where - 1
Text1.SelLength = Len(Search)
Else
MsgBox "String not found."
End If
End Sub
' Visual Basic
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles MyBase.Load
TextBox1.Text = "Two of the peak human experiences are "
TextBox1.Text = TextBox1.Text & "good food and classical music."
End Sub
Private Sub Form1_Click(ByVal sender As Object, ByVal e As _
System.EventArgs) Handles Me.Click
Dim Search As String
Dim Where As String
' Get search string from user.
Search = InputBox("Enter text to be found:")
' Find string in text.
Where = InStr(TextBox1.Text, Search)
If Where Then
TextBox1.Focus()
TextBox1.SelectionStart = Where - 1
TextBox1.SelectionLength = Len(Search)
Else
MsgBox("String not found.")
End If
End Sub
Modifications du code pour limiter le nombre de caractères dans un contrôle TextBox
Le code suivant montre comment utiliser la propriété MaxLength pour spécifier un nombre maximal de caractères.
' Visual Basic 6.0
Private Sub Form_Load()
Text1.MaxLength = 5
End Sub
Private Sub SetText()
' Only the first five characters will be displayed.
Text1.Text = "Hello World"
End Sub
' Visual Basic
Private Sub Form1_Load2(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles MyBase.Load
TextBox1.MaxLength = 5
End Sub
Private Sub SetText()
' Truncate the string to equal MaxLength.
TextBox1.Text = Strings.Left("Hello World", TextBox1.MaxLength)
End Sub
Équivalences des propriétés, méthodes et événements du contrôle TextBox
Les tableaux ci-dessous répertorient les propriétés, les méthodes et les événements de Visual Basic 6.0, ainsi que leurs équivalents dans Visual Basic 2008. Ces propriétés, méthodes et événements qui ont les mêmes nom et comportement ne sont pas répertoriés. Sauf indication contraire, toutes les énumérations Visual Basic 2008 sont mappées à l'espace de noms System.Windows.Forms.
Ce tableau fournit des liens vers les rubriques qui expliquent des différences de comportement. Lorsqu'il n'existe pas d'équivalent direct dans Visual Basic 2008, des liens vous renvoient vers des rubriques proposant des alternatives.
Propriétés
Visual Basic 6.0 |
Équivalent Visual Basic 2008 |
||
---|---|---|---|
Alignment |
|||
Appearance |
Nouvelle implémentation. Pour plus d'informations, consultez Propriétés Appearance et BorderStyle pour les utilisateurs de Visual Basic 6.0. |
||
BackColor |
|
||
Container |
|||
DataChanged DataField DataFormat DataMember DataSource |
Nouvelle implémentation. Pour plus d'informations, consultez Accès aux données pour les utilisateurs de Visual Basic 6.0. |
||
DragIcon DragMode |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
||
Font FontBold FontItalic FontName FontSize FontStrikethrough FontUnderline |
|
||
ForeColor |
|
||
Height |
|
||
HelpContextID |
Nouvelle implémentation. Pour plus d'informations, consultez Prise en charge de l'aide pour les utilisateurs de Visual Basic 6.0. |
||
HWnd |
|||
Index |
Nouvelle implémentation. Pour plus d'informations, consultez Tableaux de contrôles pour les utilisateurs de Visual Basic 6.0. |
||
Left |
|
||
LinkItem LinkMode LinkTimeOut LinkTopic |
Nouvelle implémentation. Pour plus d'informations, consultez Échange dynamique de données pour les utilisateurs de Visual Basic 6.0. |
||
Locked |
|||
MouseIcon |
Nouvelle implémentation. Pour plus d'informations, consultez Impossible de définir un pointeur de souris personnalisé. |
||
MousePointer |
Pour obtenir la liste des constantes, consultez MousePointer pour les utilisateurs de Visual Basic 6.0. |
||
OLEDragMode OLEDropMode |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
||
Parent |
Méthode FindForm. |
||
SelLength |
|||
SelStart |
|||
SelText |
|||
ToolTipText |
Composant ToolTip. Pour plus d'informations, consultez Prise en charge des info-bulles pour les utilisateurs de Visual Basic 6.0. |
||
Top |
|
||
WhatsThisHelpID |
Nouvelle implémentation. Pour plus d'informations, consultez Prise en charge de l'aide pour les utilisateurs de Visual Basic 6.0. |
||
Width |
|
Méthodes
Visual Basic 6.0 |
Équivalent Visual Basic 2008 |
||
---|---|---|---|
Drag |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
||
LinkExecute LinkPoke LinkRequest LinkSend |
Nouvelle implémentation. Pour plus d'informations, consultez Échange dynamique de données pour les utilisateurs de Visual Basic 6.0. |
||
Move |
|
||
OLEDrag |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
||
SetFocus |
|||
ShowWhatsThis |
Nouvelle implémentation. Pour plus d'informations, consultez Prise en charge de l'aide pour les utilisateurs de Visual Basic 6.0. |
||
ZOrder |
Fonction BringToFront ou SendToBack |
Événements
Visual Basic 6.0 |
Équivalent Visual Basic 2008 |
---|---|
Change |
|
DblClick |
|
DragDrop DragOver |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
GotFocus |
|
LinkClose LinkError LinkNotify LinkOpen |
Nouvelle implémentation. Pour plus d'informations, consultez Échange dynamique de données pour les utilisateurs de Visual Basic 6.0. |
LostFocus |
|
OLECompleteDrag OLEDragDrop OLEDragOver OLEGiveFeedback OLESetData OLEStartDrag |
Nouvelle implémentation. Pour plus d'informations, consultez Fonction de glisser-déplacer pour les utilisateurs de Visual Basic 6.0. |
Validate |
Mettre à niveau des remarques
Lorsqu'une application Visual Basic 6.0 est mise à niveau vers Visual Basic 2008, tous les contrôles TextBox sont mis à niveau vers des contrôles Windows Forms TextBox, et les propriétés, méthodes et événements sont mis à niveau vers leurs équivalents. Des commentaires de mise à niveau sont insérés dans le code aux endroits où des différences de comportement sont susceptibles de se produire.