Top-Themen

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

Form wechsel schlägt fehl

Mitglied: badmaxx

badmaxx (Level 1) - Jetzt verbinden

29.12.2006, aktualisiert 02.01.2007, 3717 Aufrufe, 10 Kommentare

Hi @ all

mein problem ist folgendes: Ich geh von der 1."Seite" mit
01.
Me.Visible = false  
02.
Geo.visible = true

auf die 2."Seite" von der dann mit
01.
Me.Visible = false 
02.
Flächen.Visible = true
auf die 3."Seite" wenn ich nun versuche mit
01.
Me.Visible = False 
02.
Quadrat.Visible = True
auf die nächste "Seite" zu gehn zeigt es mir nichts an aber das PRogramm beendet sich auch nicht. Ich verwende VB Express Edition 2005.

Ich hoff ihr könnt mir helfen.

Gruß
Maxi
Mitglied: bastla
30.12.2006 um 18:35 Uhr
Hallo badmaxx!

Vielleicht ein wenig mehr Info ...

Anyhow - versuch mal
01.
Quadrat.Show
bzw setze zu Testzwecken in Projekteigenschaften (Doppelklick auf "My Project") / Anwendung "Quadrat" als Startformular, um zu sehen, ob die "Seite" ohne Fehler geöffnet wird.

Grüße
bastla
Bitte warten ..
Mitglied: badmaxx
30.12.2006 um 18:52 Uhr
was willst du für infos?
gruß
maxi
Bitte warten ..
Mitglied: bastla
30.12.2006 um 19:29 Uhr
Hallo badmaxx!

was willst du für infos?
Etwa, welche Einstellungen Du für "Quadrat" bereits vorgenommen hast, ob es eine "Form_Load"-Prozedur für "Quadrat" gibt, oder ob "zeigt es mir nichts an" auch für die Taskleiste gilt, ...

Grüße
bastla
Bitte warten ..
Mitglied: badmaxx
31.12.2006 um 14:06 Uhr
01.
Public Class Quadrat 
02.
 
03.
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
04.
        End 
05.
    End Sub 
06.
 
07.
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
08.
        TextBox2.Text = Format(CDbl(TextBox1.Text) * CDbl(TextBox1.Text), "0.00.") 
09.
        'Berechnung der Fläche 
10.
 
11.
        TextBox3.Text = Format(CDbl(TextBox1.Text) * 4, "0.00") 
12.
        'Berechung des Umfangs 
13.
 
14.
        TextBox1.Text = Format(Math.Sqrt(CDbl(TextBox2.Text)), "0.00") 
15.
        'Berechnung der Seite a aus der Fläche 
16.
 
17.
        TextBox1.Text = Format(CDbl(TextBox3.Text) / 4, "0.00") 
18.
        'Berechnung der Seite a aus dem Umfang 
19.
 
20.
        TextBox4.Text = Format(CDbl(TextBox1.Text) * Math.Sqrt(2), "0.00") 
21.
        'Berechnung der Diagonalen 
22.
 
23.
    End Sub 
24.
 
25.
    Private Sub Quadrat_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
26.
 
27.
    End Sub 
28.
 
29.
    Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged 
30.
 
31.
    End Sub 
32.
 
33.
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
34.
        Me.Visible = False 
35.
        Fläche.Visible = True 
36.
    End Sub 
37.
End Class
Ich hoff das hilft dir erstmaö weiter. Kannst du mir sagen was an meiner Berechnung falsch ist da er mir immer einen fehler bringt wenn ich die form ausführe.
Gruß
Maxi
ps. Guten rutsch
Bitte warten ..
Mitglied: bastla
31.12.2006 um 15:08 Uhr
Hallo badmaxx!

Die Berechnungen in "Button1_Click" kannst Du nur ausführen, wenn die TextBox1 nicht leer ist, daher zuerst ein
01.
If TextBox1.Text <> "" Then
einfügen - ein Preis für die Verwendung von CDbl(), das im Gegensatz zu Val() einen leeren Text nicht in 0 umwandelt.

Abgesehen von dem "Schönheits"-Fehler "Ein Punkt zuviel" bei der Formatierung der Flächen-Berechnung ("0.00.") kann ich im Code ansonsten nichts Auffälliges entdecken.

Du könntest aber noch die (derzeit) nicht benötigten Subs "Quadrat_Load" und "TextBox3_TextChanged" entfernen.
Welcher Fehler wird denn beim Ausführen der Form angezeigt?

Grüße
bastla
Bitte warten ..
Mitglied: badmaxx
01.01.2007 um 20:25 Uhr
Gibt es eigentlich eine möglichkeit die aktuelle form auszuführen?
Bitte warten ..
Mitglied: bastla
01.01.2007 um 20:33 Uhr
Hallo badmaxx!

Gibt es eigentlich eine möglichkeit die aktuelle form auszuführen?

ZB wie oben schon empfohlen: Setze in Projekteigenschaften (Doppelklick auf "My Project") / Anwendung "Quadrat" als Startformular ...

Grüße
bastla
Bitte warten ..
Mitglied: badmaxx
01.01.2007 um 21:43 Uhr
ich meine ob es einen möglichkeit gibt die aktuelle form auszuführen ohne das jedesmal umzustellen
Bitte warten ..
Mitglied: bastla
01.01.2007 um 22:25 Uhr
Hallo badmaxx!

Leider kenne ich keine andere Möglichkeit.

Grüße
bastla
Bitte warten ..
Mitglied: badmaxx
02.01.2007 um 01:35 Uhr
*Kopfschüttel*
Ich hab jetz den namen der form von Quadrat in form1 geändert und jetz gehts.
Muss man nicht verstehen oder?
ps. frohes neues Jahr!
Bitte warten ..
Ähnliche Inhalte
Windows Installation
Windows Upgrade schlägt fehl
Frage von ratzekahlxWindows Installation11 Kommentare

Hallo zusammen, ich habe ein Problem, welches schon seit Tagen ungelöst ist. Simples Upgrade von Windows 7 auf Windows ...

Windows Tools
DotNet Installation schlägt fehl
gelöst Frage von emeriksWindows Tools1 Kommentar

Hi, Windows Server 2008 R2 SP1 Ich will/muss .Net auf min. 4.5 aktualisieren, weil eine Anwendung das erfordert. Egal, ...

Windows Server
RDS Installation schlägt fehl
gelöst Frage von mhard666Windows Server10 Kommentare

Hallo allerseits, ich schlage mich seit geraumer Zeit mit folgendem Problem herum: Ich versuche unter Server 2012R2 eine RDS-Umgebung ...

Windows Server
Zertifikat erneuern schlägt fehl
Frage von Tacker32Windows Server4 Kommentare

Hallo, das Domänen-Controller Zertifikat auf unserem SBS2011 läuft in 3 Monaten ab. Beim Versuch dieses zu erneuern erhalte ich ...

Neue Wissensbeiträge
Humor (lol)

Das neue Miniatur Wunderland OFFICIAL VIDEO - worlds largest model railway - railroad

Information von StefanKittel vor 2 StundenHumor (lol)

Hallo, wer noch nie im Miniatur Wunderland war, sollte es dringend mal nachholen. Es gibt eine neues Video. Viele ...

Exchange Server

Exchange 2010-2019 Sicherheitslücke durch Regkey löschen schließen

Information von sabines vor 13 StundenExchange Server1 Kommentar

Unter ist eine Lücke im Exchange 2010-2019 beschrieben, die durch das Löschen eines reg keys geschlossen werden kann. In ...

Windows Server
Erneutes Release von WS2019 und Win10 v1809
Tipp von IT-Pro vor 1 TagWindows Server3 Kommentare

Hi, nachdem der Windows Server 2019 und Windows 10 in der Version 1809 aufgrund von verschwinden von Dateien nach ...

CPU, RAM, Mainboards
Spectre Update Tool für ältere PCs
Information von sabines vor 1 TagCPU, RAM, Mainboards6 Kommentare

Mit Hilfe eines Tools wird der betreffende PC permanent von einem USB Stick gestartet, der ein passendes Microcode Update ...

Heiß diskutierte Inhalte
Windows Server
Lohnt sich eine Domäne für uns?
Frage von BowsetteWindows Server15 Kommentare

Hallo, ich arbeite in einem kleinen Unternehmen mit mehr als 5 und weniger als 10 Mitarbeitern, also Small Business ...

Java
Testautomatisierung
gelöst Frage von WPFORGEJava15 Kommentare

Hallo, nehmen wir an, es gibt eine Webseite mit einer Karte und einem Suchfeld. Nun wird in das Suchfeld ...

Viren und Trojaner
Office365 Trojaner Analyse
Frage von ZeppelinViren und Trojaner12 Kommentare

Liebe Community, ich wende mich an euch, um mehr über den Office365 Trojaner zu erfahren, welcher grade seine Runden ...

Exchange Server
PST Datei enthält weder Betreff noch Absender
gelöst Frage von SSamuelExchange Server10 Kommentare

Hallo zusammen, ich versuche aus einer wiederhergestellten Exchange (SBS2011) .EDB mit dem Programm "Kernel for Exchange von Nucleus" eine ...