Předpokládaje, že máme Form1 s prvky TextBox1 a TextBox1 a Button1. Událost TextBoxes_TextChanged společnou pro oba textboxy, kde se čeká, zda je vyplněn potřebný počet znaků, pak zpřístupní ve výchozím stavu nepřístupný button, který pomocí události Click spojí text dle zadání. Nepřístupný button postačí případně nastavit v návrháři, události textboxů mohou být samostatně se stejným řádkem kódu prostě dle potřeby a chuti. Je to ve vb.Net, ale snad to napoví, případně použít nějaký converter.
Public Class Form1
Private Sub TextBoxes_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged, TextBox2.TextChanged
Button1.Enabled = TextBox1.TextLength >= 2 And TextBox2.TextLength >= 3
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim jmeno_prijmeni As String = String.Format("{0} {1}", TextBox1.Text, TextBox2.Text)
Dim jmeno2chars_prijmeni3chars As String = TextBox1.Text.Substring(0, 2) & TextBox2.Text.Substring(0, 3)
MessageBox.Show(jmeno_prijmeni & vbNewLine & jmeno2chars_prijmeni3chars, "Zapsat si to ...")
End Sub
Public Sub New()
' This call is required by the designer.
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
Button1.Enabled = False
End Sub
End Class
|