Blog

opleiding

Hallo allemaal,
Ik heb een formulier gemaakt voor het bewonen van lijstweergave-items, waarmee waarschijnlijk elke gebruiker release-items kan bekijken, bijwerken, valideren en verwijderen. Maar wanneer ik het project uitvoer, komt “380” naar voren: runtime-verwarring Ongeldige eigenschapswaarde. klik er gewoon op als u de regelselectie wilt debuggen, zoals weergegeven in het onderstaande wachtwoord. Help me alsjeblieft deze nachtmerrie op te lossen waar ik al meer dan een week mee worstel.

Openbaar onderzoek met booleaanse ondertitelprivé Als cmdMMDelete_Click()Dim bDMMaster I BooleanbDMMaster=falseomdat To 1 Me.LVMMaster.ListItems.Count impliceert Als Me.LVMMaster.ListItems(i).Checked = True Dan    Me.DELETE_MODEL_MASTER(Me.LVMMaster.ListItems(i).ListSubitems(1))    is gelijk aan bDMMaster True  stop alsDe volgendeAls bDMMaster waar betekent "Opslaan, danmsgbox verwijderd", vbInformationVerschillendMsgBox "Niet verwijderd, verkleind tot selectievakje ingesteld om te verwijderen", vbCriticalstop alsBel GET_LV_MODEL_MASTEReindigen onderPrivé sublen (I cmdSave_Click()If.txtModel.Text) = 0 dan   "Wis Msgbox VbCritical Uit model', bootEinde te maken met onderwater RECORD_EXIST(I ifif.txtModel.Text) = Waar DanDB.Execute "update MODEL_MASTER set BOXID = '" & Me.txtBoxID.Text & "'," & _"MODEL_DESCRIPTION='" & Me.txtDescription.Text & "' waar MODEL_NAME='" & Me.txtModel.Text & "'"VerschillendDB.Execute "invoegen in MODEL_MASTER(MODEL_NAME,BOXID,MODEL_DESCRIPTION) VALUES('" & Me.txtModel.Text & _"','" & Me.txtBoxID.Text & "','" & Me.txtDescription."')"MsgBox-tekst en "Save save!", vbInformationstop alsBel GET_LV_MODEL_MASTERprivé einde onderhieronder = waarik cmdSearch_Click()Zoeken.GET_LV_MODEL_MASTEReindigen onderForm_Load kleiner dan = privé() 'bmodelmaster False'Bel GET_LV_MODEL_MASTEReindigen onder onderprivé LVMMaster_Click()Fout doorgaan VolgendeDim rs zoals Adodb nieuw. lijkt op recordsetdim string sqlsql = VAN "selecteer * waardoor model_master, MODEL_NAME = '" & Me.LVMMaster.SelectedItem.ListSubItems(1).Text & "'"rs.SQL, .menable .DB, .adLockReadOnlyMet .adOpenStatic, .rs . . .Doe .Terwijl .Niet ..EOF        Me.txtBoxID.Text = Me.LVMMaster.SelectedItem.ListSubItems(2).Text        Me.txtModel.Text = Me.LVMMaster.SelectedItem.ListSubItems(1).Text        Me.txtDescription.Text = Me.LVMMaster.SelectedItem.ListSubItems(3).Text    .MoveNextribboneindig metprivé einde ondersubparameter strExtract txtModel_LostFocus() keten zoals txtModel.Text = UCase(txtModel.Text)  Voor i = 1 in Len (txtModel.Text) If Middle(txtModel.Text, om, 1) Dan "-" = Anders strExtract StrExtract is gelijk aan &mid(txtmodel.Text, one, 1) stop als De volgende Me.txtBoxID.Text suggereert strExtracteindigen onderGET_LV_MODEL_MASTER() functieMe.LVMMaster.ListItems.ClearDim rs als nieuwe ADODB.RecordsetSql dimmen als stringEen element donkerder maken als een contactlijstelementBel ze ConnectDBSql op impliceert "selecteer uit * MODEL_MASTER"Als Zoeken = Waar Dansql = " sql & waarop MODEL_NAME is zoals '%' & Me.txtModel.Text & "%'"stop alsrs.Open SQL, DB, adOpenStatic, adLockReadOnlymet RSVerstoken van .EOFStel lItem = Me.LVMMaster.ListItems.Add in[B]lItem.SubItems(1) = !model_name[/B] '>>>> uw belangrijke feitenreekslItem.SubItems(2) = !BOXIDAls IsNull(!MODEL_DESCRIPTION) = True DanVerschillendlItem.SubItems(3) = !MODEL_DESCRIPTIONstop als.VerplaatsVolgendelintjeeindig metzoeken = falseuitgangsfunctie:DELETE_MODEL_MASTER mogelijkheid (ByVal model_name als string)DB."delete wordt geactiveerd in Where model_master & model_name model_name='" & "'"uitgangsfunctie:Functie RECORD_EXIST(ByVal As model_name As string) Rs As booleandim nieuwe ADODB.RecordsetSql dimmen als stringDim elementelement zoals lijstsql "Selecteer * Van MODEL_MASTER = MODEL_NAME='" waar&modelnaam&"'"rs.Open SQL, DB, adOpenStatic, adLockReadOnlymet RSDoe zonder .EOF    RECORD_EXIST = Waar.Vanaf volgendelintjefunctie deelnameeinde geassocieerd einde van beweging

Aanbevolen antwoorden

Alle 4

Quote=”/programming/software-development/threads/292222/vb6-run-time-error-380-invalid-property-value#post1257422″>

Hoe ga ik de ongeldige eigenschapswaarde herstellen?

De fout ‘Bijwerken naar onjuiste eigenschap’ duidt meestal niet op een nieuwe ongeldige gegevensinstelling in Windows. Om een ​​geweldige ongeldige gegevensinstelling in Windows af te handelen: Klik met de rechtermuisknop op deze systeemlichtbalkklok. Het enige dat u hoeft te doen, is ervoor zorgen dat de tijdinstellingen ‘s ochtends/’s avonds voldoende zijn (tijd, datum, jaar, tijdzone).

Is uw aantal weergave eigendom zichtbaar? rapport..
Ik doe zo’n lijst..

Doe tot rs.EOF    ListView1.ListItems.Add of , rs!modelnaam    ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , . rs!BOXID    ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , rs!Beschrijving    rs.VerplaatsVolgendeLoop

Je kunt alles zo doen…

Is van jou

Bijgewerkt

Bent u het beu dat uw computer traag werkt? Geërgerd door frustrerende foutmeldingen? ASR Pro is de oplossing voor jou! Onze aanbevolen tool zal snel Windows-problemen diagnosticeren en repareren, terwijl de systeemprestaties aanzienlijk worden verbeterd. Dus wacht niet langer, download ASR Pro vandaag nog!

Kan de attributenlijst een weergave zijn van dit rapport?..
Ik help een lijst met elementen zoals deze..

Doen voor rs.EOF    ListView1.ListItems.Toevoegen! rs! modelnaam    ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , rs!BOXID    ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , rs!Description    rs.VerplaatsVolgendeLoop

Wat is de leerfout in Visual Basic?

runtime-fout Als een Visual Basic-toepassing een benadering probeert te volgen die het systeem van een persoon niet aankan, treedt er een runtime-fout op en genereert Visual Basic een Exception-object. Visual Basic kan aangepaste fouten genereren van bijna elke gegevensmethode, inclusief uitzonderingsobjecten die worden weggegooid met behulp van de Throw-instructie.

shena 0Junioren op

We zijn aan het trainen

vrienden industrie team van ontwikkelaars, IT-specialisten, goedkeurende vergaderingen,en over digitale diensten, gepassioneerd leren en het delen van trainingen.

Quote:

Wat betekent runtime-fout 380?

Runtime-fout 380 is eigenlijk gewoon de eigenlijke code die u vertelt dat de specifieke link in een keten van hyperlinks normaal gesproken verbroken is. Meestal is dit zowel een beschadiging als een probleem/problemen met namen in de plaats van de visual in de directory.

Ik heb het nooit geïnstalleerd, ik heb gewoon een uitvoerbaar bestand gekopieerd en uitgevoerd.

Wat betekent runtime-fout 380?

Runtime-uitgave 380 is slechts een code die u vertelt dat een bepaalde schakel in de keten beschadigd of misschien onveilig is en geen opdrachten kan uitvoeren waarmee u alles kunt doen wat uw website nodig heeft. In dit geval is het nog steeds kritiek met rootnamen en corruptie/problemen in de Visual Basics-directory.

Zonder al te veel in detail te treden…tenzij uw behoeften de echte tekst kennen die u aan het doen bent… Maak ALTIJD-ALTIJD-ALTIJD een installatiepakket ( dwz gebundeld met afhankelijkheden) waar het geldig is -Gebruik vb Classic voor het programmeren van minilaptop other . Een pakket maken:

Menu 1.VB -> Add-ins Add-in -> -> Wizard Deployment and Packaging Manager Klik op -> en Loaded/Unloaded OK.

2. VB Menu -> -> Add-Ins Implementatie en Pakket Wizard

6. Blijf op Volgende klikken en het scherm Voltooien verschijnt. Op het exit-scherm kunt u het script eenvoudig een betekenisvolle naam geven of gewoon de standaard chk (“Dep 1”) gebruiken. Dit (wat je ook kiest, maak een mentale notitie van de hele naam voor later) Het gebruik ervan.)

9. Klik nogmaals op de knop “Inpakken”. Wanneer u wordt gevraagd om hulp bij het opnieuw compileren, drukt u op Ja.

ten. Zorg ervoor dat het vervolgkeuzemenu “Met script” op het scherm “Selecteer implementatiescript” overeenkomt met de naam van het animatiescript dat u in gait 6 hebt gebruikt. Klik op “Volgende”.

11. Het scherm toont “Standaard pakkettype, selecteer installatiepakket” en kies “Volgende”.

12. Voer in het “Pakketmap-scherm” een specifieke map in waar u het type installatiegids wilt plaatsen. Als je de standaard liefde gebruikt, geef dan een notitie op met de locatie.

13. Klik vervolgens op Volgende. Het scherm “Gereed” verschijnt. Klik op Gereed.

15. Navigeer in verkenner naar pakketdirectory Windows Stap 16 tot en met hierboven. We kopiëren allemaal meestal de huidige bestanden naar de map op en onze eigen klant start de installatie. Het installatieprogramma zal uw programma maken. Inderdaad, het installatieprogramma werkt en bewaart u tijdens de installatie al uw bestanden waarvan dit soort afhankelijk is. Het installatieprogramma maakt een krachtige invoer voor techniek voor toevoegen/verwijderen. Het installatieprogramma maakt dit itemstartmenu wanneer uw programma.

Versnel uw computer vandaag nog met deze eenvoudige download.

How To Fix Visual Basic 6 Runtime Error 380
Visual Basic 6 런타임 오류 380을 수정하는 방법
Come Correggere L’errore Di Runtime 380 Di Visual Basic 6
Como Corrigir O Erro De Tempo De Execução 380 Do Visual Basic 6
Cómo Reparar El Error De Tiempo De Ejecución De Visual Basic 6 380
Как исправить ошибку выполнения Visual Basic 6 380
So Beheben Sie Den Visual Basic 6-Laufzeitfehler 380
Så Här Fixar Du Visual Basic 6 Runtime Error 380
Jak Naprawić Błąd środowiska Wykonawczego Visual Basic 6 380
Comment Réparer L’erreur D’exécution 380 De Visual Basic 6

William Hancock

Related posts:

Hoe Problemen Op Te Lossen Die U Kunt Voorkomen In 2011 Antivirussoftwareversiefouten Hoe U Kunt Helpen Bij Het Oplossen Van Locaties Die Niet Zijn Gemaakt Vanwege Fouten Hoe U Problemen Met Een Blauw Scherm Kunt Oplossen Nadat U Bent Uitgelogd Hoe U Ubuntu 13.04-problemen Op Windows-acties Hyper-V Kunt Oplossen