Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles Button1.Click
Dim strMSJ As String = ""
If CheckBox1.Checked = True Then strMSJ = TextBox1.Text Else strMSJ = strMSJ
If CheckBox2.Checked = True Then strMSJ = strMSJ & " " & TextBox2.Text Else strMSJ = strMSJ
MsgBox(Trim(strMSJ))
End Sub
Saygılar, iyi çalışmalar.
*********
Kod, formül vs bilmek önemlidir ama mantığını yürütebilmek, nerede ve nasıl kullanılacağını bilmek daha önemlidir.
*********
Kod, formül vs bilmek önemlidir ama mantığını yürütebilmek, nerede ve nasıl kullanılacağını bilmek daha önemlidir.