vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

In diesem Forum haben Sie die Möglichkeit Kommentare, Fragen und Verbesserungsvorschläge zu den im vb@rchiv gelisteten Tipps und Workshops zu posten.

Hinweis:
Ein neues Thema kann immer nur über die jeweilige Tipps & Tricks bzw. Workshop Seite eröffnet werden!

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fragen zu Tipps & Tricks und Workshops im vb@rchiv
Tipp 2007: Value durch Mausklick auf ProgressBar bestimmen 
Autor: jvbsl
 Tipp anzeigenDatum: 06.05.09 14:09

Hallo,

ich habe einen kleinen Verbesserungsvorschlag:
' Setz den Wert der ProgressBar bei Mausklick 
' anhand der aktuellen Mauskoordinaten
Private Sub SetValue(ByVal ProgressBar As ProgressBar)
  With ProgressBar
    Dim px As Integer = Me.PointToScreen(.Location).X
    Dim x As Integer = MousePosition.X - px
    Dim value As Integer = (x / .Width * .Maximum) '####Hier wurde 100 mit 
    ' .Maximum vertauscht####
 
    .Value = value
  End With
End Sub
dies funktioniert dann auch wenn Maximum einen anderen Wert als 100 hat...

Gruß jvbsl
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Tipp 2007: Value durch Mausklick auf ProgressBar bestimmen4.197jvbsl06.05.09 14:09
Re: Value durch Mausklick auf ProgressBar bestimmen1.827ModeratorDieter08.05.09 07:54
Re: Value durch Mausklick auf ProgressBar bestimmen1.492Caddy09.04.11 10:51

Sie sind nicht angemeldet!
Um einen neuen Beitrag schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel