Visual Basic Forum

Verfasst am: 30.01.2012, 16:53 Aufrufe: 83

aso jetzt versteh ich was du meinst... du willst dass dein link in der rtf box steht und aufrufbar ist ist mir nicht bekannt das das geht schreib den "quelltext" in eine Variable und rufe diese im webbrowsercontrol auf somit hast du den text stehen und auch deinen link Wink

Verfasst am: 14.12.2011, 14:52 Aufrufe: 283

Hallo, ich stehe vor volgendem Problem. Ich möchte alle Items einer Listbox auslesen und prüfen ob meine Variable messageSplit(1) schon vorhanden ist. Das ganze ist in einem If Befehl und sieht etwa so aus: If List1.List(0).Contains(messageSplit(1)) Then WinSock(Index).SendData "Sie haben sich beim letzten mal nicht Ausgeloggt!" Else List ...

Verfasst am: 29.11.2011, 08:37 Aufrufe: 199

Hallo erstmal in die Runde, ich habe ein Problem an dem ich nun schon ewig hänge und einfach nicht weiter komme. ich möchte ganz einfach den Text aus der Zwischenablage ausgeben bzw. in eine Variable schreiben. Hier mein Code: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MsgBox(HoleTextVonZwischenablage&# ...

Verfasst am: 06.11.2011, 21:12 Aufrufe: 336

Moinsen, hier bin ich wieder. Habe das Problem mit Val() gelöst. Dabei steht bei Val in Klammern meine Variable drin, die dann umgewandelt wird. Berechnungen lassen sich dann durchführen. Mit FormatNumber habe ich dann noch die Nachkomma- stellen festgelegt. Dickus

Verfasst am: 06.11.2011, 17:42 Aufrufe: 336

Folgender Code klappt, er gibt mir als Ergebnis 124: Dim b b = CInt(123.6) Response.Write("b = " & b) Nun dachte ich mir, dass der Wert 123.6 doch auch durch eine Variable vom Typ String kommen könnte. Also probierte ich folgendes: Dim a As String = "" Dim b a = "123.6" b = CInt(a& ...

Verfasst am: 29.10.2011, 20:05 Aufrufe: 148

ich habe mir deinen code jetzt nicht zeile für zeile durchgesehen aber beim lesen deiner beschreibeung hab ich mich gefragt warum du nicht einfach nur vbTab verwendest?! Variable = "30" & vbTab & "was weis ich" ja da brauchst du nicht mehr mit leerzeichen arbeiten kommt aber vor dass du in einer zeile die ein bisschen kürze ist ein paar leerzeichen anhängen musst und dann vbta ...

Verfasst am: 29.10.2011, 20:00 Aufrufe: 175

du hast auf der zweiten form deinen stop button definiere eine variable als public und boolean also Public Abbruch as boolean und an einem anderen teil des codes.... Loop Until TimeOut < (GetTickCount / 1000) or abbruch = true code im commandbutton abbruch = true dann wird die schleife entweder nach der wartezeit beendet oder wenn abbruch gedrückt wurde hoffe du konntest damit w ...

Verfasst am: 25.10.2011, 11:49 Aufrufe: 175

Output = "OUTPUT ON" & Chr(13) 'ausgabe des geräts aktivieren Call Verzoegerung(Zeit(i)) 'für gewisse zeit warten Next Next im Variablen-Modul: (damit die variablen übersichtlich bleiben) Public VDauer As Currency Public VStart As Currency Public VZeit As Currency im Modul: P ...

Verfasst am: 06.10.2011, 14:00 Aufrufe: 343

Verfasst am: 21.08.2011, 10:42 Aufrufe: 158

Hallo, mein Name ist Marcus und ich bin "Anfänger" in .net. Hier meine Frage: ich habe eine Variable Feld(0,0) inhalt ist "Label1" Feld(0,1) inhalt ist "Mein Name" Feld(1,0) inhalt ist "Label2" Feld(1,1) inhalt ist "Meine Email" ich möchte nun per Schleife label1.text = "Mein Name" label2.text = "Meine Email" setzen ...

Verfasst am: 14.08.2011, 17:54 Aufrufe: 192

hi ich weis ja nicht genau wo du einen datensatz anfügen möchtest Variable = Variable & " Neuer Datensatz" oder eine an eine datei?! wie es in vb.net funktioniert weis ich nicht aber mit append Line oder sowas in die richtung wahrscheinlich lg

Verfasst am: 20.06.2011, 05:33 Aufrufe: 371

Accept requestID ' Command1 anschalten damit man die Nachricht ' senden kann Command1.Enabled = True End Sub ' Wenn Daten ankommen Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim sData As String ' Die ankommenden Daten werden in einer Variable ' (strDaten) gespeichert Winsock1.GetData sData End Sub Private Sub Command1_Click() ' Nachricht wird zum Client gesendet ...

Verfasst am: 23.05.2011, 06:45 Aufrufe: 330

Verfasst am: 22.05.2011, 15:27 Aufrufe: 330

Hallo zusammen, ich wende mich an dieses Forum weil unter ASP selbst findet man fast keine Foren mehr die bedient werden.Meine Frage ist auch eine ganz einfache: Ich hab eine For Next schleife wo ich die variable i immer um 1 erhöhe. dann möchte ich diese variable mit einem Wort koppeln um eine variable wie test1, test2, test3 usw. zu erhalten Das anchfolgende Script ist nur ein Beispiel für das was ich erreic ...

Verfasst am: 25.03.2011, 08:56 Aufrufe: 625

" ' Ausgangslaufwerk und Pfad ChDrive ("C:\") ChDir ("C:\") With Application ' Set File Name to selected File Filename = .GetOpenFilename End With ' Ende bei Abbruch ' die Variable FileP wird auf den Wert des Pfades gesetzt und im Feld G7 ausgegeben FileP = Filename Range("G7") = FileP If Filename = False The ...

Verfasst am: 07.03.2011, 08:09 Aufrufe: 325

hi und wo willst du dann die icq nummer eingeben?!? in eine variable? dann nimmst anstatt der textbox deine variable wenn das imer noch nicht passt dann poste doch mal genau dein vorhaben bzw. code den du schon hast dann wirds für den leser auch einfacher dir zu helfen lg

Verfasst am: 15.02.2011, 14:24 Aufrufe: 864

Document = Nothing Private Sub LblDruck_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LblDruck.Click CodesoftApplication.EnableEvents = True 'Dokument geladen? If (noDocOpened) Then MessageBox.Show("Ein Etikett muss geladen sein!") Exit Sub End If 'Variable im Label füllen: 'CodesoftApplicati ...

Verfasst am: 04.02.2011, 19:12 Aufrufe: 928

... a behandelt, oder eine eigene Idee, oder vielleicht sogar einen Tipp, wie ich das grundsätzlich aufziehen könnte, um mir im Einzelnen Arbeit zu ersparen? PS: Nachdem ich nochmal weitergeschaut habe und noch was anderes versucht habe, bin ich immer noch nicht weiter. Zur Zeit habe ich die Elemente in einem Layouttable, deshalb hatte ich versucht, eben dieses anzusprechen, und nebenbei noch den Typ der Variable ...

Verfasst am: 29.01.2011, 19:42 Aufrufe: 544

Visible = True objectCounter = objectCounter + 1 End Sub Private Sub nObjekt_mouseDown(button As Integer, shift As Integer, X As Single, Y As Single) if button = vbLeftButton then select case nObjekt.tag case = 0 ' je nach Button sollen hier andere Werte in bestehende Variablen geschrieben werden case = 1 ' je nach Button sollen h ...

Verfasst am: 22.01.2011, 00:01 Aufrufe: 548

Hallo zusammen, habe leider nichts im Internet über mein Problem gefunden, aus diesem Grund schreibe ich hier. Ich versuche gerade verzweifelt, eine Variable ( ID ) an CrystalReport zu übergeben um mittels SELECT - Befehl nur bestimmte Datensätze aus der MySQL-Datenbank auslesen zu können, aber leider ohne Erfolg. Hier nun paar Fakten: > Ich benutze Visual Basic 2008 > Habe ein WindowsForm erstellt ...

Verfasst am: 13.11.2010, 11:47 Aufrufe: 419

Hi, ich habe eine Variable namens "vokabeln" diese entspricht "pedir;bestellen". In einer For-Next Schleife wird immer zu der Variable "Nummer" eins dazu addiert. Solange Nummer < 11 ist wird der linke Teil vor dem ";" abgetrennt. Das funktioniert super. Alerdings wenn Nummer >= 11 ist soll der rechte Teil genommen werden If Nummer >= 11 Then vokabel = Right$ ...

Verfasst am: 02.10.2010, 02:04 Aufrufe: 313

hallo leute ich bin leider noch ein anfänger und deshalb beschäftige ich mich mit einen text crypter und habe auch schon mein erstes problem. Sad

Warnung 2 Die TextBox1-Variable wird verwendet, bevor ihr ein Wert zugewiesen wird. Zur Laufzeit kann eine Nullverweisausnahme auftreten. beispiel: TextBox2 = Replace(TextBox1, encrypta, "srgae") ich komm nicht weiter bitte um hilfe ...

Verfasst am: 20.09.2010, 10:00 Aufrufe: 494

Als Ergänzung: Wenn ich mir den uebergebenen String ausgeben lasse, funktioniert es. Sobald ich aber den String SPSinput "verarbeite", z.B. in eine andere Variable speichere, oder mit replace oder split verwende, scheint sich das Programm unbemerkt auszuhängen. Nachfolgende Befehle wie einfach MsgBox werden nicht mehr ausgefuehrt, eine Fehlermeldung oder ähnliches erhalte ich aber auch nicht. Vielliecht ...

Verfasst am: 16.09.2010, 06:03 Aufrufe: 1231

hi der fehler ist folgender... dur prüfst ob in der Variable "ID" der wert 5 ist und nicht ob der wert in der varaiablen die länge 5 hat Wink

also... nicht if ID = "5" sondern if len(ID) = 5 then 'vorgang wird bearbeitet else 'bitte geben sie ihre korrekte ID ein endif aja nochwas GANZ WICHTIG wenn du sowas machst solltest du die Variable ID nicht als integ ...

Verfasst am: 06.09.2010, 14:37 Aufrufe: 494

Der String ist aber korrekt uebergeben worden wie ich mit einer MsgBox sehen kann. Auch ein Zwischenspeichern von SPSinput in eine lokale Variable hilft nicht. Wieso laesst sich der uebergebene String nicht vernuenftig bearbeiten? Vielen Dank für die Hilfe Santa Public Function ProfibusSetData_String(SPSinput As String) As Integer Dim iRet As Integer Dim state As Byte Dim buffer As tB ...

Verfasst am: 25.08.2010, 13:58 Aufrufe: 950

ich kann dir nicht folgen wie stellst du dir das vor? was möchtest du in die Variable strComputer genau eingeben? nur kurz zum mit denken strComputer ist ein computer aus einem netzwerk oder ein xbeliebiger oder sowas richtig?

Verfasst am: 25.08.2010, 09:54 Aufrufe: 950

hi ich nehme an dass das problem folgendes ist mit deiner forschleife gehst du alle items druch und dabei wird in deine variable OS das betriebssystem reingeschrieben aber die forschleife spring weiter Und schreibt erneut einen string hinein probiere mal if InStr(1, LCase(objItem.Caption), "windows 2000", 1) > 0 then OS = "W2K" exit for elseif.... somit wird das betriebssy ...

Verfasst am: 03.08.2010, 12:36 Aufrufe: 868

hi is ja gar nicht mal schlecht für den anfang!!! paar kleinigkeiten die dich halt zum scheitern bringen... -) zum anfang zeile1 = i zeile2 = j ist unnötig (da wird die leere variable i in die variable zeile1 geschrieben...) -) test3.txt brauchst du auch nicht ^^ -) weiter mit dem input ist fast richtig so nur eine zeile zu hoch Wink

du willst ja nicht nur die erste zeile einlesen sondern alle ! ...

Verfasst am: 03.08.2010, 12:12 Aufrufe: 868

hi is ja gar nicht mal schlecht für den anfang!!! paar kleinigkeiten die dich halt zum scheitern bringen... -) zum anfang zeile1 = i zeile2 = j ist unnötig (da wird die leere variable i in die variable zeile1 geschrieben...) -) test3.txt brauchst du auch nicht ^^ -) weiter mit dem input ist fast richtig so nur eine zeile zu hoch Wink

du willst ja nicht nur die erste zeile einlesen sondern alle ! ...

Verfasst am: 02.08.2010, 11:00 Aufrufe: 554

hi ist ganz einfach erklärt private, public, global geben den bereich an von dem die funktion oder variable angesprochen werden kann... private ... nur in dem modul oder form wo die funktion steht pulic ... für das ganze projekt und global ... glaub sogar systemweit also für dll usw (bin mir da aber nicht sicher) so was heist das alles beispiel: du hast eine form und ein modul im modul private s ...

Verfasst am: 07.07.2010, 15:32 Aufrufe: 601

Allerdings möchte ich, dass bei der Ausgabe von z.B. Chr(97) nicht der Buchstabe a ausgegeben wird, sondern auf die Variable a mit dem Inhalt "Test" verwiesen und diese ausgegeben wird. Sub test() Dim i As Long, a As String, x As String a = "Test" i = 97 x = (Chr(i)) MsgBox (x) End Sub So wird lediglich ein "a" ausgegeben. Wie ...

