动态创建控件及以循环赋值之一

智者知已应修善业

已于 2022-03-18 16:31:22 修改

阅读量1.2k

点赞数

文章标签： wpf c# linq

于 2014-09-01 19:18:54 首次发布

本文链接：https://blog.csdn.net/xianfajushi/article/details/38984049

版权

下面以创建一组按钮为例:

            int 数 = 4;
            string[] 控件名 = new string[数];
            do
            {
                控件名[--数] = "BUT" + 数.ToString("00");
            } while (数 > 0);
            Button[] 控件组 = Array.ConvertAll(控件名, 控件 => new Button());
            数 = 4;
            控件组 = new Button[数];
            do
            {
                控件组[--数] = new Button();
                控件组[数].Name = "BUT" + 数.ToString("00");
                控件组[数].Text = "BUT" + 数.ToString("00");
                控件组[数].Parent = this;
                控件组[数].Anchor = (AnchorStyles.Top | AnchorStyles.Left);
                控件组[数].Location = new Point(100 * 数, 17);
            } while (数 > 0);

Button[] 按钮集 = { };
            string[] 按钮名 = new string[]{"朗读","暂停","停止","录制"};
            按钮集 = Array.ConvertAll(按钮名, 控件 => new Button()).ToArray();
            按钮集.Select((按钮, 序号) => 按钮.Text = 按钮名[序号]).ToArray();
            按钮集.Select(按钮 => 按钮.Size = new Size(47, 24)).ToArray();
            按钮集.Select((按钮, 序号) => 按钮.Location = new Point(47 * 序号, 1)).ToArray();
            按钮集.Select(按钮 => 按钮.Parent = this).ToArray();

     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim fuxuan As CheckBox = New CheckBox
        Dim danxuan As RadioButton = New RadioButton
        fuxuan.Parent = Me
        danxuan.Parent = Me
        fuxuan.Location = New Point(100, 17)
        danxuan.Location = New Point(240, 17)
        fuxuan.Checked = True
        TextBox1.Text = fuxuan.Checked.ToString + " " + danxuan.Checked.ToString
    End Sub