Suchergebnisse

Suchergebnisse 1-30 von insgesamt 33.

  • Benutzer-Avatarbild

    Es geht mir um die selbsterstellen Subs und Functions, die evtl. in Moduln sich befinden mit der Aufrufform: Public Sub derName(Parameter) und Public Function derName(Parameter) As Type (statt Public kann es auch Private sein) D.h., am wichtigsten wäre mir eben eine Auflistung aller im Projekt verwendeten Prozeduren dieser Art, möglichst noch, in welchem Modul zu finden... Ja, ich meine die EreignisHandler.

  • Benutzer-Avatarbild

    Hallo zusammen, heute habe ich eine Frage zu VisualStudio 2022. Der Code im Editor wird ja an mehreren Stellen eingefärbt, was man in den Optionen individuell einstellen kann. Meine Fragen befassen sich damit, wie man kenntlich machen kann, welche selbsterstellten Subs und Functions im Code angewendet werden. 1. Gibt es via Optionen eine Möglichkeit, die Namen dieser Prozeduren mit einer bestimmten Farbe zu kennzeichnen? 2. Gibt es im VS eine Funktion, die alle Namen der im Projekt verwendeten S…

  • Benutzer-Avatarbild

    @Haudruff: Danke für den Tipp!! Hauthin Grüße - Dietrich

  • Benutzer-Avatarbild

    Nicht ganz. Die Einträge in der ListBox sind oft zu lang, als dass sie in der Listbox komplett angezeigt werden. Und WordWrap gibt es nicht und auch nicht Autoellipsis. Ein ToolTip soll den gesamten Text des Item anzeigen.

  • Benutzer-Avatarbild

    Hallo zusammen! Ich habe ein kleines Problem bei ToolTips für die Items einer ListBox. Der folgende Code zeigt, wie man einen Tooltip für jeden Item der Listbox erzeugen und bei MouseHover anzeigen kann. Das kleine Problem ist, dass man immer mit der Maus erst den Bereich der ListBox verlassen muss, um über einen anderen Item zu fahren, den entsprechenden ToolTip anzuzeigen. Vielleicht kann jemand hier eine Idee entwickeln, wie man den nächsten ToolTip anzeigen kann, wenn man die Maus eben über …

  • Benutzer-Avatarbild

    Hallo! Vielen Dank an alle Hinweis- und Tippgeber! Mittlerweile habe ich es gelöst. Ich habe via Designer für die Columns die DataGridViewCellStyle - Font Eigenschaft gesetzt. Dann kann ich für die Zellen der Spalte den Font mittels folgendem Code erhalten: Quellcode (7 Zeilen) Setzt allerdings voraus, dass die entsprechende Spalte einheitlichen Font zugewiesen bekommt. GRüße - Dietrich

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe auf meiner Form ein DatagridView namens DGV. Das habe ich via Eigenschaften sozusagen manuell formatiert, und zwar die CellDefault- Eigenschaften (BackColor, ForeColor und Font. Jetzt lese ich in meinem Programm eine Zeile des DGV eine Zeile Dim dr asDatGridViewRow ein mit dr = DGV.Rows(i) (i ist eine Laufvariable für die Zeilen des DGV). Dann folgender Code im Programm: Quellcode (6 Zeilen) 0 ist die erste Zelle der Zeile. Da habe ich folgenden Fall: cellFont ergibt imm…

  • Benutzer-Avatarbild

    Hallo zusammen, probieren geht über studieren: Quellcode (7 Zeilen) Jetzt erhalte ich in tt(0) den kompletten Filenamen Pfad,Name,Extension Mal sehen, welche der zwei Versionen (VaporiZed, Franky) ich für meinen weiteren Zweck verwende... Danke an alle Tipp-Geber! Grüße - Dietrich

  • Benutzer-Avatarbild

    @VaporiZed: Das habe ich probiert. Bei F2 oder Doppelclick wird nur der Dateiname selektiert, den man dann kopieren kann. Die Extension nicht. Und ja, diesen Dateinamen kann ich dann mit ClipBoard.Gettext auslesen. @Franky: Das habe ich auch probiert mit: Quellcode (7 Zeilen) Da wird allerdings kein Zweig der If-Anweisung erreicht... Gruß - Dietrich

  • Benutzer-Avatarbild

    Hallo: Also ich habe ne Spur. Es handelt sich darum, dass "normaler" Text funktioniert. Kopiere ich bspw. aus dem Explorer einen Filenamen mit Strg+C, wird er inkl. Pfad im Anzeige Programm angezeigt, aber mittels meines Codes GetText() nicht aus der Zwischenablage ausgelesen.... Ist das evtl. kein einfaches Textformat, das da in die Zwischenablage kopiert wird? Gruß - Dietrich

  • Benutzer-Avatarbild

    Die Textzeile bringe ich mit Strg+C in die Zwischenablage. Ich habe ein Zwischenablage-Anzeigeprogramm laufen - da wird der Text exakt angezeigt. Aber mein Code Dim t as String = ClipBoard.GetText() bringt stets leeren Text t = "", egal welchen Text ich in die Zwischenablage kopiere.

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe ein neues Projekt WinForms angefangen. Da gibt es auf der Form einen Button der bei Click ausführen soll Dim t as String = ClipBoard.GetText() In der Zwischenablage ist eine einfache Zeile Text, aber die Funktion bringt immer nur leeren Text zurück.... Vollkommen unklar. Woran kann das liegen? Grüße - Dietrich

  • Benutzer-Avatarbild

    Das ist OK. Ich sende nur Quellcode. Gruß - Dietrich Hallo Franky, anbei sende ich die Variante zu deinem Code wie ich sie zur Weiterverwendung in meinen Programmen benötige. Ich habe zunächst zur Demonstration dieser Variante eine Form im Einsatz frmAudioDevices mit dem Code gezeigt in Abschnitt 1. Auf der Form habe ich eine RichtextBox platziert txtOutPut mit DockStyle=Fill. Mit der Funktion DeviceEnumeration wird zweierlei erzeugt: Das Feld res() wird Kurzinformationen zu jedem Audiogerät im …

  • Benutzer-Avatarbild

    Mir wäre es lieber, den Code via Zip-File zur Verfügung zu stellen. Geht das auch irgendwie? Grüße - Dietrich

  • Benutzer-Avatarbild

    Wie macht man das mit einem Spoiler?

  • Benutzer-Avatarbild

    Habs hinbekommen!!! Ich danke dir für die Tipps und Hinweise!! Ich werde demnächst meine Programmversion hier einstellen. Ist das OK für dich? Grüße - Dietrich

  • Benutzer-Avatarbild

    Danke für deine Tipps, aber ich komme nicht wirklich klar damit. In deinen Code habe ich das jetzt folgendermaßen eingebaut: VB.NET-Quellcode (14 Zeilen) (outArt ist nur mein Ersatz für das einfache Debug.Print) Das funktioniert so aber nicht. Was heißt "nur die ID" MMDevice.GetID bringt einen String... (Ooops, wo kommt denn dieses Brainfuck her???) Code-Tags korrigiert. (Brainfuck kommt daher, dass die Forensoftware versucht, die Sprache zu erkennen, wenn man nur [code] anstatt z. B. [vbnet] ve…

  • Benutzer-Avatarbild

    Also ich habe hinter die Zeile For Device As UInteger = 0 To Devices - 1UI die Zeile Dim idd = MMDeviceEnumerator.GetDefaultAudioEndpoint(DATA_FLOW.Render, Role.Multimedia, MMDevice) gesetzt. Da ergibt sich aber bei jedem Gerät immer nur 0 ...

  • Benutzer-Avatarbild

    Hi, Franky, danke für deine Tipps. Leider habe ich doch ein Problem mit der Vervollständigung, respektive Aufruf der Funktion GetDefaultAudioEndpoint. Kenne C++ überhaupt nicht, weiß nicht, wie ich das auf VB übertragen kann... Ich habe mittlerweile deinen Code in ein Module gepackt. Vielleicht kannst du bitte noch den Code für GetDefaultAudioEndpoint bereitstellen? Grüße - Dietrich

  • Benutzer-Avatarbild

    Mittlerweile wende ich folgenden Code an: Es wird zunächst benötigt Imports System.Management Quellcode (27 Zeilen) Der doppelt auskommentierte Code zeigt folgende Properties an: Availability= (nicht belegt) Caption=C27F390 (NVIDIA High Definition Audio) ClassGuid={c166523c-fe0c-4a94-a586-f1a80cfbbf3e} CompatibleID=System.String[] ConfigManagerErrorCode=0 ConfigManagerUserConfig=False CreationClassName=Win32_PnPEntity Description=Audioendpunkt DeviceID=SWD\MMDEVAPI\{0.0.0.00000000}.{D8AAA027-616…

  • Benutzer-Avatarbild

    @RodFromGermany: Das hilft mir nicht weiter. @Franky: Ich kann nicht ermitteln, wie ich MMDeviceAPI finden und in VS2022 einbinden kann.

  • Benutzer-Avatarbild

    Hallo zusammen, Windows zeigt in den Einstellungen für Sound alle im System verfügbaren Lautsprecher, siehe dazu den Screenshot. Meine Frage ist: Kann man mittels VBnet genau diese Einstellungen abfragen und dann eventuell in einer ListBox anzeigen? Bin für einen Tipp dankbar! Grüße - Dietrich *Topic verschoben*

  • Benutzer-Avatarbild

    Hallo, an diesen Einstellungen liegt es nicht, sie sind bei beiden Projekten identisch. Mittlerweile ist es gelöst. Ich musste das entsprechende Package auch in den Ordner des zweiten Projekts kopieren und die Verweise entsprechend neu organisieren. Läuft! Grüße - Dietrich

  • Benutzer-Avatarbild

    Hallo zusammen, ich habe zwei Projekte entwickelt, die jedes dieselbe Funktion aus einem Modul benutzen. Die Public Funktion enthält folgende Befehle am Anfang: Dim srv As New Server(srvName) Dim db As Database = srv.Databases(dbName) Dabei sind die Parameter srvName.. der SQL-Server Name bspw. .\SQLEXPRESS und dbNam.. der Name einer Datenbank Bei einem Projekt erfolgt der Aufruf der Funktion an der Stelle dieser Befehle schon lange vollkommen ohne Probleme. Bei dem zweiten Projekt (in Arbeit) g…

  • Benutzer-Avatarbild

    Danke für deinen Hinweis! Ich habe das gemacht und es scheint zu funktionieren bei solchen Elementgruppen wie in diesem Fall. Aber es gibt in der Toolbox auch solche Gruppen wie im nächsten Screenshot gezeigt, die ausschließlich gegraute Einträge besitzt. Wo kommt das denn her? Die Einträge lassen sich auch entsprechend alle löschen, aber die Gruppe selbst nicht... Grüße - Dietrich

  • Benutzer-Avatarbild

    Hallo zusammen, bei meiner Toolbox habe ich die im Screenshot gezeigte eigenartige Erscheinung. Alle Elemente werden zweimal angezeigt, einmal in grau, einmal normal. Ich kann mir nicht erklären, wie das entstanden ist. Ich scheue mich derzeit davor "Toolbox zurücksetzen" zu machen. Hat jemand eine Idee, wie man das beseitigen kann? Grüße - Dietrich

  • Benutzer-Avatarbild

    Danke an alle für die Tipps und Mitarbeit!!! Hab's gelöst. Grüße - Dietrich

  • Benutzer-Avatarbild

    Hallo zusammen, gibt es eine Möglichkeit, die originale Bildgröße eines Videos, bspw. .mp4, festzustellen? Also Breite und Höhe. Grüße - Dietrich

  • Benutzer-Avatarbild

    Der gewünschte Link https://www.vb-paradise.de/index.php/Thread/109351-E-Mails-empfangen/?

  • Benutzer-Avatarbild

    Tja, habe selbst schon x-fach gesucht, aber manchmal übersieht man ja auch was... Ich habe bspw. schon ein Mail-Programm geschrieben, mit dem ich Mails aus einer SQL-Tabelle sozusagen serienweise an ausgewählte Adressen senden kann, mit Hilfe meines Mail-Servers. Sicherheitslücken: Es geht hauptsächlich bei den gesendeten Mails um eigene, beim Posteingang um fremde. Aber ich kann nicht sehen, dass da ein Risiko bestehen soll, denn die Mails sind ja gewissermaßen schon "geprüft" auf dem Server, o…