Hallo,
Ich habe begonnen mit Wicrosofts visual Basic 2008 Express Edition herumzuspielen.
Nun möchte ich mir eine "Windows Forms Anwendung stricken:
In meinem Applikationsfenster habe ich eine TextBox und zwei Buttons.
Wenn ich die Application starte möchte ich in der Textbox eine Pfadangabe (z.B. "/windows/blablabla/" ) eingeben
und diese Pfadangabe dann mit dem Button "bestätigen" an ein vordefiniertes Kommando
z.B. "C:\WINDOWS\system32\dfscmd /view \\Abteilungsname\ /batch | find /i "
angefügt zur Ausführung in einem cmd-Fenster bringen.
(also letztendlich soll "C:\WINDOWS\system32\dfscmd /view \\Abteilungsname\ /batch | find /i /windows/blablabla/" ausgeführt werden)
Alternativ kann das Ergebnis der Suchabfrage auch gerne in einem Ergebnisbereich unterhalb der Textfeldes platziert werden, dann bräuchte ich aber noch einen Reset-button der mir das Ergebnis abschliessend wieder löscht.
Mit dem zweiten Button möchte ich die "Applikation" beenden können.
Kann man das einem Anfänger einfach erklären?
Bis jetzt sieht der (automatisch generierte) Code so aus:
Ich habe begonnen mit Wicrosofts visual Basic 2008 Express Edition herumzuspielen.
Nun möchte ich mir eine "Windows Forms Anwendung stricken:
In meinem Applikationsfenster habe ich eine TextBox und zwei Buttons.
Wenn ich die Application starte möchte ich in der Textbox eine Pfadangabe (z.B. "/windows/blablabla/" ) eingeben
und diese Pfadangabe dann mit dem Button "bestätigen" an ein vordefiniertes Kommando
z.B. "C:\WINDOWS\system32\dfscmd /view \\Abteilungsname\ /batch | find /i "
angefügt zur Ausführung in einem cmd-Fenster bringen.
(also letztendlich soll "C:\WINDOWS\system32\dfscmd /view \\Abteilungsname\ /batch | find /i /windows/blablabla/" ausgeführt werden)
Alternativ kann das Ergebnis der Suchabfrage auch gerne in einem Ergebnisbereich unterhalb der Textfeldes platziert werden, dann bräuchte ich aber noch einen Reset-button der mir das Ergebnis abschliessend wieder löscht.
Mit dem zweiten Button möchte ich die "Applikation" beenden können.
Kann man das einem Anfänger einfach erklären?
Bis jetzt sieht der (automatisch generierte) Code so aus:
VB.NET-Quellcode
- <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
- Partial Class Form1
- Inherits System.Windows.Forms.Form
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- <System.Diagnostics.DebuggerNonUserCode()> _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- <System.Diagnostics.DebuggerStepThrough()> _
- Private Sub InitializeComponent()
- Me.Label1 = New System.Windows.Forms.Label
- Me.TextBox1 = New System.Windows.Forms.TextBox
- Me.Button1 = New System.Windows.Forms.Button
- Me.Button2 = New System.Windows.Forms.Button
- Me.SuspendLayout()
- '
- 'Label1
- '
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(12, 9)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(168, 13)
- Me.Label1.TabIndex = 0
- Me.Label1.Text = "Bitte hier Namen einfügen...Piep..."
- '
- 'TextBox1
- '
- Me.TextBox1.Location = New System.Drawing.Point(12, 25)
- Me.TextBox1.Name = "TextBox1"
- Me.TextBox1.Size = New System.Drawing.Size(743, 20)
- Me.TextBox1.TabIndex = 1
- '
- 'Button1
- '
- Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
- Me.Button1.Location = New System.Drawing.Point(761, 25)
- Me.Button1.Name = "Button1"
- Me.Button1.Size = New System.Drawing.Size(75, 23)
- Me.Button1.TabIndex = 2
- Me.Button1.Text = "auflösen"
- Me.Button1.UseVisualStyleBackColor = True
- '
- 'Button2
- '
- Me.Button2.DialogResult = System.Windows.Forms.DialogResult.Cancel
- Me.Button2.Location = New System.Drawing.Point(364, 51)
- Me.Button2.Name = "Button2"
- Me.Button2.Size = New System.Drawing.Size(75, 23)
- Me.Button2.TabIndex = 3
- Me.Button2.Text = "Beenden"
- Me.Button2.UseVisualStyleBackColor = True
- '
- 'Form1
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(848, 88)
- Me.Controls.Add(Me.Button2)
- Me.Controls.Add(Me.Button1)
- Me.Controls.Add(Me.TextBox1)
- Me.Controls.Add(Me.Label1)
- Me.Name = "Form1"
- Me.Text = "Dfscmd"
- Me.ResumeLayout(False)
- Me.PerformLayout()
- End Sub
- Friend WithEvents Label1 As System.Windows.Forms.Label
- Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
- Friend WithEvents Button1 As System.Windows.Forms.Button
- Friend WithEvents Button2 As System.Windows.Forms.Button
- End Class
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „spaceball“ ()