Votre clavier ne possède pas de voyant lumineux pour vous indiquer si les touches Verrouillage Majuscule (Caps Lock en anglais), pour saisir du texte en... Lire la suite
Salut tout le monde ! Dans cette forme (Accueil), vous servira de passer de form 1 à form 2 avec les codes sources ci-dessous ! ... ... Lire la suite
... ... Lire la suite
Salut à tous, Pour un petit programme, j'ai eu besoin d'utiliser les touches du curseur... avec des combinaisons Haut-droite, Haut-gauche etc...... Lire la suite
Bonjour, La fonction ci-dessous retourne une couleur au hasard en entrant : 1-La couleur... Lire la suite
Bonjour à tous ! J'ai cherché sur le Net comment trier une ListBox en ordre décroissant. Plein de propositions mais pas toujours simples J'ai... Lire la suite
'Bonjour, 'Ci-dessous une méthode pour enregistrer toutes les options cochées ou sélectionnées par l'utilisateur : 'tous les controles... Lire la suite
Dans le texbox: ... ... Cette fonction vérifie qu'il n'y a pas plusieurs fois la virgule ou le point 100% fonctionnel. ... ... Lire la suite
Description de la source Création d'un contour de fenêtre personnalisable avec coins arrondis, nouvelle couleur de fond, et déplaçable à souhait. Code... Lire la suite
Module Module1 Sub Main() calcul() Console.WriteLine("Appuyer sur la touche > pour sortir") Console.Read() End End Sub Private Sub calcul() Dim i, d, m As... Lire la suite
Module Module1 Dim niv(3) As Short Sub Main() Dim en As Char Dim n As Short Console.Write("Donnez le nombre de disques ") n Console.ReadLine... Lire la suite
Module Module1 Sub Main() Dim NombreDec, NombreRom As String Console.Write("Tapez votre nombre entier: ") NombreDec Console.ReadLine If NombreDec... Lire la suite
Module Module1 Sub Main() Dim n() As String {"do", "do#", "ré", "ré#", "mi", "fa", "fa#", "sol", "sol#", "la", "la#", "si", "do"} Dim i As Integer For i 1... Lire la suite
Imports System.Math Module Module1 Sub Main() Dim Nb As String Dim i, j, np, n As Integer Console.Write("Entrez votre valeur : ") Nb Console.ReadLine If Nb... Lire la suite
Module Module1 Sub Main() matrice() Console.WriteLine("Appuyez sur la touche 'Entrée' pour sortir") Console.Read() End Sub Private Sub matrice()... Lire la suite
en vb.net il n'existe pas de valeur itemdata ce petit bout de code y remedie. allez dans la procédure listbox_removeitem(ByVal sender As Object, ByVal... Lire la suite
Dim pptPre As PowerPoint.Presentation Feuil4.Range("D1:G1").CopyPicture pptPre.Slides(1).Shapes.Paste.Name "Legende" With pptPre.Slides(1).Shapes("Legende")... Lire la suite
La méthode VBA Specialcells applicable à un objet Range de Excel est utile et très pratique. Elle a cependant une limite gênante : elle ne peut recenser... Lire la suite