Visual Basic Forum

Verfasst am: 10.05.2012, 05:47 Aufrufe: 181

HI ich weis zwar nicht genau wofür du es brauchst aber wenn ich irgendwofür ein dauer berechnen möchte sprich wenn ich z.b. wissen will wie lange die prozedur dauert zum optimieren oder was auch immer verwende ich Private Declare Function GetTickCount Lib "kernel32.dll" () As Long Start = GetTickCount() Prozedur Ende = GetTickCount() dauer = Ende - Start und dann noch ...

Verfasst am: 20.04.2012, 13:56 Aufrufe: 66

Hey, Hab da mal ne kleine Frage zu Visual Basic, und zwar möchte ich per visual basic per Button Click eine .exe starten die auf C: liegt ( css hack ) doch wenn ich diesen per Button starte wird die config vom css hack nicht mitgeladen.. doch wenn ich die .exe manuell auf C: Mit Doppelklick starte funktioniert alles ohne Probleme... Hat Evtl. jemand eine Idee? Mfg.

Verfasst am: 11.04.2012, 06:12 Aufrufe: 118

Hallo liebe Community, Ich habe folgendes Problem und zwar möchte ich gerne eine Progressbar Durch einen Tastendruck starten und diese zurücksetzen falls sie ihr Maximum erreicht hat. Zusätzlich möchte ich aber gerne erreichen das bei einem Tastendruck vor erreichen des Maximums der Progressbar diese ebenfalls zurück gesetzt wird. Hierzu mal mein Code soweit, dieser funktioniert auch (halbwegs) jedoch wird nicht j ...

Verfasst am: 02.11.2011, 14:20 Aufrufe: 256

Also ich bin Anfänger und hab noch nicht soviel drauf^^ Hier ist ein Bild: http://i44.tinypic.com/wgw41.jpg Erklärung: Wenn ich auf "START" klicke, gelange ich zur Login Seite von Youtube. Wenn ich dann auf einen "Acc" klicke, werden automatisch Username + Passwort eingegeben. Wenn ich dann auf "Login" klicke, Logge ich mich ein und dann muss ich ein Video einfügen und auf &quo ...

Verfasst am: 01.11.2011, 11:27 Aufrufe: 215

