High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Accueil
Forum Codes-Sources
Visual Basic
Sujet Précédent
Sujet Suivant
Listbox comme une grille dans exell
petiflamand
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
- 24 janv. 2005 à 23:17
cqui789
Messages postés
261
Date d'inscription
jeudi 13 janvier 2005
Statut
Membre
Dernière intervention
18 mai 2009
-
25 janv. 2005 à 01:25
Est-il possible de faire une forme avec dedans
une grilles comme dans exell
c'est a dire
une premiere ligne avec 4 case ou plus et que chaque case soit indepandant
exactement comma dans exell
Merci
Afficher la suite
A voir également:
Listbox comme une grille dans exell
Grille affichage
✓
-
Forum C / C++ / C++.NET
Grille morpion vierge
-
Forum Java
Listbox vba
✓
-
Forum VBA Office (Excel, Word ...)
Grille sudoku vierge word
-
Forum VBA Office (Excel, Word ...)
Grille lotto
-
Forum VB.NET
1
réponse
Réponse 1 / 1
cqui789
Messages postés
261
Date d'inscription
jeudi 13 janvier 2005
Statut
Membre
Dernière intervention
18 mai 2009
3
25 janv. 2005 à 01:25
a mon avis, il faut faire un tableau de textbox
si tu as une form avec une textbox text1 dont l'index est a 0
le suivant charge au demarrage une grille de 15 cases
amuse toi bien avec le reste du programme
Option Explicit
Dim Largeur As Integer, Hauteur As Integer
Private Sub Form_Load()
Dim a As Integer, b As Integer, i As Integer
i = 0
Largeur = 5
Hauteur = 3
For a = 0 To Largeur - 1
For b = 0 To Hauteur - 1
If i > 0 Then
Load Text1(i)
With Text1(i)
.Left = Text1(0).Left + Text1(0).Width * a
.Top = Text1(0).Top + Text1(0).Height * b
.Visible = True
.Enabled = True
End With
End If
i = i + 1
Next
Next
End Sub
Rejoignez-nous
A voir également
Listbox
Récupérer les données d'une listbox vba
Listbox delphi
Vba sort listbox
Grille isométrique