Hi,
Ich wollte ein Programm programmieren das nach zb. Was sind dein Hobbys fragt.Wenn man den Button ok klickt soll er die informationen an eine email senden.
ICh hbas versucht abe rnicht hingekriegt:
Ich wollte ein Programm programmieren das nach zb. Was sind dein Hobbys fragt.Wenn man den Button ok klickt soll er die informationen an eine email senden.
ICh hbas versucht abe rnicht hingekriegt:
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
- Private Sub InitializeComponent()
- Me.Button1 = New System.Windows.Forms.Button
- Me.CheckBox1 = New System.Windows.Forms.CheckBox
- Me.Label1 = New System.Windows.Forms.Label
- Me.SuspendLayout()
- Me.Button1.Location = New System.Drawing.Point(143, 190)
- Me.Button1.Name = "Button1"
- Me.Button1.Size = New System.Drawing.Size(75, 23)
- Me.Button1.TabIndex = 0
- Me.Button1.Text = "ok"
- Me.Button1.UseVisualStyleBackColor = True
- Me.CheckBox1.AutoSize = True
- Me.CheckBox1.Location = New System.Drawing.Point(15, 94)
- Me.CheckBox1.Name = "CheckBox1"
- Me.CheckBox1.Size = New System.Drawing.Size(68, 19)
- Me.CheckBox1.TabIndex = 1
- Me.CheckBox1.Text = "Merken"
- Me.CheckBox1.UseVisualStyleBackColor = True
- Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(12, 18)
- Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(206, 45)
- Me.Label1.TabIndex = 2
- Me.Label1.Text = "Bitte beantworten sie folgene Frage :" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Was sind ire Hobby?"
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(229, 220)
- Me.Controls.Add(Me.Label1)
- Me.Controls.Add(Me.CheckBox1)
- Me.Controls.Add(Me.Button1)
- Me.Name = "abfrage"
- Me.Text = "Abfrage"
- Me.ResumeLayout(False)
- Me.PerformLayout()
- End Sub
- Friend WithEvents Button1 As System.Windows.Forms.Button
- Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
- Friend WithEvents Label1 As System.Windows.Forms.Label
- End Class
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „svbp“ ()