回 帖 发 新 帖 刷新版面

主题:求师傅提供一个有重复输入数据就会弹出报错的源代码,谢谢!!!

具体是:
  1、输入到text里的内容自动保存到EXCEL或.txt的纯文本文件;
  2、能够实现有重复数据输入时,提示报错的功能,并且不保存重复数据;
  
  我时初学者,求师傅教导,我想看下源代码,学习编程思路,拜谢了!!

回复列表 (共1个回复)

沙发

1.保存文件很简单,参考一下别人的吧
2.重复输入报错代码:

Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr(Text1, Chr(KeyAscii)) Then MsgBox "重复数据": KeyAscii = 0
End Sub

我来回复

您尚未登录,请登录后再回复。点此登录或注册