vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2021
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
btn und cms zur Laufzeit erzeugen 
Autor: FlyingGancho
Datum: 01.08.20 23:50

Hallo zusammen,
ich möchte zur Laufzeit einen Button erzeugen und diesem auch zur Laufzeit erzeugte ContextMenuStrip zuordnen. Soweit so gut.
Bei Klick auf das cms.item soll der Text des Items in eine txt geschrieben werden - das klappt bei mir nicht....

For i = 0 To 25
Dim cms As New ContextMenuStrip
For j = 0 To vlstVorgabe.Count - 1
Dim sb As New System.Text.StringBuilder(vlstVorgabe(j))
sb.Replace("00-", "")
h2 = sb.ToString
h3 = Strings.Left(h2, 1)
If h3 = Chr(i + 65) Or h3 = Chr(i + 97) Then
cms.Items.Add(h2)
End If
AddHandler cms.Click, AddressOf CMSClick
Next

Dim button1 As New Button
With button1
.Size = New Size(35, 26)
.Text = Chr(i + 65)
.TextAlign = ContentAlignment.TopCenter
.Location = New Point(i * 41 + 12, 174)
.Font = New Font("Microsoft Sans Serif", 12)
.ContextMenuStrip = cms
End With
Me.Controls.Add(button1)
AddHandler button1.Click, AddressOf BtnClick
Next

Private Sub CMSClick(ByVal sender As Object, ByVal e As EventArgs)
...
End Sub


und wenn ich noch einen Hinweis kriege, wie auch beim LinksClick das cms aktiviert wird...

Besten Dank
DC
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
btn und cms zur Laufzeit erzeugen186FlyingGancho01.08.20 23:50
Re: btn und cms zur Laufzeit erzeugen97Manfred X02.08.20 16:34
Re: btn und cms zur Laufzeit erzeugen83FlyingGancho03.08.20 01:31

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2021 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel