AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 01 07 20:31:17
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

N° DE LIGNE COURANTE DANS UN TEXTBOX


Information sur la source

Catégorie :Formulaire Classé sous : numéro, ligne, textbox Niveau : Débutant Date de création : 16/10/1999 Vu : 3 170
Auteur : Nix Site perso
Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Note :
6,67 / 10 - par 3 personnes
6,67 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (0)
Ajouter un commentaire et/ou une note

Description

Faites un Form(Form1) avec 1 TextBox(TextBox1) et un Bouton(Command1)

 

Source

  • Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
  • Private Const EM_LIGNECOURANTE = &HC9
  • Private Sub Command1_Click()
  • MsgBox ("Ligne en cours : " & SendMessageLong(TextBox1.hwnd, EM_LIGNECOURANTE, -1&, 0&) + 1)
  • End Sub 
Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Const EM_LIGNECOURANTE = &HC9

Private Sub Command1_Click()
    MsgBox ("Ligne en cours : " & SendMessageLong(TextBox1.hwnd, EM_LIGNECOURANTE, -1&, 0&) + 1)
End Sub

Commentaires et avis

Aucun commentaire pour le moment.

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Créer des masques [ par Thibault ] A partir d'un fichier texte Ascii disposé précisément de cette manière :**************************************# Ligne de texte 1 <- 1 textB Transférer une listview dans une textbox HEEEEELP !!!! [ par Phil ] Je craque !! voilà plusieurs jours que je cherche comment ouvrir une listview dans un fichier *.txt, en fait j'ai trouvé un module qui le fait mais ma [8D] RETOUR A LA LIGNE DANS UNE TEXTBOX MULTILINE [ par superbilldick ] Comment faire un retour a la ligne dans une textbox multiligne ?j'essayé de faireTxtMachin = "blablablabla" & Chr(13) & "blablablabla"mais au lieu de Lire un TEXTBOX [ par pedro ] Salut à tous.Comment lire dans un TEXTBOX ligne par ligne. J'aimerais que le programme lise chaque ligne et qu'il me le mette dans un tableau.(Tab[i]) supprimer une ligne précise d'un textbox [ par alfonce ] Salut!Je cherche comment supprimer la ligne 5 d'un textbox multiline. Pourriez vous m'envoyer la commande complète, je ne suis pas vraiment connaissan AU SECOURS !!!!!!!!!!!! Comment insérer un caractèrede saut de ligne dans un textbox [ par PLUTONIUM ] ARGHHHHHHHComment faire en sorte que mon textbox saute un ligne en cliquant sur un bouton par exemple, ou dans une boucle ??Merci d'avance@+ Retour à la ligne dans un textbox [ par eltaris ] J'ai ma textbox avec l'option multiligne à Vrai.Je vais lire des phrases dans un fichier que je recopie dans ma textbox, et quand je rajoutes chr(10) lire texte dans un textbox [ par jraynald ] Comment lire un texte dans un textbox ligne par ligne? problème de ligne dans un textbox [ par queue ] J'aimerais savoir comment faire pour enlever la dernière ligne d'un textbox si celle-ci est vide.. merci (une demarche complete s'il vous plait je sui suprimer la promiere ligne d'un textbox [ par Zmasteur ] comment faire pour suprimmer la promière ligne d'un textbox ?


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,546 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.