Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
      Handles Me.Load
        'das hier geht nicht
        Me.Button1.AutoSize = True
        Me.Button1.AutoSizeMode = Windows.Forms.AutoSizeMode.GrowAndShrink
        Me.Button1.Text = "ddffgfghhgfhfghfghfghdgdfg"
        Me.Button1.Location = New Point(Me.Size.Width - Me.Button1.Size.Width - _
          20, Me.Button1.Location.Y)
 
        Me.Button2.Text = "dfgdfddfghgfhfghhhhhhhhhhhhhhhhhhhhhhhfddfg"
        Me.Button2.AutoSize = True
        Me.Button2.Refresh()
        Me.Button2.Location = New Point(Me.Size.Width - Me.Button1.Size.Width - _
          Me.Button2.Size.Width - 40, Me.Button1.Location.Y)
 
    End Sub
 
    Private Sub Form1_ResizeEnd(ByVal sender As Object, ByVal e As _
      System.EventArgs) Handles Me.ResizeEnd
        'das hingegen geht :-o
        Me.Button1.AutoSize = True
        Me.Button1.AutoSizeMode = Windows.Forms.AutoSizeMode.GrowAndShrink
        Me.Button1.Text = "ddffgfghhgfhfghfghfghdgdfg"
        Me.Button1.Location = New Point(Me.Size.Width - Me.Button1.Size.Width - _
          20, Me.Button1.Location.Y)
 
        Me.Button2.Text = "dfgdfddfghgfhfghhhhhhhhhhhhhhhhhhhhhhhfddfg"
        Me.Button2.AutoSize = True
        Me.Button2.Refresh()
        Me.Button2.Location = New Point(Me.Size.Width - Me.Button1.Size.Width - _
          Me.Button2.Size.Width - 40, Me.Button1.Location.Y)
    End Sub
End Class

--
Wenn jemand zu Dir sagt: die Zeit heilt alle Wunden, hau ihm in die Fresse und sag: Warte, ist gleich wieder gut!!!

Globetrotter - VB Tipps