tobbe

Versuch mal vor dem Show den WindowState auf Maximized zu setzen. Keine Ahnung obs funktioniert. Private Sub NotifyIcon1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDown Me.WindowState = FormWindowState.Maximized Me.Show() End Sub

VB.NET Sub AlleTagevonJahr(ByVal Jahr as Integer) Dim Datum as Date = New Date(Jahr, 1, 1) Do While Year(Datum) = Jahr Debug.Print(Datum.ToShortDateString) Datum = Datum.AddDays(1) Loop End Sub VB 6 Sub AlleTagevonJahr(ByVal Jahr as Integer) Dim Datum as Date Datum = "1.1." & Jahr Do While Year(Datum) = Jahr Debug.Print(Datum) Datum = Datum + 1 Loop End Sub

Mach eine Kopie von $info und $suchArray. Wandel $info und $suchArray in Großbuchstaben um. Gehe das Array durch und hole die Anfangs- und Endposition des in $info gefundenen Wortes und ersetze es durch das orginale Wort. Eigentlich ganze einfach, nur leider kann ich kein PHP.

Da hast schon recht! Naja kommt drauf an was du unter Lagerverwaltung verstehst und wie komplex das ganze sein soll.

Access starten Datei -> Neu Registerkarte "Datenbanken" Vorlage "Lagerverwaltung" auswählen und fertig. Da haste ne kleine Lagerverwaltung. Mit freundlichen Grüßen Tobbe

Also deine Datenbank sieht dann wohl so aus: DokumentNr. | Beschreibung 1 Hund Katze Maus 2 Hund Elefant Igel 3 Elefant Giraffe Maus Und sie sollte aber so aussehen: DokumentNr. | Beschreibung 1 Hund Katze Maus 2 Elefant Igel 3 Giraffe Also die doppelten entfernen? Wird so wie die Tabelle jetzt aufgebaut ist schwierig. Es sollte eher ein Stichwort in einer Zeile stehen. Also so: DokumentNr. | Beschreibung 1 Hund 1 Katze 1 Maus 2 Elefant 2 Igel 3 Giraffe

Was genau willst du machen? Willst du die Duplikate in der Access-Tabelle entfernen? Wie genau sieht die Tabelle in Access aus? Mit freundlichen Grüßen Tobbe

If (e.eyCode >= Keys.A And e.KeyCode <= Keys.Z) Or (e.KeyCode >= Keys.D0 And e.KeyCode <= Keys.D9) Or (e.KeyCode >= Keys.NumPad0 And e.KeyCode <= Keys.NumPad9) Then End If So kannst du nur 0 bis 9 NumPad 0 bis 9 und alle Buchstaben von A bis Z eingeben. Mit freundlichen Grüßen Tobbe