Servus!

Schaut euch doch mal diesen Link an:

http://www.rhirte.de/vb/index2.htm

Gruss Tom

hallo TOM
sehr schöne SEITE,
danke für diese INFO
greez bb

Hey tom .


Ich hab' mir auch gleich die Seite angesehen und finde sie ziemlich gut . Auch sehr übersichtlich ...

Hysen

also die Site ist vom Design net grad sehr anspruchsvoll...
ist aber gut strucktoriert******************Das gefällt!!

n1 m8

super Seite. Das Design könnte etwas geändert werden, sonst echt OK

mfg
CrashWriter

das is auch ne geniale page:
http://www.vbwelt.de/

Hallo,
schaut euch doch auch mal folgende Seiten an :

www.activevb.de
Die Tipps dieser Seite helfen meistens weiter, wenn nicht dann in dem gut besuchten Forum erfahrenere Vb'ler fragen, die wissen immer Bescheid!

www.VbArchiv.net
Eine weitere Seite mit haufenweise Tipps und Tricks und Beispielen, die weiterhelfen!

MFG Peter

Danke super link,
Auch gut sind:
Forum Downloads Links zu VB und anderen Themen
Forum links infos zu VB etc.
VB Forum
VB Forum und co
Viel Spaß damit

In Sachen VB finde ich den VBAccelerator sehr hilfreich.

Zum Beispiel wundern sich viele darüber, daß sich nach dem x-ten Programmaufruf das Programm aufhängt. Hier finde ich den "GUI Resource Tracer" sehr hilfreich. Mit diesem Tool kann man die Anzahl der verwendeten Resourcen kontrollieren. Da sieht man gleich, ob beim Beenden des Programms alle Resourcen wieder freigegeben wurden. VB hat ja schließlich keinen GarbageCollector wie er in Java verwendet wird.

Außerdem finde ich den Programmierstil sehr gut und es gibt eine Menge an fertigen Tools, Komponenten, ... - und das alles OpenSource.

Deshalb mein Tipp: http://www.vbaccelerator.com/home/VB/index.asp

Folgender Link enthält viele praktische Lösungen für VB-Alltagsprobleme

http://vb-tec.de/faq.htm

ich hab mir diese seite mit den beispielen angeschaut, aber nich gefunden,
was ich gesucht habe:

Ich hab ein StartUp fenster zum starten eines Spiels gemacht,
und hab es beim label1 (zum starten) mit diesen Code versucht:

Code vb:

1 2 3 4 5 6 7 8

Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.ForeColor = &HFF& End Sub   Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.ForeColor = &HFFFFFF Shell ("D:\Spiele\LF2\LF2_v1.9c\lf2.exe") End Sub

Es hat aber nicht funktioniert: kaum hab ich auf die schrift geklickt, kam dieses
fenster raus wo stand das lf2.exe einen fehler verursacht hat und beendet wird.

Ich glaube, das liegt daran, das das spiel seine dateien nicht laden kann,
deshalb frag ich eich um hilfe

Hi Ho Tom,
Ich bin zur Zeit in Waldkirch auf der Schule und fang da gerade mit VB Programmierung an. Da kommt deine Steit wie gerufen

alles super links...

leider ist es mir als blutiger anfänger nicht gelungen
eine vernünftige Methode zu schreiben, damit ich einen String in ein Text File ablegen kann.

Mein String ist voller Zahlen, ich möchte nun jeweils immer sechs Zahlen aus dem String lesen, enter und dann die nächsten sechs. Ich habe am Anfang der sechs Zahlen einen char(17) und am schluss der sechs Zahlen einen char(19), wie schaffe ich es nun, dass mir nicht der ganz string verloren geht, beim auslesen der ersten sechs.

besten dank für eure hilfe

gruss

Code vb:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

Option Explicit    Dim TheString As String 'Dein String   Dim ZStrPos As Integer 'Die Aktuelle Position, ab der gespeichert werden soll   Dim ZDivisionsanzahl As Integer 'Speichert, wie oft die Sechs in die Länge hineingeht   DimZStrLen As Integer 'Länge des Strings   Public Sub Form_Load()    ZStrLen = Len(TheString)    ZDivisionsAnzahl = Int(ZStrLen/6)    For i=0 To ZDivisionsanzahl       If  ZStrPos = ZDivisionsanzahl Then          Save Left$(TheString, ZStrPos, ZStrLen - ZStrPos), Datei          Exit Sub       End If       Save Left$(TheString, ZStrPos, 6), Datei       ZStrPos = ZStrPos + 6    Next i End Sub   Public Function Save(String2Save, File2SaveIn) Dim Temp As String Open File2SaveIn For Input As 1 Temp = Input(LOF(1), 1) Close #1 Open File2SaveIn For Input As 2 Print #2, Temp & vbCrLf & String2Save Close #2 End Function

So ungefähr müsstes sein.... Nehme keine Haftung für falsche Garantie

hab mir den spaß gemacht und nach der idee von godwar ein kleines spiel programmiert.

eine kugel die der gravitation unterliegt. steuerbar mit den pfeiltasten (kein luftwiederstand) ziel ist es die kugel so lang wie möglich in dem blauen dings zu halten. ein ende gibts nich. desweiteren eine kleine ki die das übernimmt =)

paket ist im anhang