Anschließen soll in einem Textfeld 4 eine Multiplikation mit einem Faktor x durchgeführt werden und das Produkt in eben das Textfeld ausgeben werden. Hintergrund ist eine Stundenverwaltung für Mitglieder vom DRK. Im Einsatzfall werden halt Start und Endzeit eingegeben und die Anzahl der Einsatzkräfte. Als Ergebnisse wird die Gesamtzeitleistung gefordert, sprich wieviele Stunden und Minuten (Sekunden sind hier eg ...

Verfasst am: 27.10.2011, 13:51 Aufrufe: 294

also das mit der verzögerung klappt jetzt wunderbar und wenn ich auf den stop button auf der form klicke, dann stoppt auch die übertragung. jetzt möchte ich allerdings, dass sich beim start der übertragung eine andere form öffnet, auf der die aktuellen strom und spannungswerte angezeigt werden (damit man nicht immer auf das gerät schauen muss, sondern das ganz bequem am bildschirm ablesen kann). auf diese neue f ...

Verfasst am: 18.10.2011, 11:00 Aufrufe: 292

Hallo Christopher, Du hast recht, ich habs mal wieder schlecht beschrieben. Es ist vergleichbar mit einer Waschmaschine : Ich rufe aus einem Formular mit dem Start Button das Programm(Function) "Spülen" auf. "Spülen" liegt in einem Modul und abeitet über Timer, zeitgesteuert. Ventil auf, 2sec Pause, Pumpe an usw. Der Timer wiederum ist nicht der ONBOARD Timer sondern ebenfalls eine Fu ...

Verfasst am: 18.08.2011, 02:40 Aufrufe: 279

Hallo BaSh, Das die TextBox1 automatisch den Focus erhält, liegt an der Eigenschaft "TabIndex". Wenn eine Anwendung startet, wird automatisch der Focus auf das Element mit dem kleinsten TabIndex gesetzt. Du kannst zb. dem "Command1" einen TabIndex von "0" geben und somit erhält der Button den Focus beim Start. Die TextBox1 wird dann nicht mehr automatisch aktiviert und löscht som ...

Verfasst am: 10.08.2011, 08:34 Aufrufe: 542

WriteLine("93") file.WriteLine(" 6") file.WriteLine("CONTINUOUS") file.WriteLine(" 10") file.WriteLine(Replace(x1, ",", ".")) 'x-koordinate start file.WriteLine(" 20") file.WriteLine(Replace(y1, ",", ".")) 'y-koordinate start file.WriteLine(" 11") ...

Verfasst am: 08.08.2011, 11:37 Aufrufe: 191

Hallo alle miteinander, gebe zu bin blutiger Anfänger und brauche eueren Rat. Ich rufe via shell ein extrenes Programm auf dieses benötigt aber zum Start einen Benutzer - ich möchte nunmehr das Programm aufrufen und dann gleich den Benutzername plus Return mitschicken wie kann ich das tun? Danke schonmal im Voraus Very Happy

Verfasst am: 22.07.2011, 20:12 Aufrufe: 549

Checked = False 'RadioButton4.Checked = False 'RadioButton5.Checked = False 'RadioButton6.Checked = False ' Else If RadioButton1.Checked = True Then Timer1.Start() ElseIf RadioButton2.Checked = True Then Timer1.Start() ElseIf RadioButton3.Checked = True Then Timer1.Start() ElseIf RadioButton4.Checked = True ...

Verfasst am: 22.07.2011, 19:54 Aufrufe: 549

du 5 ifabfragen ineinander die alle das gleiche auslösen.... wenns schon so sein muss dann doch ein bisschen eleganger! If RadioButton1.Checked = True or _ RadioButton2.Checked = True or _ RadioButton3.Checked = True or _ RadioButton4.Checked = True or _ RadioButton5.Checked = True or _ RadioButton6.Checked = True then timer1.Start() end if ich hoffe du konntest mit meiner ...

Verfasst am: 22.07.2011, 14:51 Aufrufe: 549

Checked = False RadioButton3.Checked = False RadioButton4.Checked = False RadioButton5.Checked = False RadioButton6.Checked = False MsgBox("Bitte wählen sie eine Aktion aus!") If RadioButton1.Checked = True Then Timer1.Start() Else If RadioButton2.Checked = True Then Timer1.Start() Else If RadioButton3.Checked = True Then Timer1.Start() Else If RadioButton4.Checked = True Then Timer1.Start() ...

Verfasst am: 19.07.2011, 19:27 Aufrufe: 628

Thread Dim list As New List(Of Connection) '______________ Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Show() Server = New TcpListener(ipendpoint) Server.Start() While True ' wir warten auf eine neue verbindung... client = Server.AcceptTcpC ...

Verfasst am: 17.06.2011, 11:15 Aufrufe: 508

Hallo zusammen Ich habe mein Programm grafisch erstellt, die meisten forms sind erstellt und nun komme ich zur Datenverwaltung. Ich habe 2 Fragen. 1. Frage Ich habe die Grunddaten manuell in eine Access Datenbank eingegeben und will nun, dass mein Programm beim Start die Daten aus der Accessdatenbank nimmt. Ebenfalls alle Neueinträge und Änderungen sollen in dieser Access Datei gespeichert werden. Ich habe n ...

Verfasst am: 26.05.2011, 09:59 Aufrufe: 582

Ich weiß nicht ganz was du meinst... Willst du ein anderes Programm von einem eigenen Programm aus öffnen? Das ginge so: Process.Start("DeinPfad\programm.exe") LG nikried

Verfasst am: 22.05.2011, 21:30 Aufrufe: 653

Wie funktioniert nicht mehr... gleich nach dem Start oder mitten im ausprobieren? Sonst könnte sein das es eine DLL-Datei nicht richtig kopiert... Die könnte ich natürlich noch nachschicken.

Verfasst am: 16.05.2011, 13:40 Aufrufe: 564

Quit [/code] Habe schon gschlagene 3Stunden nichts anderes gemacht, als hier und bei google zu suchen und komme einfach nicht weiter. Wenn ich jetzt das Form neu laden könnte, dass es ist wie bei ersten Start, ginge es vielleicht schon->Problem ich finde keine ösung für das Reload in der sich mein Programm nicht beendet. Das Form ist auch nicht mein Start-Form, sondern ich muss mich nach dem Programmstart wie ...

Verfasst am: 25.03.2011, 01:11 Aufrufe: 1244

Start(MyPfad & "\**** ******** Config.

Verfasst am: 17.03.2011, 10:55 Aufrufe: 348

Hallo liebe Community, nachdem ich mein Problem mit den XML Datein gelöst habe, habe ich 2 weitere Fragen. Mittels eines LinkLabels lasse ich meine Homepage aufrufen. Der code dafür ist ja: Process.Start("http:Hier die Webseite") Doch wie mache ich das, wenn ich jetzt erreichen will, dass sich z.B. Outlook öffnet um z.B. ne Support mail zu versenden ? Process.Start("admin@xx ...

Verfasst am: 07.03.2011, 16:03 Aufrufe: 383

hi ich habe dir den code ja schon gepostet brauchst ihn nur verwenden Wink

im textbox change event if len(Textbox1.Text) = 9 and isnumeric(textbox1.Text) = true then 'Progressbar start end if lg

Verfasst am: 25.01.2011, 11:33 Aufrufe: 816

ja wenn ich auf den Queltext gehe dann sieht es so aus knuddels Queltext: </script> <applet code="Start.class" archive="knuddelsk90acl.jar" codebase="http://213.61.5.150/" WIDTH="579" HEIGHT="200"> <param name=PORT value="2710,80"> <param name=background value="FFFF00"><param name=foregroundList value="00000 ...

Verfasst am: 16.01.2011, 15:42 Aufrufe: 1272

Prolex Pad 0.2.8 has been released! Check out the first post if your computer hasn't got Prolex Pad installed, else start the Updater through the 'Help'-menu. I hope you enjoy using Prolex Pad.

Verfasst am: 23.12.2010, 13:47 Aufrufe: 427

Dann kopierte ich diese exe-Applikation aus dem "bin"-Ordner mitsamt der mdb-Datenbank in die Produktivumgebung Windows XP SP3 und NET 3.5 Ich habe darin auch die korrekten Pfadangaben berücksichtigt, die in beiden Umgebungen identisch sind. Beim Start dieser exe-Datei bekomme ich folgende Fehlermeldung: "Exception has been thrown by the target of an invocation." Nach Betätigen dieser ...

Verfasst am: 03.11.2010, 21:03 Aufrufe: 714

hallo ich möchte ein form erstellen mit der ich Textdokument mit dem von mir in der textbox angegebenen namen start zahl und endzahl zum beispiel: aerox1 aerox2 aerox3 aerox4 aerox5 aerox6 aerox7 aerox8 aerox9 aerox10 also soviele wie ich möchte es sollte dann das textdokument auf dem destop erstellen bitte um hilfe bin noch nicht so fit mit visual basic danke im vorraus

Verfasst am: 28.09.2010, 17:12 Aufrufe: 621

{1}", __Subnet, d)) AddHandler ping.GotPingResult, AddressOf GotPingResult ping.StartPing() Next End Sub Private Sub GotPingResult(ByVal sender As NetworkScanner, ByVal e As PingResult) If e.Successful Then 'Man könnte auch die nicht erfolgreichen adden, mache ich hier aber nicht, weil wir nur die erfolgreichen h ...

Verfasst am: 14.09.2010, 09:51 Aufrufe: 437

Tick, AddressOf ResetDisplay AddHandler timerReset3.Tick, AddressOf ResetDisplay Derzeit behandle ich aber nur den ersten Timer. Mein Aufruf sieht jetzt so aus, dass ich erst einmal den Intervall setze und den Timer dann mit Start() starte: timerReset1.Interval = 5000 timerReset1.Start() Dieser Code wird derzeit ausgelöst, wenn ich auf einen Button klicke (soll später mit einem Eve ...

Verfasst am: 07.09.2010, 17:26 Aufrufe: 935

Verfasst am: 07.09.2010, 16:03 Aufrufe: 1497

Verfasst am: 24.08.2010, 09:56 Aufrufe: 725

hmm naja ich stehe auch öfters vor dem gleichen problem ich prüfe immer vor dem start ob die ocx oder was acuh immer schon vorhanden ist wenn nicht wird sie abgelegt und nach dem beenden wieder entfernt (oder auch nicht) würde sagen dass da die möglichkeiten in vb6 etwas beschränkter sind Wink

lg

Verfasst am: 12.08.2010, 23:15 Aufrufe: 976

iSteam 1.0 BETA iSteam ist eins meiner ersten Programme. Das Programm speichert Stream Name und Stream Link in einer verschlüsselten ini Datei, des weiteren besitzt es 3 Sprachepakete, die im Ausgeführten Zustand gewechselt werden können, und ebenfalls in der ini Datei gespeichert werden, und somit beim nächsten Start automatisch ausgeführt werden. Außerdem danke ich kevin89 für seine tolle Adobe-Style v2 dl ...

Verfasst am: 31.07.2010, 15:34 Aufrufe: 632

Ich hab hier zwei Monitore und beim Screenshot kommen beide auf den Screen. Umgeh dein Problem einfach: Timer, einen Knopf der ihn auslöst. Dann schiebst das Fenster der app in den zweiten monitor drückst auf start und das hat sich =)

Verfasst am: 23.07.2010, 16:16 Aufrufe: 450

Load End Sub Public Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click If TextBox1.Text = ("roflmao") Then Timer1.Start() End If End Sub Private Sub Button1_Click& ...

Verfasst am: 07.07.2010, 20:15 Aufrufe: 366

Load End Sub Public Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click If TextBox1.Text = ("roflmao") Then Timer1.Start() End If End Sub Private Sub Button1_Click& ...

Verfasst am: 21.06.2010, 01:37 Aufrufe: 637

Bei bestehender Verbindung schicke ich den Befehl, Daten vom Gerät per UDP zu senden. Ein zweites Winsock nimmt die Daten an und zeigt sie auf der Form. Funktioniert alles so, wie es soll. Kompiliere ich das ganze nun und starte die exe, kann ich die TCP-Verbindung aufbauen und Befehle senden, jedoch nimmt das zweite Winsock die Daten nicht an !? Hat jemand eine Idee, wo der Unterschied zwischen dem Start in ...

Verfasst am: 09.06.2010, 20:51 Aufrufe: 971

Thread Public Class Form1 Dim startkillProzess As String = "/functionkillProzess" Dim startTaskmgr As String = "/functionTaskmgr" Dim EndgetProzess As String = "/endgetprozess" Dim prozessbuffer As String Dim readbuffer As String Dim taskmgrbuffer As String Dim adresse As String Dim port As Integer = 4000 Dim stream As NetworkStre ...

Verfasst am: 08.06.2010, 21:39 Aufrufe: 635

Ich verwende einen VB Code um aus 2 NMEA Koordinaten die Distanz zu berechnen. Das ganze funktioniert auch sehr gut. Jetzt habe ich zwei Koordinaten, wo ich aber einen viel zu großen Wert bekomme. Die Koordinaten lauten: Breite start: 46.999913 Länge start: 15.492768 Breite Ende: 47.000023 Länge Ende: 15.492642 Wenn ich diese Zahlen z.B. mit der Webseite http://www.mountainbiker.ch/inhalt/distanz-berech ...

Verfasst am: 05.04.2010, 14:28 Aufrufe: 962

hier eine liste meiner programme: screenshots und weiter erklärungen sind auf meiner hp zu finden. (klick aufs programm) ein über den Desktop fliegender WindowsXp start-button, simulierte gravitation, etc. nervt euch der windows-rechner auch? - wie wärs mit dem! Umrechnen verschiedenster einheiten ein auf .txt basierender texteditor, der jedoch weitere formatierung unterstützt ein, allein ...

Verfasst am: 25.02.2010, 18:35 Aufrufe: 511

Text = "text3" Button2.Text = "Ja" Button1.Text = "Nein" ElseIf Label1.Text = "text3" Then End End If also das programm läuft bisher wiefolgt ab: start : label = text1 butonklick -> label = text2 buttonklick -> buttontexte ändern sich danach sollte bei einem erneuten buttonclick der labeltext3 kommmen abe ...

Verfasst am: 05.01.2010, 19:05 Aufrufe: 729

Hat sich erledigt habs rausgefunden. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click System.Diagnostics.Process.Start("http://www.website.com") End Sub

Verfasst am: 03.01.2010, 22:56 Aufrufe: 568

Verfasst am: 30.12.2009, 11:55 Aufrufe: 1202

Bein Klick auf den Button "Anlegen" erhalte ich folgende Fehlermeldung (Siehe Notiz am Quellcode Form 2) ArgumentExeption wurde nicht behandelt Dies führt dazu, dass sich zwei Bindungen der Auflistung an dieselbe Eigenschaft binden. Parametername: binding Hier der bisherige Code. --- Form 1 --------------- Public Class Start Private Sub Form1_Load(ByVal sender As System.Object, ByVal ...

Verfasst am: 23.12.2009, 01:24 Aufrufe: 445

Moin, Ich würde das mit einem Array machen, welches die Werte der TextBoxen enthält und vorm Start des Timers Deklariert wird: Dim TextArray(2) as String Sub Btn_Start_Click () TextArray(0) = TextBox1.Text TextArray(1) = TextBox2.Text TextArray(2) = TextBox3.Text Timer1.Start() End Sub ' Wo ich mir jetzt deinen Code noch mal genauer angescha ...

Verfasst am: 15.12.2009, 15:41 Aufrufe: 608

Hi, ich bin neu hier Wink

hsb ein bidssel programmier Erfahrung in verschieden Sprachen, aber hauptsächlich hab ich bis her shell scripte geschrieben. Ich würde nun gern ein programm in VB schreiben das sich so verhält: - Start der .exe - Fenster kommt ich kann ein paar Sachen einstellen - Klick auf den "Start" Knopf und das Program arbeitet so lang ich eingestellt habe (bis hier hab ich hin beko ...

Verfasst am: 14.12.2009, 10:23 Aufrufe: 1617

2: -Warum muss dein Prog eine Batchdatei ausführen? -Du könntest eine Batchdatei unter Start/Programme/Autostart schieben und folgendes hineinschreiben: [Pfad zu deinem Programm]\Progname (inkl .

Verfasst am: 27.11.2009, 19:37 Aufrufe: 580

Von dort will ich die Urls aus einer html Datei extrahieren. Dazu habe ich mir eine neue Form angelegt und dort den Code dafür rein geschrieben. Nur wenn ic dann auf meinen Button start klicke hängt sich das Programm auf und vb express zeigt auch keine Fehler an. Hier mal mein Source: Public Class Form8 Public frm_Form1 As New Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e A ...

Verfasst am: 26.11.2009, 23:28 Aufrufe: 4249

com/files/149094842/Delphi7_Personal.rar("activation@embarcadero.com")To complete product registration, save the attached file intoyour home directory before starting your Borland product.NOTES:- The contents of this e-mail and the attached file are for yourexclusive use and should not be shared with others.- Save the file to your home directory, and it will be loadedautomatically the next time you start your Borland ...

Verfasst am: 23.11.2009, 14:52 Aufrufe: 494

Start("C:\Users\Hüseyin\Desktop\Infosystem\Mitarbeiter1.

Verfasst am: 19.11.2009, 17:16 Aufrufe: 942

modFunktionen Public Class frmMain Private strTempLinks As String Private strTempMails As String Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub cmdStart_Click(ByVal sender As System.Object, ByVal e As System. ...

Verfasst am: 19.10.2009, 15:28 Aufrufe: 1274

Ein cooler Text-Effekt.Verwenung:Private oMatrix As New clsMatrix() Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click oMatrix.Start(Label1, "Neuer, längerer Text.") End SubDownload