Compare commits
7 commits
1_ok_butto
...
main
| Author | SHA1 | Date | |
|---|---|---|---|
| 38e3144bf5 | |||
|
|
bd17c850f5 | ||
| ce874eaff7 | |||
|
|
c9b686492e | ||
|
|
f8a698905d | ||
|
|
b91b3c5d41 | ||
| 1773fcdade |
2 changed files with 19 additions and 1 deletions
14
Form1.Designer.vb
generated
14
Form1.Designer.vb
generated
|
|
@ -23,6 +23,7 @@ Partial Class Form1
|
|||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Button1
|
||||
|
|
@ -31,14 +32,24 @@ Partial Class Form1
|
|||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(107, 39)
|
||||
Me.Button1.TabIndex = 0
|
||||
Me.Button1.Text = "OK"
|
||||
Me.Button1.Text = "Action1"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.Location = New System.Drawing.Point(310, 178)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(128, 45)
|
||||
Me.Button2.TabIndex = 1
|
||||
Me.Button2.Text = "Action2"
|
||||
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(800, 450)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Name = "Form1"
|
||||
Me.Text = "Form1"
|
||||
|
|
@ -47,4 +58,5 @@ Partial Class Form1
|
|||
End Sub
|
||||
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Button2 As Button
|
||||
End Class
|
||||
|
|
|
|||
6
Form1.vb
6
Form1.vb
|
|
@ -1,3 +1,9 @@
|
|||
Public Class Form1
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
MessageBox.Show("hier käme Action1")
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
MessageBox.Show("hier käme Action2")
|
||||
End Sub
|
||||
End Class
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue