Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VB Script - Wert (Währung) einer TextBox auslesen um damit zu rechnen.

Frage Entwicklung VB for Applications

Mitglied: TSkott

TSkott (Level 1) - Jetzt verbinden

16.03.2011, aktualisiert 11:54 Uhr, 6177 Aufrufe, 7 Kommentare

Hallo.
Ich versuche, einen jährlichen Beitrag (Btrag1), der in die TextBox (Beitrag1) eingetragen wurde, auszulesen um mit Ihm zu rechen. Leider bekomme ich an markierter Stelle einen Syntaxfehler.
Wie kann ich also der Variabel 'zw_ergebnis' den Wert hinzufügen, den man im Formular in die entsprechende Textbox eingetragen hat? Am liebsten, hätte ich auch die Feldeigenschaft 'Währung' beibehalten.
Hier mein bisheriger Code:

01.
  
02.
        Set Zeigen	        = Item.GetInspector.ModifiedFormPages("Allgemein").Controls("Test1") 
03.
	Set Btrag1		= Item.GetInspector.ModifiedFormPages("Seite1").Controls("Beitrag1") 
04.
	Set ZwSum1		= Item.GetInspector.ModifiedFormPages("Seite1").Controls("Zahlungsweise1") 
05.
 
06.
	'-Berechnung-Verträge-----------------------------------------------------------------------------------' 
07.
	 
08.
	Dim summe, zw_ergebnis 
09.
	summe = 0 
10.
	zw_ergebnis = 0 
11.
	 
12.
			if ZwSum1.value = "jährlich" then 
13.
				Btrag1.value = zw_ergebnis                             '<---- hier scheint der Fehler zu sein!' 
14.
				zw_ergebnis / 12 
15.
				summe = summe + zw_ergebnis 
16.
			end if 
17.
 
18.
			if ZwSum1.value = "halbjährlich" then 
19.
				Btrag1.value = zw_ergebnis                             '<---- hier scheint der Fehler zu sein!' 
20.
				zw_ergebnis / 6 
21.
				summe = summe + zw_ergebnis 
22.
			end if 
23.
24.
25.
26.
 
27.
	zeigen.text = summe 
28.
 


Vielen Dank für Eure Aufmerksamkeit!
Mitglied: MrTrebron
16.03.2011 um 13:17 Uhr
Hallo TSkott,

welche FM wird denn angezeigt?

Gruß
Norbert
Bitte warten ..
Mitglied: TSkott
16.03.2011 um 13:33 Uhr
die Fehlermeldung lautet:

Syntaxfehler
Zeilennr: 14

Vielen Dank schonmal
Bitte warten ..
Mitglied: MrTrebron
16.03.2011 um 13:41 Uhr
Hi
nehme mal text anstatt value

Gruß
Bitte warten ..
Mitglied: felixcc
16.03.2011 um 13:48 Uhr
Hallo TSkott,

wenn du den Text auslesen willst, dann musst du das doch umgekehrt schreiben.
Auch die Zeile darunter gibt für mich leider keinen Sinn, du teilst zw_ergebnis durch 12 und machst aber nichts weiter damit.
Versuch es mal so:
01.
zw_ergebnis = Btrag1.Text 
02.
zw_ergebnis = zw_ergebnis / 12 
03.
summe = summe + zw_ergebnis
So sollte es funktionieren.
gruß
Felix
Bitte warten ..
Mitglied: TSkott
16.03.2011 um 13:48 Uhr
leider noch gleicher fehler


Gruß
Bitte warten ..
Mitglied: TSkott
16.03.2011 um 13:54 Uhr
Vielen vielen Dank!!

Es klappt!! Ihr seid die Größten ;)
Bitte warten ..
Mitglied: MrTrebron
16.03.2011 um 13:57 Uhr
Doh

Habe jetzt gar nicht darauf geachtet
Bitte warten ..
Ähnliche Inhalte
Visual Studio
gelöst VB bestimmte Stelle im Bild highlighten wenn MouseOver Textbox? (9)

Frage von PixL86 zum Thema Visual Studio ...

VB for Applications
gelöst VB-Script per Aufgabenplanung (2)

Frage von S4kar97 zum Thema VB for Applications ...

Microsoft
PowerShell Script auf Domänen-Rechnern ausführen (3)

Frage von Hoerli zum Thema Microsoft ...

Visual Studio
gelöst VB: Batchprogramm: Resultat zurückgeben an VB Form (Textfeld) (7)

Frage von PixL86 zum Thema Visual Studio ...

Neue Wissensbeiträge
LAN, WAN, Wireless

Schwachstelle im WPA2 Protokoll veröffentlicht

(3)

Information von colinardo zum Thema LAN, WAN, Wireless ...

Heiß diskutierte Inhalte