Visual Basic Forum

Verfasst am: 23.10.2011, 17:57 Aufrufe: 326

.. Am sinnvollsten erscheint mir hier eine Erstellung eines Arrays in der Art: 12345 Completed 21345 Abandoned 56743 In Progress Das Problem ist halt zum einen, dass manche Zeilen in Punkte der Datumsangaben und des Progress keine Werte haben, andere schon. Das andere Problem ist das Erkennen des Status "In Progress" daran, dass nur ein Startdatum vorhanden ist, aber kein Enddatum. Hat hier jem ...

Verfasst am: 03.06.2011, 13:36 Aufrufe: 472

Halli Hallo, bin erst ganz neu hier. Ich hab ein bissjen Erfahrung in Sachen VBA und bin jetzt dabei, größere Sachen zu programmieren. Folgendes Problem: Ich möchte in eine Picturebox ein Netz zeichnen, das über regelmäßig angeordnete Punkte generiert werden soll. Also Punkte, die dann über eine Schleife zu einem Netz verbunden werden. Diese Punkte müssen einen "Namen" (bzw. laufende Nummer, 101, ...

Verfasst am: 25.03.2011, 13:18 Aufrufe: 587

hi dann investiere lieber nochmal eine stunde und bemühe dich um folgende punkte -) die maximale länge einer textbox -) man kann zahlen eingeben -) sonderzeichen -) notizen find ich nicht wirklich brauchbar -) löschen und löschen 2 hab ich bis jetzt noch nicht verstanden wofür das ist -) die Tabstops sind scheußlich -) und man erfährt gar nicht ob man recht hatte -) aja und beim neustart wenn neue worte für ...

Verfasst am: 25.03.2011, 10:35 Aufrufe: 587

hi dann investiere lieber nochmal eine stunde und bemühe dich um folgende punkte -) die maximale länge einer textbox -) man kann zahlen eingeben -) sonderzeichen -) notizen find ich nicht wirklich brauchbar -) löschen und löschen 2 hab ich bis jetzt noch nicht verstanden wofür das ist -) die Tabstops sind scheußlich -) und man erfährt gar nicht ob man recht hatte -) aja und beim neustart wenn neue worte für ...

Verfasst am: 29.10.2010, 14:08 Aufrufe: 1230

Hi, das Snake gefällt mir gut. Finde nur das die Punkte die man einsammelt in einer helleren Farbe sein sollten und das die Punkteanzeige nicht immer blinkt.

Verfasst am: 27.09.2010, 17:50 Aufrufe: 812

Top = sfs Next For S11 = 0 To Bod11 If Bod11 > 0 Then Call CMD11 Input #ff, sfs: Picture19(S11).Left = sfs Input #ff, sfs: Picture19(S11).Top = sfs Picture19(S11).Picture = Picture18(0).Picture Next Input #ff, sfs: zeit1 = sfs Input #ff, sfs: punkte = sfs Close ff End Sub Sub CMD1() Load Picture2(Picture2.UBound + 1) With Picture2( ...

Verfasst am: 18.03.2010, 23:42 Aufrufe: 1318

Hallo! Wahrscheinlich ist es ganz einfach. Ich habe ein Form mit PictureBox und button. Ich möchte, dass ein Bild automatisch geladen und Punkte eingezeichnet werden. Das Einzeichnen klappt aber nur über das ButtonClick-Event obwohl die msgbox aufgerufen und damit die Funktion Punktmalen ausgeführt wird?!? Versteh's nicht und google hilft auch nicht... Sad

Hoffe, ihr könnt damit was anfangen... Hier der Quel ...

Verfasst am: 04.01.2010, 01:00 Aufrufe: 1549

Das ganze ist Inspiriert von einer Frage hier aus dem Bereich Fragen zu VB6 wie ich zu geben muss, nur, dass ich es ein wenig weiter programmiert habe. Ich finde, dass Ergebnis lässt sich sehen. Bei dem ganzen geht es darum einige sehr einfache Kopfrechen Aufgaben möglichst schnell zu lösen. Je schnelle desto mehr Punkte gibt es. Am Ende gibt es dann die Möglichkeit sich in einen Online Highscore ein zu tragen. ...

Verfasst am: 01.01.2010, 19:44 Aufrufe: 1301

Es wird eine Rechenaufgabe angezeigt,in dem Fall für 10 sekunden, innerhalb dieser zeit muss man die aufgabe beantworten. Abhängig von der Geschwindigkeit der beantwortung der Aufgabe erfolgt eine Bepunktung. Wie kann ich das jetzt realisieren,dass wenn man schneller eine Aufgabe beantwortet mehr Punkte bekommt als wenn ich für die Frage länger gebraucht hätte, dass heisst, dass die Bepunktung von der Zeit abhäng ...

Verfasst am: 22.11.2009, 12:56 Aufrufe: 4055

Um das Programm in VB.NET benutzen zu können, startet euren Compiler und erstellt eine neue Windows Application:2. Klickt auf OK und wartet einen Moment.3. Öffnet die Eigenschaftenseite eures Projektes. 4. Wählt die Registerkarte 'References' und klickt im rechten Fenster auf Add 5. Markiert folgende Punkte und fügt sie den Verweisen hinzu:Microsoft.XNA.FrameworkMicrosoft.XNA.Framework.Content.PipelineMicrosoft.XNA.

Verfasst am: 14.11.2009, 18:46 Aufrufe: 647

Is ja ziemlich unleserlich. (Mal so nebenbei) besser wäre die Punkte in ein (zweidimensionales) Array zu schreiben und dann sortieren (bubblesort). Schöner wäre es (wenn du es wirklich so gelöst haben willst) das label/textbox mit lbl.controls(xyz) (xyz als nummer) anzusprechen und dann per schleife sortien

Verfasst am: 14.11.2009, 15:55 Aufrufe: 647

Halli Hallo, Ich programmier gerade für mein Spiel , welches ich im Informatik - Unterricht erstelle eine Highscoreliste. Nur stecke ich gerade bei der IF-Funktion fest , wo die jeweilige Position der erzielten Punkte in ein textlabel eingetragen wird Nur ist ein Dreher in meiner If Funktion drinne. Hier ist mal die If - Funktion: If erreichtp.Caption >= punkte1.Caption Then name2.Caption = name1.C ...

Verfasst am: 03.05.2009, 12:38 Aufrufe: 2362

Ist ja nicht sehr schön, wenn man die Datenbank vorher per "Visual Data Manager" erstellen muß um sie mitzuliefern. Dieses tutorial ist als Ergänzung zum letzten Datenbank tutorial zu sehen und handelt wieder von DAO. http://dbhost.info/vbx/viewtopic.php?t=746 Ich werde hier verschiedene Punkte ansprechen/behandeln und hoffe euch somit den Einstieg zu erleichtern. Was wird benötigt? 1. Ein neue ...

Verfasst am: 29.04.2009, 18:49 Aufrufe: 2078

wie kann man, dass in dem passwortfeld (hab auch ein E-MAil "PRogramm" gemacht) anstatt der eingegebenen Lettern die sterne bzw. punkte kommen?

Verfasst am: 10.04.2009, 08:23 Aufrufe: 2099

Text = Begriffe(i) Then tbs.ForeColor = System.Drawing.Color.Green Punkte = Punkte + 1 i = i - 1 Else tbs.ForeColor = System.Drawing.Color.Red i = i - 1 End If End If End If ...

Verfasst am: 18.09.2008, 17:24 Aufrufe: 1023

ja und ein problem hab ich die "schlange" kann noch durch sich durch fahren - egal aber was mich stört ich komm nicht dahinter wie ich die schlagen wieder kürze... hab ihr vl eine idee oder function dazu habs probiert dass ich mit einer for schleife immer die einzelen punkte weitergebe bis sie bei letzten sind und dort sollen sie überschrieben werden funzt aber ned wirklich... naja zurück zum projekt 8x aufger ...

Verfasst am: 07.09.2008, 20:24 Aufrufe: 3095

(sp33dwalker;8078)da man sonst den code der batchdatei sieht?100 Gummi Punkte Wink

Verfasst am: 28.08.2008, 14:43 Aufrufe: 616

Verfasst am: 08.08.2008, 11:01 Aufrufe: 2058

Verfasst am: 14.07.2008, 14:12 Aufrufe: 2091

Verfasst am: 13.06.2008, 18:10 Aufrufe: 1315

(Marduk;3333)Geht mit HTTPWebrequest bzw HTTPWebResponse. Du sendest quasi die Daten direkt per POST/GET an das Actionscript im Formular, ohne Umwege über nen Webbrowser, der irgendwelche Textboxen ausfüllen oder Buttons drücken soll.Visual Basic: PUNKTE" Dim Punkte As Array 'Größe muss bei 3.0 angegeben werden Dim PunkteX As String Punkte = QText.split("") PunkteX = Punkte(1).replace("", ...

Verfasst am: 11.06.2008, 19:03 Aufrufe: 724

pb ist einfach nur die Abkürzung von ProgressBarAlso wenn du die Punkte, wo "pb" steht einfach so umänderst, dass sie genau den Namen deiner ProgressBar haben, sollte es eigentlich funktionieren :wink:MfGJings

Verfasst am: 08.06.2008, 19:02 Aufrufe: 2353

Verfasst am: 05.06.2008, 20:30 Aufrufe: 3116

das ist es!Rapidshare vergibt die Punkte nämlich schon bei Klick auf den Download-Button. Ob man das Download-Dialog-Fenster dann schließt, ist egal.Und genau das macht das Programm. Achja, habe es jetzt selbst hinbekommen, die Collecters Zone auszulesen und es klappt hervorragend =) Nur dieses Download-Dialog-Fenster muss noch weg.

Verfasst am: 05.06.2008, 14:24 Aufrufe: 3116

Ich stell jetzt auch mal mein Projekt vor:Den Rapidshare Premium Points Loader (RPPL) Wenn Du einen Collecters Account bei Rapidshare besitzt, weißt du sicherlich das du durch Downloads Punkte bekommst und Du ab 10.000 Punkte einen 30 Tage Premium Account bekommst.Dieses Programm hilft dabei, indem es immer vortäuscht, die Datei zu downloaden und wegen der IP Sperre reconnected.Das Tool funktioniert nur während den ...

Verfasst am: 04.06.2008, 18:42 Aufrufe: 1315

Bei deinem Problem mit HTTPWebrequest/.. kann dir die MSDN sehr gute Hilfe leisten. Bei der String-Manipulation kann man lediglich "ausprobieren". Dir sollte das Ziel klar sein. Du willst die Zeile haben, in der die RapidPoints drin stehen. -> Schleife, split() bei Zeilenende Wenn du dann die Zeile gefunden hast, musst du nur noch die unnötigen Angaben entfernen (.replace()) und du hast deine Punkte Wink

Verfasst am: 04.06.2008, 18:06 Aufrufe: 1315

Geht mit HTTPWebrequest bzw HTTPWebResponse. Du sendest quasi die Daten direkt per POST/GET an das Actionscript im Formular, ohne Umwege über nen Webbrowser, der irgendwelche Textboxen ausfüllen oder Buttons drücken soll.Visual Basic: PUNKTE" Dim Punkte As Array 'Größe muss bei 3.0 angegeben werden Dim PunkteX As String Punkte = QText.split("") PunkteX = Punkte(1).replace("", vbNullString) ...

Verfasst am: 04.06.2008, 17:19 Aufrufe: 1315

Verfasst am: 04.06.2008, 16:28 Aufrufe: 1315

..und nochmal ich :DWollte mal eben fragen, wie ich es hinbekomm, aus einem Quelltext eine Zahl rauszukriegen (Rapidshare Collecterpoints). Die betroffene Zeile wäre diese:RapidPoints:PUNKTE habe schon gesucht aber nichts genau passendes gefunden.Wäre dankbar für Hilfe!

Verfasst am: 24.04.2008, 01:48 Aufrufe: 926

Verfasst am: 17.04.2008, 12:37 Aufrufe: 2097

Ist ja nicht sehr schön, wenn man die Datenbank vorher per "Visual Data Manager" erstellen muß um sie mitzuliefern.Dieses tutorial ist als Ergänzung zum letzten Datenbank tutorial zu sehen und handelt wieder von DAO.http://dbhost.info/vbx/viewtopic.php?t=746Ich werde hier verschiedene Punkte ansprechen/behandeln und hoffe euch somit den Einstieg zu erleichtern.Was wird benötigt?1. Ein neues Projekt oder ein bestehend ...

Verfasst am: 15.04.2008, 15:55 Aufrufe: 918

Verfasst am: 15.04.2008, 13:50 Aufrufe: 918

Hi, ich hab eben in den VB.Net Projekten den Windows Shutdown gefunden. Dort wurde dann folgender Code gepostet, damit automatisch bei der Datums- oder Zeitangabe die Doppelpunkte eingefügt werden: If TextBox1.TextLength = 2 Then TextBox1.Text &= ":" TextBox1.SelectionStart = 3 ElseIf TextBox1.TextLength = 5 Then TextBox1.Text &= ":" TextBox1.SelectionStart = 6 ElseIf ...

Verfasst am: 04.04.2008, 13:02 Aufrufe: 483

Bei ersteren wird der Variablen Typ "Variant" genutzt. Langsam und braucht viel Speicher. Bei den anderen wird es als string bearbeitet. Gibt noch viele viele Themen/Punkte wo man drauf achten sollte was man benutzt und wie. Leider glaub ich, bin ich fast der einzige hier der sich fürs Thema Speed und Resourcenverbrauch interessiert. Edit// Btw. gibts auch noch Trim$, Chr$ und vielleicht noch a ...

Verfasst am: 14.03.2008, 16:17 Aufrufe: 376

Ich glaub kaum, dass man die wegmachen kann. Die braucht man ja um den Fokus zu sehen, also welcher Button ausgewählt ist. Du könntest aber deien Buttons mit Bildern ersetzten, dann solltest du keine Punkte mehr haben Wink

Verfasst am: 13.03.2008, 21:46 Aufrufe: 948

Wär ne möglichkeit, habe ich auch schon nachgedacht aber das wird dann zu unübersichtlich, ich will ein Programm schreiben wo man z.B. einmal seine daten einträgt und dann per Button die daten an ein Liste von Warez-Hostern sendet Soll eig. nur für Leute interessant sein die gerne uppen und Punkte sammeln, Flyload ist einer der Seiten

Verfasst am: 05.03.2008, 20:47 Aufrufe: 1604

... s auch, aber bei Spielen ist ein einfaches und praktisches noch wichtiger Savegames: Der Vorgang muss auch gespeichert werden und dazu musste mehr als nur ein paar Einstellungen speichern Flow: Das Spiel muss einfach Spaß machen und eine Art Suchtgefühl wecken, beste Beispiele für nen Flow sind Diablo 2 oder WoW - Schleichwerbung für Blizz, aber sorry is einfach so XD Und das waren nur so ein paar Punkte ...

Verfasst am: 29.02.2008, 22:12 Aufrufe: 1314

3. Beispiel Um euch das näher zu bringen, da ich denke, dass es nicht wirklich verständlich zu erklären ist, hier mal ein Beispiel für einen Typ: Public Type typSpieler Vorname As String Nickname As String Punkte As Integer Level As Integer End Type Bei diesem Code wird ein typ mit den Eigenschaften Vorname, Nickname, Punkte und Level erstellt. Nun müsst ihr nur noch einer Variable diesen Typ zuw ...

Verfasst am: 16.02.2008, 14:44 Aufrufe: 514

Um was es sich handelt wäre noch informativ gewesen. Also Datei, Textbox oder ähnliches. Per Replace könntest du jedenfalls bei jedem vbCrLF einfach einen Punkte vorne und hinten noch setzen. Text1.Text = Replace(Text1.Text, vbCrLf, "." & vbCrLf & ".")

Verfasst am: 07.02.2008, 13:30 Aufrufe: 5471

... , also wenn die sammler ameise zucker sieht soll sie ihn hohlen, wenn die kämpferameise zucker sieht soll sie ihn nur markieren -wie bekomme ich raus was meine ameise gerade trägt, den meine apfel-träger denken sie haben zucker und schicken ameisen zum zuckerberg der gar nicht existiert. -was macht meine ameise wieder fit, bevor sie vor erschöpfung stirbt? meine ameisen bekommen so zwischen 6000-7000 punkte

Verfasst am: 06.02.2008, 20:07 Aufrufe: 5471

