Zum Inhalt springen

KarlBerg

Mitglieder
  • Gesamte Inhalte

    116
  • Benutzer seit

  • Letzter Besuch

Alle Inhalte von KarlBerg

  1. Hi, ich kann dir nur empfehlen mit "=wenn(istfehler)()..." zu arbeiten. Der fängt alles ab, sollte mal ein Wert fehlen oder sonst was nicht richtig sein. Bsp: =WENN(ISTFEHLER(SVERWEIS(A1;$D$1:$E$3;2));"FEHLER";SVERWEIS(A1;$D$1:$E$3;2)) Ist eigentlich nur ne Wenn Funktion geschachtelt mit ner FehlerabfangRoutine. Kannst ja mal noch deinen Sverweis posten, und die genaue Beschreibung, in welcher Spalte welcher Wert steht. Dann kann man's besser nachvollziehen. MfG KarlBerg
  2. Hi, versuch das hier mal Konnte es nicht testen, sieht aber gazn gut aus MfG KarlBerg
  3. Hi, das Rätzel war net so doll, hab die Beschreibung schon nach dem 2. Lesen verstanden. So dann.... Private Sub List1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 13 Then Form2.Label1 = Combo1.Text Form2.Label2 = List1.Text Form2.Show End If End Sub BTW:Wenn du net weisst, was der Keycode von "Enter" ist, mach einfach in der KeyDown Sub nen MsgBox Keycode, starte das Prg. geh in die List1 und drück "Enter". Bis dann KarlBerg
  4. KarlBerg

    DivX 5.0

    Am besten Google fragen, der weiss alles http://www.google.de/search?hl=de&q=powerdivx+next+generation&spell=1
  5. Hi, mann... deine Problembeschreibungen sind echt Hammer. Ich weiss schon wieder net genau was du willst, iss aber auch egal Hier mein Versuch Private Sub btnFuellen_Click() 'Combo1 und list1 fuellen For i = 0 To 10 Combo1.AddItem i & ". Zeile" List1.AddItem i & ". Zeile" Next i Combo1.ListIndex = 0 List1.ListIndex = 0 End Sub Private Sub Combo1_Click() List1.ListIndex = Combo1.ListIndex End Sub Private Sub List1_Click() Combo1.ListIndex = List1.ListIndex End Sub Wenn du auf btnFuellen klickst, werden erstmal die Daten eingefüllt, und jeweils der erste Wert ausgewählt. Wenn du nen Wert aus der Liste auswählst, wird der selbe Wert in der Combo aktiv. Wenn du was in der Combo auswählst, wird's in der Liste aktiv. Hoffe die Antwort passt. Freu mich schon auf dein nächstes "Beschreibungs-Rätzel" MfG KarlBerg
  6. KarlBerg

    DivX 5.0

    Tach, ich benutze "Power DivX Next Generation". Hat ein sehr gutes Design (Wie PowerDVD), und macht keinerlei Probleme. Damit hab ich schon Filme abspielen können, die mit keinem anderen Player gelaufen sind. Oder wenn's mit dem Ton, bei anderen Playern Stress gibt, ist PDNG die Lösung. *Wow voll das LobLied* BTW: ThePlaya ist bei mir auch andauernd abgestürzt. MfG KarlBerg
  7. Danke Crush Da hast'e dir ja ne Menge Arbeit gemacht. SeltsamerDings läuft's bei mir net. Ich hab den Code (ohne Änderung) in ne Datei kopiert mit der Endung ".c". Dann wollte ich's mit "gcc für Win32" (http://agnes.dida.physik.uni-essen.de/~janjaap/mingw32/download.html) kompilieren. Das ist dabei rausgekommen C:\gcc\bin>gcc split.c -o split.exe split.c:1: parse error before `input' split.c:1: warning: data definition has no type or storage class split.c:3: parse error before `.' split.c:5: request for member `GetLength' in something not a structure or union split.c:6: `new' undeclared here (not in a function) split.c:6: parse error before `char' split.c:7: initializer element is not constant split.c:8: parse error before `.' split.c:23: redefinition of `size' split.c:5: `size' previously defined here split.c:23: warning: data definition has no type or storage class split.c:24: parse error before `}' split.c:39: redefinition of `size' split.c:23: `size' previously defined here split.c:39: warning: data definition has no type or storage class split.c:40: parse error before `}' split.c:51: parse error before `lpbuf2' split.c:51: conflicting types for `lpbuf2' split.c:7: previous declaration of `lpbuf2' split.c:51: warning: data definition has no type or storage class Muss Anfangs net noch was mit #include<...> und void main{}, oder so stehen. Bist wahrscheinlich davon ausgegangen, dass ich das selbst hinbekomme... da haste dich geirrt Hoffe jmd. hat noch Bock, mir das (noch) genauer zu erklären. Danke im vorraus KarlBerg
  8. Hi, ich hab's wahrscheinblich immer noch net richtig kapiert, aber ich probier's mal Soweit ich's verstanden hab, willste nur die Listbox als aktiv setzen, und einen Eintrag auswählen. Private Sub btnAuswahl_Click() For i = 1 To 10 List1.AddItem i Next i List1.SetFocus List1.ListIndex = 0 'erster Eintrag 0, letzter Eintrag wäre hier 9 End Sub Hoffe das war auch die Frage MfG KarlBerg
  9. Hi, erstmal danke für die Antwort. Das dumme ist nur, dass ich gar net weiss, wie ich ne Datei zum binären Lesen öffne und wie ich den ausgelesenen Inhalt dann wieder wegschreiben kann Wäre nett, wenn jmd. ein Bsp. posten könnte, wie ich 1000 Byte einlese und wegschreibe. Das einzelne zusammensuchen der restlichen Teile mach ich dann selbst. Danke KarlBerg
  10. Also, wissenschaftlich gefragt HÄ? Tut mir echt leid, aber so richtig hab ich das net verstanden. Könntest du das vielleicht nochmal neu versuchen zu beschreiben MfG KarlBerg
  11. Hi, hat hier jmd. ne Ahnung, wie ich eine Datei binär in drei Teile splitten kann? Ich gebe z.B. an, dass der 1. Teil 1000 Byte gross sein soll, der 2. Teil 5000 Byte und der 3. Teil, soll den Rest enthalten. Dann soll jeweils eine Datei erstellt werden, mit dem Inhalt der ersten 1000 Byte, usw... Komme eher aus der VB-Schiene, da stellt das ganze kein so grosses Problem da. Hoffe in C/C++ ist das nicht anders. Wäre nett wenn mir jmd. weiterhelfen könnte. MfG KarlBerg (BTW: Für Borland C++, kein Visual Studio, Abschnittsgrössen können ruhig fest eingebunden werden.)
  12. KarlBerg

    DOS-Befehle

    Hi, http://www.winhelpline.info/dos/ntcmds.php ist eigentlich nur ein abklatsch der WinNT Befehlsrefernz. Das findet man auch unter (zumindest bei mir): Start - Hilfe - (unter Index eingeben: ) ping unbennant #0 -> Anzeigen Über die Buchstaben oben findet man jede Menge "Dos"-Befehle. An undokumentierten Befehlen kenn ich eigentlich nur fdisk /mbr (zum neu einlesen des MasterBootRecords), aber denn kennt sowieso fast jeder. MfG KarlBerg
  13. Hi, willst du den Inhalt von 2 CD'S vergleichen? JA! CD Laufwerke: D und E Dir D: > ergD.txt Dir E: > ergE.txt fc ergD.txt ergE.txt > Diff.txt Ordner und Dateien von D in ergD.txt schreiben Ordner und Dateien von E in ergE.txt schreiben FileCompare ergD.txt und ergE.txt und die Differenz (Unterschied) in Diff.txt schreiben. (weiss allerdings net genau, ob's fc bei Win9x Systemen gibt, hab hier nur NT4.0) MfG KarlBerg
  14. Hi, stehen die Dateien alle in einem Ordner? Und um welche Dateitypen geht's? MfG KarlBerg
  15. wenn alles nix hilft... delpart.exe macht definitv den MBR Platt. Fdisk /mbr lädt den MBR eigentlich nur neu ein. MfG KarlBerg
  16. Hi, wenn man einen Dienst nachinstalliert, sollte man allgemein immer bevor man den Rechner neustartet das selbse, bzw. ein höheres ServicePack installieren, sonst kann's vorkommen, dass nach nem Reboot gar nix mehr geht. -In Produktivsystemen gar nicht gern gesehen- MfG KarlBerg
  17. Hi, schau dir das mal an: http://selfhtml.teamone.de/navigation/stichwort.htm#c MfG KarlBerg
  18. Hi, musste den Rechner platt machen, deshalb hab ich momentan kein VB installiert. Hab dann das hier in VBA getestet, musste halt noch etwas abändern. Sub Caller() Dim Var1 As String Var1 = "Tach" Call Called(Var1) 'wird nur EINE Variable übergeben End Sub Sub Called(Optional ByVal Var1 As String, Optional ByVal Var2 As String) 'wartet "eigentlich" auf 2 Variablen MsgBox "Hier erste Variable: " & Var1 & vbCrLf & _ "Hier zweite Variable: " & Var2 End Sub MfG KarlBerg
  19. Hi, ich versuch mal ne Antwort zu geben, obwohl man doch etwas schätzen muss, was du willst. Also, soweit ich weiss kannst'e en Timer net Rückwärts laufen lassen. Der Timer löst ja nur ein "Ereigniss" (Subs) aus. In der TimerSub, kannst'e aber einen vorher gesetzten Wert Runterzählen lassen. Wenn du die Tage runterzählen willst, nimmst'e die Anzahl der Tage von (01.01.00) und schreibst die in ne Globale Variable. Und immer wenn du in de TimerSub kommst, reduziertste diese Variable um eins. Dann lässte das Datum aus dieser Zahl errechnen und ausgeben. Das sollte eigentlich so laufen MfG KarlBerg
  20. Hi, das hier sollte dir helfen: Sub Splitter() '(by) KarlBerg For i = 1 To Tabelle1.UsedRange.Count hlp = Range("A" & i + 1) erg = Range("A" & i) If erg <> hlp And erg <> "" Then Rows(i + 1 & ":" & i + 1).Select Selection.Insert Shift:=xlDown Selection.Insert Shift:=xlDown End If Next i End Sub Splittet nach der ersten Spalte (A). MfG KarlBerg
  21. Hi, zum selbst erstellen gibt's "MicroAngelo". Ist ShareWare, kann alles was man sich wünscht. MfG KarlBerg
  22. Hi, das hier hab ich aus nem anderen Forum, und soweit ich das Überblicke, heisst das, dass man mehr oder weniger auf NTFS (NT 4.0) schreiben kann. MfG KarlBerg PS: Hab's selbst auch noch net getestet
  23. Hi, hab noch mehr gefunden. Für die, die abgestimmte Töne wollen. (Bin nicht 100% sicher, dass die Frequenzen stimmen) Dafür braucht man: -btnGenau (Button) -CmbOct (ComboBox) -CmbNote (ComboBox) Private Declare Function Beep Lib "kernel32.dll" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Boolean Dim beeped As Boolean Private Sub btnGenau_Click() Dim TonLaenge As Integer Dim Note As String Dim Octave As Integer Dim Freq As Integer TonLaenge = 100 Octave = CmbOct.Text Note = CmbNote.Text Select Case Note Case "A" Freq = 27.5 Case "A#" Freq = 29.1352 Case "B" Freq = 30.8677 Case "C" Freq = 32.7032 Case "C#" Freq = 34.6478 Case "D" Freq = 36.7081 Case "D#" Freq = 38.8909 Case "E" Freq = 41.2034 Case "F" Freq = 43.6535 Case "F#" Freq = 46.2493 Case "G" Freq = 48.9994 Case "G#" Freq = 51.9131 Case "A2" Freq = 55 End Select beeped = Beep(CLng(Freq) * 2 ^ (CLng(Octave) - 1), TonLaenge) End Sub Private Sub Form_Load() CmbNote.AddItem "A" CmbNote.AddItem "A#" CmbNote.AddItem "B" CmbNote.AddItem "C" CmbNote.AddItem "C#" CmbNote.AddItem "D" CmbNote.AddItem "D#" CmbNote.AddItem "E" CmbNote.AddItem "F" CmbNote.AddItem "F#" CmbNote.AddItem "G" CmbNote.AddItem "G#" CmbNote.AddItem "A2" CmbNote.ListIndex = 0 For i = 2 To 11 CmbOct.AddItem i Next i CmbOct.ListIndex = 0 End Sub MfG KarlBerg
  24. Hi, ist alles möglich Private Declare Function Beep Lib "kernel32.dll" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Boolean Private Sub Command1_Click() Dim TonHoehe As Integer Dim TonLaenge As Integer TonHoehe = 50 TonLaenge = 150 beeped = Beep(TonHoehe, TonLaenge) End Sub MfG KarlBerg
  25. Hi, dass NT mit nem SP auch FAT32 lesen kann hab ich auch noch net gehört. Jedenfalls kannste, wenn du -kein Netzwerk hast, -NT4.0 auf dem Rechner und -der andere Rechner FAT32 als FS hat versuchen das ganze über Linux hinzubiegen. Linux soll ja "beschränkt" auf NTFS schreiben können. Und was mir das beschränkt sagen soll, weiss ich net. Wenn du keine Linux-Büchse hast, und kein Bock eine zu installieren, kannste dir von www.toms.net eine Linux-Bootdiskette downloaden. Mit der starten, beide Platten in einen Rechner packen, und beide mounten. Kopieren -Fertig- Und wenn du Glück hast, sind die Daten auf der anderen Platte und dein NT ist nicht zerschossen MfG KarlBerg

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...