Hallo Community,
es ist für euch wahrscheinlich ein recht einfaches Problem, aber ich stehe derzeit ziemlich auf dem Schlauch (ich denke gerade eher von der Logik her). Ich habe eine If-Bedingung, wenn diese nicht erfüllt wirt, soll er aber nicht aus der If rausgehen, sondern in der Form bleiben.
Ich kann euch einfach mal meinen Code zeigen, vielleicht versteht der eine oder andere ja schon, was ich möchte.
Derzeit löse ich es so, dass er eine Exception fliegen lässt. Das ist, mehr oder weniger, in Ordnung. Ich möchte halt, wenn er erkennt, dass die Textbox leer ist, das ne MsgBox fliegt, er aber in der Form bleibt.
Viele (hirnlich matschige) Grüße
Toorms
es ist für euch wahrscheinlich ein recht einfaches Problem, aber ich stehe derzeit ziemlich auf dem Schlauch (ich denke gerade eher von der Logik her). Ich habe eine If-Bedingung, wenn diese nicht erfüllt wirt, soll er aber nicht aus der If rausgehen, sondern in der Form bleiben.
Ich kann euch einfach mal meinen Code zeigen, vielleicht versteht der eine oder andere ja schon, was ich möchte.
VB.NET-Quellcode
-
- Imports System.Management
- Imports System.Windows.Forms
- Imports Convicu.GlobalErrorHandler
- Public Class frmHostname
- Private Sub btnHostnameOK_Click(sender As Object, e As EventArgs) Handles btnHostnameOK.Click
- Try
- If String.IsNullOrEmpty(txtBxHostnameNew.Text) Then
- 'Throw New Exception("")
- Else
- Dim objManagementPath As New ManagementPath(String.Format("Win32_ComputerSystem.Name='{0}'", System.Environment.MachineName))
- Dim objComputerSystemClass As New ManagementObject(objManagementPath)
- Dim objRenameParameters As ManagementBaseObject
- objRenameParameters = objComputerSystemClass.GetMethodParameters("Rename")
- objRenameParameters("Name") = txtBxHostnameNew.Text
- objComputerSystemClass.InvokeMethod("Rename", objRenameParameters, Nothing)
- btnHostnameOK.Enabled = False
- End If
- Catch ex As Exception
- DialogResult = DialogResult.Cancel
- Throw New Exception(ex.ToString)
- End Try
- End Sub
- Private Sub btnClose_Click(sender As Object, e As EventArgs) Handles btnClose.Click
- Me.Close()
- End Sub
- End Class
Derzeit löse ich es so, dass er eine Exception fliegen lässt. Das ist, mehr oder weniger, in Ordnung. Ich möchte halt, wenn er erkennt, dass die Textbox leer ist, das ne MsgBox fliegt, er aber in der Form bleibt.
Viele (hirnlich matschige) Grüße
Toorms