Sobald eine Stirbt wird eine neue erstellt. Nur kostet das natürlich Zeit. Ich glaube jede Runde kann eine erstellt werden. Wenn also viele sterben wird es auch lange dauern bis wieder alle erstellt sind. Und Punkte werden einem glaube ich nur abgezogen falls die Ameisen durch Erschöpfung sterben. Also bei Käferangriffen nicht. Ist aber glaube ich erst seit der neuen Version so. Und lasst euch nicht von ...

Verfasst am: 06.02.2008, 19:47 Aufrufe: 5471

mhmm ich hätte da mal ne frage, also wie misst man den dann welches volk am besten ist? in dem tutorial sagt er es währen 100 ameisen, aber bei mir sterben mehr als 100(das spiel hört nie auf) und bei ihm bekommt er auch punkte abgezogen wenn ameisen sterben, ist bei mir nicht so.

Verfasst am: 05.02.2008, 17:26 Aufrufe: 5471

Will euch hier mal etwas vorstellen, dass ich in der downtime von vb-x entdeckt habe. Nennt sich Antme! und dreht sich im Grunde darum, ein Ameisenvolk so zu programmieren, dass es auf verschiedene Ereignisse reagiert. Es gibt Objekte wie Äpfel und Zucker zum einsammeln und feindliche Käfer die man bekämpfen kann. Beides führt zu Punkten, wobei man natürlich soviel wie möglich erreichen sollte. Hier mal p ...

Verfasst am: 20.01.2008, 14:49 Aufrufe: 476

wayne? Kaufen kann er sich sicher nichts darum. Das wird noch aus der Zeit sein, wo man fürs normale posten Punkte bekommen hat.

Verfasst am: 13.01.2008, 16:38 Aufrufe: 1426

Ich muss Jolu zustimmen, genau die gleichen Punkte sind mir auch aufgefallen. Veränder das Design des Servers, ansonsten werde glaube ich nicht viele dein Tool nutzen.

Verfasst am: 08.01.2008, 11:27 Aufrufe: 1150

Sorry, aber ein Videotutorial für zwei Zeilen Code zu machen ist ziemlich sinnlos. Du hättest wenigstens noch zeigen können wie man reagiert, wenn der User keine Farbe auswählt sondern Abbrechen drückt. Von ordentlichem code kann man da nicht sprechen. Hoffe mal das weitere videotuts von dir, etwas ausführlicher werden. Ansonsten werde die Punkte dann wohl noch niedriger ausfallen müssen.

Verfasst am: 05.01.2008, 23:44 Aufrufe: 1510

... ot;playerAmmo", Ammo End If und die buttons müssen das freezen starten: Private Sub cmdFreezeAmmo_Click() FreezeAmmo = True Ammo = txtAmmo.Text End Sub Private Sub cmdFreezeHealth_Click() FreezeHealth = True Health = txtHealth.Text End Sub so das wars auch schon, natürlich fehlt noch ein unfreeze, aber das soltet ihr selber hinkriegen. beispielprojekt-download: Punkte ...

Verfasst am: 03.01.2008, 10:44 Aufrufe: 6481

ich hab ein problem, also ich hab mal so zum test für pinball ein punkte freezer geschrieben. 'patched Poke 101757C 90 90 'unpatched Poke 101757C 01 30 Call WPM("3D-Pinball für Windows - Space Cadet", &H101757C,&H90909090 , 4) das geht, aber warum nur mit &h90909090 und nicht mit &h9090 so wie es bei patched steht. bei tsearch steht auch das unpatched der code ist um das ganze wi ...

Verfasst am: 23.12.2007, 17:01 Aufrufe: 6481

ich hab ein problem, also ich hab mal so zum test für pinball ein punkte freezer geschrieben. 'patched Poke 101757C 90 90 'unpatched Poke 101757C 01 30 Call WPM("3D-Pinball für Windows - Space Cadet", &H101757C,&H90909090 , 4) das geht, aber warum nur mit &h90909090 und nicht mit &h9090 so wie es bei patched steht. bei tsearch steht auch das unpatched der code ist um das ganze wi ...

Verfasst am: 12.10.2007, 09:59 Aufrufe: 1361