Verfasst am: 31.05.2010, 12:02 Aufrufe: 673

SelectedIndex & ")" Syntaktisch und logisch gesehen müsste die Abfrage so richtig sein (jedenfalls mit meinen, in der Schule erlernten Kenntnissen) Aber wie kann ich diese Abfrage ausführen? Fakt ist auch, dass nur ein Datensatz als Ergebnis der Abfrage rauskommt, da jede Kombination nur ein Mal vorkommt. Und wie kann ich den Inhalt des Ergebnisses (also den bildnamen) in eine Variable speic ...

Verfasst am: 04.05.2010, 11:20 Aufrufe: 468

Formular. & inhalt & .BackColor <-- Das "&" verbindet 2 String oder String und Variable usw.... Musst deinen Button als Control dimensionieren oder eine if abfrage einbauen, oder gar Select Case

Verfasst am: 21.04.2010, 09:13 Aufrufe: 898

... ame For Input As #1 Do While Not EOF(1) Line Input #1, gesamtstring pos = 1 x = InStr(pos, gesamtstring, "@", vbBinaryCompare) test = Mid(gesamtstring, pos, x - pos) If test = Suchkriterium Then test = Suchkriterium & "@" & "123" gesamtstring = test End If Loop Close #1 es wird hier die VAriable ...

Verfasst am: 08.04.2010, 06:55 Aufrufe: 727

Hier scheitert es aber an der Möglichkeit es um zusetzten. Meine Ideen bisher: In der Form wird eingetragen, was die Hand für Karten sind, dann später die Karten des Flop etc. Jede Karte (52) hat eine eigene definierte Variable. Wenn ich also anfange, und habe eine Hand, gibt es für die erste Karte des Flop ja nur noch 50 mögliche Karten/Variablen für die nächste 49 und für die letzte Karte des FLop ...

Verfasst am: 19.03.2010, 18:45 Aufrufe: 967

Diese Kundennummer will ich mit der ID_Kundennummer vergleichen. Doch das will mein Computer nicht machen. Ich probiere jetzt schon mehrere Stunden. Ich hab auch schon versucht den Textbaustein mit CLng() in eine Long Integer zu konvertieren, doch kein Erfolg. Trage ich anstatt meiner Variable eine feste Zahl ein klappt das prima. Ich weiß nicht in was ich den Text konvertieren muss bzw. ob das überhaupt geht. Nun h ...

Verfasst am: 03.02.2010, 10:35 Aufrufe: 518

Die PictureBoxen heißen P1-P31 und bspweise bei PBox 1 und 2 soll ein Bild "plus" aus den Ressourcen zugewiesen werden. Select Case FeldZahl Case 1 Or 2 Spielbrett.Pxxx.Image = My.Resources.plus Case 3 Or 4 Spielbrett.Pxxx.Image = My.Resources.minus End Select Gibt es eine Möglichkeit für o.g. "xxx" die Variable "Feldzahl" ...

Verfasst am: 17.01.2010, 18:31 Aufrufe: 728

... it der Wände, Decke & Boden einzugeben werden Comboboxen (6 Stück) mit vorgegebenen Einträgen verwendet. In Abhängigkeit zu der abgefragten Frequenz soll in der Excel Tabelle nach dem Eintrag aus der Combobox gesucht werden und dann je nach Frequenz 1 Spalte für 125Hz, 2 Spalten für 250HZ, 3 Stellen für 500Hz usw rechts von der "gefundenen" Zelle aus, der Nachhallwert eingelesen und in eine Variable ...

Verfasst am: 02.01.2010, 15:47 Aufrufe: 1214

Also ich würde beim starten der Zeit (also wenn die Zeit anfängt zu laufen) Die aktuelle Zeit in einer Variable speichern. Am besten holst du dir die Zeit mithilfe von der Funktion GetTickCount. Die gibt die Zeit seit dem Systemstart in Millisekunden zurück. Private Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long Dann erstellst du einen Timer der in einem bes ...

Verfasst am: 14.12.2009, 22:07 Aufrufe: 677

Items.Item(0).ToString Dim inhalt_listbox2 as string = ListBox2.Items.Item(0).ToString Dim inhalt_listbox3 as string = ListBox3.Items.Item(0).ToString Wir fangen mit dem ersten Item an (darum oben (0) ) ! so, jetzt steht z.B. in der variable "inhalt_listbox1" der erste Wert in der 1. Listbox und so weiter ... Nun machen wir mit einfachen IF Abfrage die Vergleiche.... z.B.: ...

Verfasst am: 25.11.2009, 17:19 Aufrufe: 702

Hallo liebe Forumgemeinde Mein Ziel ist es ein Skript zu entwerfen, welches den Betreff neu erhaltener Mails als Variable speichert und die Mail danach wieder löscht. Als Makro in Outlook funktioniert dies Einwandfrei, jedoch soll das Skript dann auf einem Server laufen. Somit ist nun meine Frage, wie ich die Verbindung zum Exchangeserver (2007) bzw. zum Posteingang herstellen kann. Hier das Skript aus dem VBA ...

Verfasst am: 22.11.2009, 15:28 Aufrufe: 1681

Spieleprogrammierung mit XNA - Teil 3Willkommen zum dritten Tutorial,mir ist grad langweilig, also hab ich das dritte schon geschrieben. :DIn diesem Teil geht es um die erste Textur, die wir anzeigen wollen.Ich gehe vom Source aus Tutorial Nummer 2 aus, also bitte ladet das Projekt schonmal Wink

3.1 Neue Variablen!Mit neuen Funktionen kommen auf neue Variablen zum Einsatz. Das ist auch bei XNA so.Folgende Variablen ...

Verfasst am: 10.11.2009, 21:55 Aufrufe: 737

NET Programmierung. Ich habe erstmal eine allgemeine Frage, später dann wahrscheinlich noch genauer zur Umsetzung. Hier mein Problem: Ich habe verschiedene Proben, die ich erst einwiege, dann bearbeite und zum Schluss auswiege. Die Gewichte sollen in ein Programm übernommen werden. Beim Einwiegen habe ich 6 Variablen, die ich speichern möchte (Eindeutige Nummer, Datum, Tara, Einwaage...). Später muss ich sie wiede ...

Verfasst am: 26.09.2009, 07:43 Aufrufe: 828

Verfasst am: 03.09.2009, 13:51 Aufrufe: 428

Ich habe auch nicht gesagt das du den code so übernehmen kannst. Du musst schon ein paar sachen ändern, zB. kannst du dann deine Email-Adresse direkt in eine Variable packen die du im Programm definierst, dann braucht er die schon gar nicht mehr selber eingeben da Sie fest im Programm drin ist. Und das mit seiner Email-Adresse muss er ja eine Angeben damit da überhaupt ein Absender drauf ist.

Verfasst am: 03.09.2009, 13:07 Aufrufe: 471

Verfasst am: 22.08.2009, 14:33 Aufrufe: 898

Moin Du brauchst da glaube ich keine Variable, eher eine Konstante! Versuchs mal mit: Select Case True Hoffe das hilft, kann das grad nicht testen, da ich am iPod online bin. StarTrekkker

Verfasst am: 16.08.2009, 16:28 Aufrufe: 631

Verfasst am: 06.08.2009, 09:17 Aufrufe: 310

Hallo kann mir jemand helfen? Ich soll ein Programm erweitern, doch wenn mein Programm an die Stelle CurveCtrl1.Clear kommt, bekomm ich jedes mal einen Fehler! Der Wert der Variable wird mit nothing angezeigt. Die Variable ist mit Global CurveCtrl1 As CurveCtrl deklariert und wird vorher eigentlich nicht angerührt. Danke P.S. Ich bin gerade erst in Visual Basic 6 eingestiegen.

Verfasst am: 22.07.2009, 11:19 Aufrufe: 368

also wenn ich dich richtig verstanden habe speicherst du deinen selektierten Text in eine Variable!? Dann musst du die Variable bevor du erneut selektierst leeren. Dann steht der Text von vorher auch nicht mehr drin.