vb@rchiv · Diskussionsforen · zufall bilder ... (FHM-Memorie)

VB Classic
VB.NET
ADO.NET
VBA
C#

vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4

HOME WORKSHOPS TIPPS & TRICKS BEFEHLSREFERENZ API-REFERENZ FAQ

··· FORUM

Forenübersicht Suchen Forumsregeln

Allgemeine Foren

Allgemeine Fragen Fragen zur vb@rchiv CD Tipps & Workshops Suche VB Code

VB.NET, C#

Ein-/Umsteiger Fortgeschrittene ADO.NET/Datenbanken ASP.NET/WebServices C# Ecke

VB Classic 5/6, VBA

Einsteiger Fortgeschrittene ActiveX Datenbanken Windows API VB Skript (VBS)

Sonderforen

sev-Komponenten Jobs Suche/Gesuche Projekte & Betatester

DOWNLOAD TOOLBESPRECHUNG BÜCHERECKE MARKETPLACE GRAFIK & DESIGN VB-SEITEN

[641 User online]
[612 im Forum]

Partnerseiten
Top 5 Partnerlinks

Weitere...

Entwickler / Welt

··· Diskussionsforen · Visual-Basic Einsteiger

Sie sind aktuell nicht angemeldet. Funktionen: Einloggen | Neu registrieren | Suchen

Visual-Basic Einsteiger

zufall bilder ... (FHM-Memorie)

Autor: planetiltis
Datum: 14.07.03 19:06

Hallo leute folgender code generiert zufallsbilder: Dim nPic As Integer nPic = Int(10 * Rnd + 1) im1.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im2.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im3.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im4.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im5.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im6.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im7.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im8.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im9.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im10.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im11.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im12.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im13.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im14.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im15.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im16.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im17.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im18.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") nPic = Int(10 * Rnd + 1) im19.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") im20.Picture = LoadPicture(App.Path & "\bilder\" & CStr(nPic) & ".jpg") wie mache ich es das jedes bild genau zweimal vorkommt ? nicht mehr und nicht weniger häufig wird nämlich das FHM-Memorie für den Informatikunterricht ... danke im voraus. mfg bene

alle Nachrichten anzeigen

Gesamtübersicht | Zum Thema | Suchen

Thema

Views

Autor

Datum

zufall bilder ... (FHM-Memorie)	584	planetiltis	14.07.03 19:06
Re: zufall bilder ... (FHM-Memorie)	360	Dieter	14.07.03 19:37
Re: zufall bilder ... (FHM-Memorie)	500	planetiltis	14.07.03 19:57
Re: zufall bilder ... (FHM-Memorie)	366	Dieter	14.07.03 20:02
Re: zufall bilder ... (FHM-Memorie)	383	planetiltis	14.07.03 20:05
Re: zufall bilder ... (FHM-Memorie)	341	Dieter	14.07.03 20:19
alles klar ...	323	planetiltis	14.07.03 20:19

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen | Neu registrieren

Funktionen: Zum Thema | Gesamtübersicht Suchen

sevISDN 1.0

Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m.

Weitere Infos

Tipp des Monats

Oktober 2025
Matthias Kozlowski

Umlaute konvertieren

Ersetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.)

Details

Neu! sevCommand 4.0

Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek.

Weitere Infos

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel