UMV开发平台问题

bart　发表于：2009-12-20 18:03:45 　

问题1

在UMV开发平台第四章中的问题：修改窗体没有设计唯一性标识，意思是这样的：在【增加窗体】中员工的姓名是不重复的（因为有以下代码，见后），但在【修改窗体】中可以修改为重复的员工姓名，这样一来，增加窗体的这段代码就没意义了

If IsNull(Me.ygxm) Then
MsgBox "请输入员工姓名!", vbCritical, "提示："
Me.ygxm.SetFocus
Exit Sub
End If

Me.Refresh
If Acchelp_StrDataIsExist("tblCodeyg", "ygxm", Me.ygxm) = True Then
MsgBox "你输入的数据已经存在，请重新输入", vbCritical, "警告"
Me.ygxm.SetFocus
Exit Sub
End If

如果在修改窗体中也增加这段代码，可以保证数据的唯一性，但是如果误操作，比如不想修改了，无法退出，会显示该数据已存在，望老师答疑，谢谢！

问题2

员工姓名字段的长度为20，如果超过了会显示一个窗口，

能不能用自定义窗口解决这个问题，比如直接提示“输入的名字过长，请重新输入”之类，这样会更人性化，使用者也会觉得比较方便。谢谢

Top

麥田发表于：2009-12-20 20:29:40

问题一

实现修改时，弹出提示修改记录不能重复数据的窗口

http://www.accessoft.com/article-show.asp?id=2763

Top

麥田发表于：2009-12-21 14:08:14

问题二

用以下代码可以解决加在新增代码If MsgBox("您确认要保存吗?", vbOKCancel + vbInformation, "提示") = vbOK Then
上面

        If Len(Me.ygxm) > 8 Then
        MsgBox "你输入的姓名长度超过8个汉字！请输入在8个字以内！", vbOKOnly, "提示:"
        Exit Sub
    End If

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

[5分]UMV开发平台问题