Question

目标

我想显示我在标签＆＃34; ErrorProvider1＆＃34;错误中输入的文字。每当我收到错误时属性。请参阅以下标签的属性。

Error on ErrorProvider1

我尝试将红色矩形中的文本显示在我的ErrorProvider1 SetError(control, value)函数中。

 If TextBox1.Text.Trim.Contains("'") Then
    ErrorProvider1.SetError(lblErr, ErrorProvider1.GetError(lblErr))
Else
    ErrorProvider1.SetError(lblErr, "")
End If

如何检索ErrorProvider1上的错误＆＃39;来自lblErr的文本在ErrorProvider1 SetError值中显示它？

Answer 1

ErrorProvider组件非常难以有效使用。但它是可以修复的，我将在C＃中给出一个扩展组件的示例：

ShowError（Control ctl，bool enable）显示在 enable 参数为true时在设计时输入的文本。更容易使用的SetError（）版本。
如果显示任何活动警告图标，则HasErrors返回true。在OK按钮的Click事件处理程序中使用。
FocusError（）将焦点设置为第一个带有警告图标的控件（如果有）。如果没有剩余警告，则返回 false 。
SetError（）是ErrorProvider.SetError（）的替代。只有在表单的Load事件触发后添加任何控件或者您需要修改警告文本时，才需要它。

在项目中添加一个新类并粘贴下面显示的代码。编译。将其从工具箱顶部拖放到表单上。设计时行为是相同的。经过适度测试。

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Windows.Forms;
using System.ComponentModel.Design;

class MyErrorProvider : ErrorProvider {
    public void ShowError(Control ctl, bool enable) {
        // Easy to use version of SetError(), uses design-time text
        if (!enable) base.SetError(ctl, "");
        else {
            if (errors.ContainsKey(ctl)) base.SetError(ctl, errors[ctl]);
            else base.SetError(ctl, "No error text available");
        }
    }

    public bool HasErrors {
        // True if any errors are present
        get {
            foreach (var err in errors)
                if (!string.IsNullOrEmpty(base.GetError(err.Key))) return true;
            return false;
        }
    }

    public bool FocusError() {
        // Set the focus to the first control with an active error
        foreach (var err in errors) {
            if (!string.IsNullOrEmpty(base.GetError(err.Key))) {
                err.Key.Focus();
                return true;
            }
        }
        return false;
    }

    public new void SetError(Control ctl, string text) {
        // Use this only to add/modify error text after the form's Load event
        if (!string.IsNullOrEmpty(text)) {
            if (errors.ContainsKey(ctl)) errors[ctl] = text;
            else errors.Add(ctl, text);
        }
        base.SetError(ctl, text);
    }

    private void initialize(object sender, EventArgs e) {
        // Preserve error text
        copyErrors(((Form)sender).Controls);
    }
    private void copyErrors(Control.ControlCollection ctls) {
        foreach (Control ctl in ctls) {
            var text = this.GetError(ctl);
            if (!string.IsNullOrEmpty(text)) {
                errors.Add(ctl, text);
                base.SetError(ctl, "");
            }
            copyErrors(ctl.Controls);
        }
    }

    private Dictionary<Control, string> errors = new Dictionary<Control, string>();

    // Plumbing to hook the form's Load event
    [Browsable(false)]
    public new ContainerControl ContainerControl {
        get { return base.ContainerControl; }
        set {
            if (base.ContainerControl == null) {
                var form = value.FindForm();
                if (form != null) form.Load += initialize;
            }
            base.ContainerControl = value;
        }
    }

    public override ISite Site {
        set {
            // Runs at design time, ensures designer initializes ContainerControl
            base.Site = value;
            if (value == null) return;
            IDesignerHost service = value.GetService(typeof(IDesignerHost)) as IDesignerHost;
            if (service == null) return;
            IComponent rootComponent = service.RootComponent;
            this.ContainerControl = rootComponent as ContainerControl;
        }
    }
}

Answer 2

您的问题是，当没有任何错误时，您正在替换错误消息。如下面的评论中所述，您将本地化的错误消息存储在标签Tag中，因此您可以执行以下操作：

If TextBox1.Text.Trim.Contains("'") Then
    ErrorProvider1.SetError(lblErr, lblErr.Tag)
Else
    ErrorProvider1.SetError(lblErr, "")
End If

使用ErrorProvider1.GetError(Control)获取值是正确的。只是在您检索它之前，您很可能用空字符串替换它。

如何在ErrorProvider1上显示标签错误

目标

2 个答案: