Visual Basic Forum

Verfasst am: 25.05.2012, 11:04 Aufrufe: 7

0 sammeln drufte und ahtte zuvor noch nix mit VB am Hut. Ergo bin ich ziemlich planlos. Nun stellt sich folgendes Problem dar: Ich möchte dies' hier: http://pastebin.com/Z7KJ810d zum funktionieren bringen. Jedoch bekomme ich beim Aufrufen der Button1_Click Funktion die Fehlermeldung "Die Objektvariable oder die With-Blockvariable wurde nicht festgelegt.". Und zwar bei der Zeile For Each Me. ...

Verfasst am: 21.05.2012, 14:59 Aufrufe: 22

}" ' Hier gebe ich die korrekte VolumeKeyProtectorID für C: an inParams("NewPIN") = "12345678" Dim outParams As ManagementBaseObject outParams = processClass.InvokeMethod("ChangePIN", inParams, Nothing) ' outParams lass ich mal außen vor. Return 0 End Function Bei Ausführung bekomme ich immer die Fe ...

Verfasst am: 12.05.2012, 08:46 Aufrufe: 52

Hallo christopher.g Erstmal Vielen Danke für deine Antwort. Leider bekomme ich diese Fehlermeldung. "Point" ist kein Member von "System.Windows.Forms.PictureBox" Die sagt mir das es "Point" nicht gibt. ??? Gruß FKF

Verfasst am: 02.04.2012, 13:33 Aufrufe: 195

Verfasst am: 04.01.2012, 11:13 Aufrufe: 277

Imports TDAPIOLELib Public Class QCConnection Public Sub getConnection() Dim tdc As TDConnection End Sub End Class Wenn ich das Projekt nun deploye und in meinem Browser durch einen klick auf einen Button die Funktion getConnection() aufrufe, stürtzt das Programm ab und ich bekomme folgende Fehlermeldung: Start-URI: Z:\Documents and Settings\TGDGEDAD\Desktop\tmp\TDO- ...

Verfasst am: 02.12.2011, 09:44 Aufrufe: 401

Verfasst am: 30.11.2011, 11:38 Aufrufe: 401

Meine Syntax schaut bisher wie folgt aus: Sub Execute1() Call ExportFile End Sub ------ Function ExportFile (lpszSourceFileName As String, lpszDestinationFileName As String, lExportType As Long) As Boolean ExportFile = True End Function der Code steht komplett in einem Modul. Nun zeigt mit VB beim Compilieren für den Befehl "Call ExportFile" die Fehlermeldung "Compile error: Argument not ...

Verfasst am: 29.11.2011, 09:37 Aufrufe: 430

... chenablage() As String Dim oData As New DataObject On Error Resume Next ' Brutal um falsche Formate abzuwürgen, gibt dann einen Leerstring oData.GetFromClipboard() HoleTextVonZwischenablage = oData.GetText End Function End Class Den Verweis auf Microsoft Forms 2.0 habe ich gesetzt. Ich nutze VB 2005 Express Edition und er bring mir immer die Fehlermeldung ...

Verfasst am: 02.11.2011, 21:54 Aufrufe: 452

Der sich halt automatisch einloggt und Dinge ausführt.. Nun hab ich es mal debugged und dann kommt so eine Fehlermeldung im Webbrowser So schlimm ist es ja nicht, denn wenn man jetzt einfach auf "JA" klickt geht alles normal weiter kann man das noch irgendwie darein schreiben das automatisch auf "JA" geklickt wird oder kann man diesen "Skriptfehler" beheben? Hat jemand vllt. da ...

Verfasst am: 02.11.2011, 14:40 Aufrufe: 484

Sheets("Speicherplatzbelegung").Activate ActiveSheet.Cells(3, 3).Select Selection.Paste und Workbooks("Speicherplatzbelegung").Sheets("Speicherplatzbelegung").Cells(3, 3)=Workbooks("Einlesen").Sheets("Tabelle1").Cells(1, 1) was ist falsch daran? fehlermeldung: Index außerhalb des gültig ...

Verfasst am: 26.10.2011, 19:29 Aufrufe: 246

Caption = "X" Then MsgBox "Spieler 2 hat gewonnen!" End If End Select Natürlich würde der Code mit den anderen Möglichkeiten noch folgen, zudem denke ich mal, dass es warscheinlich irgendwie "doppelt-gemoppelt" ist mit dem "If" aber ohne Funktioniert das genauso wenig. Wenn ich es ausprobiere kommt dieses mal auch keine Fehlermeldung, es passiert einf ...

Verfasst am: 25.10.2011, 12:49 Aufrufe: 293

... n-Modul: (damit die variablen übersichtlich bleiben) Public VDauer As Currency Public VStart As Currency Public VZeit As Currency im Modul: Public Sub Verzoegerung() DoEvents VStart = Timer Do VZeit = Timer - VStart Loop Until VZeit >= VDauer End Sub beim befehl: Call Verzoegerung(Zeit(i)) mag er wohl die variable nicht! es kommt die fehlermeldung ...

Verfasst am: 24.10.2011, 23:43 Aufrufe: 246

Im zweiten Teil steht drin, das mit dem Klick auf den CommandButten der Inhalt der 9 Felder gelöscht werden soll, das Textfeld auf 1 zurückspringen soll, sowie sollen die CommandButten wieder zu beschreiben sein. Nun eben die Frage, wie kann ich den zweiten Teil übersichtlicher darstellen? Wenn ich es wie im ersten Teil mit "Index As Integer" mache, zeigt mir das Programm eine Fehlermeldung an und a ...

Verfasst am: 20.09.2011, 13:36 Aufrufe: 503

Fehlermeldung sagt, ihm fehlt ein Operator

Verfasst am: 09.08.2011, 13:25 Aufrufe: 1410

Show("Datenbank wurde aktualisiert!", "Erfolg") Catch ex As Exception ds.RejectChanges() MessageBox.Show(ex.Message, "Fehler") End Try End If End Sub verursacht in der Zeile da.Update(ds, "Tabellenname") eine Fehlermeldung: "Objektverweis wurde nicht auf eine Objektinstanz festgelegt." ...

Verfasst am: 21.07.2011, 16:14 Aufrufe: 457

... ot; # " & reader("gehalt") & " # " & reader("geburtstag")) Loop reader.Close() con.Close() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub End Class nur leider kommt dann die fehlermeldung ...

Verfasst am: 14.07.2011, 09:02 Aufrufe: 375

Pfad_fuer_dateien + "\db" + Format$(mod_allg.Firmennummer, "00000") & "`.kundenstamm kundenstamm WHERE (kundenstamm.kundennummer=" & Trim(txt_kundennummer) & ")" Dieser Code bringt die Fehlermeldung: "Word konnte die Datenquelle nicht öffnen" Vielen vielen Dank für Eur ...

Verfasst am: 03.07.2011, 13:14 Aufrufe: 291

Hi! Ich hab ein Problem in VB2010 mit dem MonthCalendar Control: Nachfolgender Code funktioniert nicht mit der Fehlermeldung "Der Wert vom Typ "System.Collections.Generic.List(Of Date)" kann nicht in "1-dimensionales Array von Date" konvertiert werden." Keine Ahnung was das bedeutet und warum es nicht funktioniert. Dim darray As New List(Of Date) Dim d As ...

Verfasst am: 26.06.2011, 01:34 Aufrufe: 677

... ben und klicke erneut auf den Button des Formular 1 um Formular 2 zu öffnen, zeigt es mir wieder alle Daten an. Ändere ich nun jedoch die Daten und speichere diese, werden diese in der Datenbank geändert, führen jedoch nach erneutem öffnen des Formular 2 zum Absturz. Somit könnte ich die Daten nur einmal ändern, bei jedem weiteren Änderungsversuch stürzt das Programm ab. Kann mir wer helfen? Fehlermeldung ...

Verfasst am: 16.06.2011, 15:29 Aufrufe: 589

Filename ' Eigenschaften des Ausgabefenster Set VideoW = Filgraph Multimedia.File1.Visible = True ' Ausgabeparameter With VideoW .Caption = "Fenstertitel" <- Hier bleibt das Programm mit der u.a. Fehlermeldung stehen .Left = 35 .Top = 232 .Height = 217 .Width = 295 .Ful ...

Verfasst am: 10.06.2011, 15:15 Aufrufe: 576

DLL zu registrieren, damit ich mal testweise "von außen" auf die Funktion zugreifen kann. Geht nicht - heul! Beim Registrier-Versuch mit dem Kommando regsvr32.exe schroeders_lib.dll kommt die Fehlermeldung: schroeders_lib.dll wurde geladen, aber der DllRegisterServer-Eingangspunkt wurde nicht gefunden. Diese Datei kann nicht registriert werden ...

Verfasst am: 03.06.2011, 10:38 Aufrufe: 296

Das Problem hat sich erledigt! Mittels "Try Catch" habe ich herausgefunden, dass ich einen unzulässigen Wert in ".DataBits" schreiben wollte. Das hatte weder bei der Compilierung, noch im Debug-Modus eine Fehlermeldung, sondern nur dieses unkontrollierte Verhalten zur Folge. Vielen Dank an alle die sich diesen Thread angeschaut und sich Gedanken dazu gemacht haben. Viele Grüße BerndL

Verfasst am: 25.05.2011, 06:12 Aufrufe: 653

OK, danke für die Fehlermeldung. Anscheinend hat es die DLL bei dir noch immer nicht kopiert. Ich hab sie jetzt allein hochgeladen, oben bei meinem Beitrag findest du den Link. Da du anscheinend Probleme hast, dass das Programm diese Dateien kopiert: Ich mein, natürlich wirst du dich sehr gut auskennen mit Dateizugriff usw., aber vielleicht hast du wirklich nicht vollen Zugriff auf den Ordner, in dem das Programm ...

Verfasst am: 24.05.2011, 13:13 Aufrufe: 937

Hallo, ich möchte eine Excel Datei auslesen. Dabei erhalte ich eine Fehlermeldung: 80040154 Klasse nicht registriert. Habe schon alles versucht, Verweise sind da. Wenn ich versuche, mittels regsvr32 die Microsoft.office.interop.excel.dll neu zu registrieren, erscheint auch eine Fehler: "DLLRegisterServer-Eingangspunkt nicht gefunden". Hier meine Function: zunächst die Imports: Imports System Imp ...

Verfasst am: 24.05.2011, 07:23 Aufrufe: 653

hi hier mal eine fehlermeldung... vl kannst damit was anfagen Informationen über das Aufrufen von JIT-Debuggen anstelle dieses Dialogfelds finden Sie am Ende dieser Meldung. ************** Ausnahmetext ************** System.

Verfasst am: 23.05.2011, 07:10 Aufrufe: 653

hi gleich am anfang... und fehlermeldung kann man keine sehen. was ich immerwieder mache ist: wenn ich ein projekt habe bei dem ich dlls verwende eine eigene leere form visible = false starten und von dort die dlls entpacken und dann erst die hauptform laden lg

Verfasst am: 13.03.2011, 20:27 Aufrufe: 460

Verfasst am: 26.02.2011, 10:16 Aufrufe: 462

Das Grundgerüst seht - nur komme ich an einer Stelle nicht weiter. Das Anzeigen von Bildern geht (siehe Code Button7)... will ich aber das Live-Video anzeigen kommt die Fehlermeldung "Videostream - unbekannter Dateityp" (siehe Code Button1). Auszug aus dem Codexxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx Private Sub Button7_Click(ByVal sender As System. ...

Verfasst am: 17.02.2011, 18:00 Aufrufe: 620

Verfasst am: 04.02.2011, 20:12 Aufrufe: 1220

Jetzt habe ich mir klug gedacht "Ha, mach ich das doch einfach über ein Array!": Dim CBArray As New ArrayList() CBArray(0) = ComboBox1 Dim i As Integer For i = 0 To 50 CBArray(0).Items.Add(PrimFertigkeiten(i)) Next i Da wirft er mir keine Fehlermeldung aus, es geht aber trotzdem nicht. I ...

Verfasst am: 07.01.2011, 18:44 Aufrufe: 382

hi cyberpsycho der name ist doch lächerlich und kann ja nur von einem 14 jährigen skriptkiddy kommen der nur mäßig - schlechte password und key stealer schreibt punkt 1 denkst du die leute hier sind blind und haben keine ahnung von vb... d.h. das einringeln hättest und unterschreichen der fehlermeldung kannst dir sparen... punkt 2 denkst du irgendjemanden interessiert sich dafür was für fenster du offen ...

Verfasst am: 02.01.2011, 00:32 Aufrufe: 893

Grüß dich hab es gestern zur späten Stunde auch noch raus gefunden. Wenn man das Programm im Debug-Modus aus Visual-Studio raus startet steht ja in der Ausgabe die Fehlermeldung. Es ist einfacher als man denkt, das Problem ist die UAC (Benutzerkontosteuerung), wenn ich das Programm Compiliere und es mit Admin-Rechten Starte läuft es problemlos. Nun soll man das aber auch unter Visual-Studio2008 festlegen kön ...

Verfasst am: 23.12.2010, 13:47 Aufrufe: 427

Dann kopierte ich diese exe-Applikation aus dem "bin"-Ordner mitsamt der mdb-Datenbank in die Produktivumgebung Windows XP SP3 und NET 3.5 Ich habe darin auch die korrekten Pfadangaben berücksichtigt, die in beiden Umgebungen identisch sind. Beim Start dieser exe-Datei bekomme ich folgende Fehlermeldung: "Exception has been thrown by the target of an invocation." Nach Betätigen dieser ...

Verfasst am: 28.11.2010, 00:22 Aufrufe: 905

Wenn ich ein neues Projekt starten/anlegen/whatever will, oder ein bestehenes öffnen möchte kommt folgende Fehlermeldung: C:\Dokumente und Einstellungen\user.

Verfasst am: 16.10.2010, 20:27 Aufrufe: 780

Hallo, ich bin gerade dabei mir eine Kommunikation über RS232 einzurichten. Testobjekt ist derzeit ein altes Modem um zu checken ob mein Projekt funzt. Wenn ich nun den Port COM1 öffnen will bekomme ich eine Fehlermeldung bei .open() "Der Zugriff auf den Anschluss COM1 wurde verweigert" Coding sieht so aus: With (SerialPort1) .PortName = SerialPort1.PortName .BaudRate = 9600 ...

Verfasst am: 21.09.2010, 10:01 Aufrufe: 926

Leider bekomme ich die Fehlermeldung, dass eine Konvertierung von 'short(*)Der C++-Code void WriteString(char* SPSinput) { char* WerteString[6]; short Werte[6]; for (int i=0;i<6;i++) { WerteString[i]=strchr(SPSinput,'$'); Werte[i]=atoi(WerteString[i]); } try { CoInitialize(NULL); ...

Verfasst am: 20.09.2010, 11:00 Aufrufe: 541

Als Ergänzung: Wenn ich mir den uebergebenen String ausgeben lasse, funktioniert es. Sobald ich aber den String SPSinput "verarbeite", z.B. in eine andere Variable speichere, oder mit replace oder split verwende, scheint sich das Programm unbemerkt auszuhängen. Nachfolgende Befehle wie einfach MsgBox werden nicht mehr ausgefuehrt, eine Fehlermeldung oder ähnliches erhalte ich aber auch nicht. Vielliecht ...

Verfasst am: 31.08.2010, 15:47 Aufrufe: 465

Ich habs mal probirt. Ich bekomme immer eine Fehlermeldung und die Eigenschaft Caption finde ich auch irgendwie nicht.

Verfasst am: 11.08.2010, 08:14 Aufrufe: 691

Es gibt für jeden Mitarbeiter Kürzel, die ich dann eingebe, wobei dann von dem Mitarbeiter direkt die Telefonnr., der Name, etc in den Kopfbogen eingefügt werden. Ich habe das nun alles mit elendig vielen If-Abfragen gemacht und es kommt eine Fehlermeldung wenn das Feld leer bleibt oder ich etwas Falsches eingebe. Allerdings sollen dann die Felder in Word leer bleiben, dort kommt aber dann "Es ist keine Dokument ...

Verfasst am: 12.07.2010, 16:42 Aufrufe: 463

Hallo! Beim Erzeugen einer ArrayList durch "Set testArrayList = New ArrayList" Bekomme ich folgende Fehlermeldung: "ActiveX component can't create object" Ich habe mscorlib.dll in den Verweisen eingebunden. Was mache ich falsch? Worauf muss ich achten? Welche Bibliotheken muss ich noch einbinden? Vielen Dank für jede Hilfe!

Verfasst am: 09.05.2010, 12:52 Aufrufe: 806

... e(i & "²" & "+") End Sub 'Sub Warten() ' ReadLine() 'End Sub Sub Endergebnis() WriteLine("=" & Summe) End Sub End Module [code] [b]sobal ich jetzt keine Eingabe mache oder einen Buchstaben eingebe dann flieg ich aus dem Programm und die Zeile Durchläufe = CInt(Anzahl) wird unterringelt - es erscheint die Fehlermeldung ...

Verfasst am: 08.02.2010, 15:37 Aufrufe: 811

Open() ' Verbindung öffnen Catch myerror As MySqlException MsgBox("Keine Verbindung zur Datenbank : " & myerror.Message.ToString) ' Falls Fehler : Fehler anzeigen End Try Wenn ich den Source aber ausführen will, kommt eine Fehlermeldung (Dafür habe ich die Fehlerfunktion eingebaut): Keine Verbindung zur Datenbank : Unable to connect to any of specified MySQL-Hosts. ...

Verfasst am: 27.01.2010, 15:23 Aufrufe: 687

Hierzu habe ich folgenden Code geschrieben: Private Sub Workbook_Open() Dim Tabellenblatt As Worksheet ComboBox1.Clear For Each Tabellenblatt In ThisWorkbook.Worksheets SAP_Format.ComboBox1.AddItem Tabellenblatt.Name Next Tabellenblatt End Sub Beim debuggen erhalte ich die Fehlermeldung: "Laufzeitfehler '424': Objekt er ...

Verfasst am: 21.01.2010, 09:12 Aufrufe: 720

Danke - leider funktioniert die Version nicht, da ich Windows 7 64bit habe - die ocx ist 32bit - kommt Fehlermeldung. Hättest du dafür eine Lösung ? Vielen Dank für Deine Bemühungen !

Verfasst am: 30.12.2009, 11:55 Aufrufe: 1202

Über einen Butten "Anlegen" öffnet sich ein neues Form um einen neuen Datensatz anzulegen. Und genau hier hänge ich nun. Bein Klick auf den Button "Anlegen" erhalte ich folgende Fehlermeldung (Siehe Notiz am Quellcode Form 2) ArgumentExeption wurde nicht behandelt Dies führt dazu, dass sich zwei Bindungen der Auflistung an dieselbe Eigenschaft binden. Parametername: binding Hier der b ...

Verfasst am: 29.12.2009, 19:46 Aufrufe: 607

Hallo meine 3. und letzte frage für mein Projekt. Ich möchte ein Button erst aktiviert haben wenn 3 Textboxen ausgefüllt sind, weil sonst so eine unschöne Fehlermeldung kommt. Also wenn textbox1, textbox2 und textbox 3 ausgefüllt sind kann button3 seine arbeit übernehmen und aktiv werden. ich weiß zwar das man das mit " Button1.Enabled = TextBox1.Text " machen kann aber wie geht das mit 3en? Very Happy

Auch ...

Verfasst am: 22.12.2009, 14:00 Aufrufe: 576

Verzeichnis umbenennen. VB6 Wäre schön wenn mir jemand helfen könnte. Fehlermeldung: Pfad und Datei nicht gefunden. Irgend etwas habe ich nicht verstanden. Gruß Manfred Option Explicit Dim DateiName As String Private Sub Laufwerk1_Change() Verzeichnis1.Path = Laufwerk1.Drive End Sub Private Sub Verzeichnis1_Change() Datei1.Path = Verzeichnis1.Path Bezeichnung1.Caption = Verzeichnis1.Path ...

Verfasst am: 10.12.2009, 15:15 Aufrufe: 524

hi, also ich wollte wissen was das is den ein tag öffnete ich vb08 wollte was coden und dann kommt die fehlermeldung vschost.exe funktioniert nicht mehr ok das war noch für mich normal aber dann wollte ich es debuggen und es kam z.b keygen by ... funktioniert nicht mehr ich kann keine programme die von vb08 gemacht wurden mehr öfnnen also wenn ihr eine lösung habt dann schreibt bitte was büdde ;D danke in vorraus ...

Verfasst am: 09.11.2009, 14:24 Aufrufe: 361

Kann nicht funktionieren. Bekommst sich ne Fehlermeldung oder? Richtig: If text2 = "1" or text2 ="2" or text2 ="3" Then text1 = "Hallo" End if Vorausgesetzt das "text2" der Name deiner Textbox ist! lG

Verfasst am: 12.08.2009, 17:23 Aufrufe: 411

also das problem habe ich in den griff bekommen. Nun habe ich mir noch eine Form erstellt damit man die Farbe vom Browser ändern kann. Leider habe ich dass problem dass ich nun eine fehlermeldung angezeigt bekomme. ich frage mich was an diesen Code nicht stimmt. If Combobox1.Text = "Rot" then Main Form.BackColor = Color Red