VB6和Access 2003 [英] VB6 and Access 2003
问题描述
行。我会尝试让这个变得可以理解，所以这里是：
我有一个名为预测的vb 6表单
我有4个单独的表格，LMA1，LMA2，LMA3和影响区域
LMA1，LMA2和LMA3都将预测表附加到其上的文本框
因此预测表上的文本框将有多个条目放入进入它
我需要获取该文本框内的数据并查找重复项，然后在发现重复时显示警告。
例如，来自LMA1表格的
用户选择的Area1，Area4和Area8
来自LMA2表格的
用户选择的Area2，Area4和Area7 <用户选择的区域1，区域3和区域10来自LMA3的
因此，我在预测表单上的文本框中将包含所有9个选项。
它们的格式是每个值之间的单个空格，因此我的文本框数据为：Area1 Area4 Area8 Area2 Area4 Area7 Area1 Area3 Area10
我需要该程序查看此文本并查看重复项，然后显示警告，其中包含复制的区号
提前致谢
OK. I will try to make this understandable so here goes:
I have a vb 6 form called Forecast
I have 4 seperate forms, LMA1, LMA2,LMA3, and Impact Areas
LMA1,LMA2,and LMA3 all append to the Forecast Form to a text box on it
So the textbox on the Forecast Form will have multiple entries put into it
I need to take the data inside that text box and look for duplicates and then display a warning if duplication is found.
For example
from the LMA1 form the user selected Area1, Area4, and Area 8
from the LMA2 form the user selected Area2, Area4, and Area7
from the LMA3 form a user selected Area1, Area3, and Area10
So my textbox on the Forecast form would have all 9 of those selections in it.
The format for them is a single space between each value so my textbox data would be: Area1 Area4 Area8 Area2 Area4 Area7 Area1 Area3 Area10
I need the program to look at this text and see the duplicates and then show a warning that includes the Area number for duplication
Thanks in advance
推荐答案
好的。我会尝试让这个变得可以理解，所以这里是：
我有一个名为预测的vb 6表单
我有4个单独的表格，LMA1，LMA2，LMA3和影响区域
LMA1，LMA2和LMA3都将预测表附加到其上的文本框
因此预测表上的文本框将有多个条目放入进入它
我需要获取该文本框内的数据并查找重复项，然后在发现重复时显示警告。
例如，来自LMA1表格的
用户选择的Area1，Area4和Area8
来自LMA2表格的
用户选择的Area2，Area4和Area7 <用户选择的区域1，区域3和区域10来自LMA3的
因此，我在预测表单上的文本框中将包含所有9个选项。
它们的格式是每个值之间的单个空格，因此我的文本框数据为：Area1 Area4 Area8 Area2 Area4 Area7 Area1 Area3 Area10
我需要该程序查看此文本并查看重复项，然后显示一个警告，其中包含重复的区号。
提前付款
OK. I will try to make this understandable so here goes:
I have a vb 6 form called Forecast
I have 4 seperate forms, LMA1, LMA2,LMA3, and Impact Areas
LMA1,LMA2,and LMA3 all append to the Forecast Form to a text box on it
So the textbox on the Forecast Form will have multiple entries put into it
I need to take the data inside that text box and look for duplicates and then display a warning if duplication is found.
For example
from the LMA1 form the user selected Area1, Area4, and Area 8
from the LMA2 form the user selected Area2, Area4, and Area7
from the LMA3 form a user selected Area1, Area3, and Area10
So my textbox on the Forecast form would have all 9 of those selections in it.
The format for them is a single space between each value so my textbox data would be: Area1 Area4 Area8 Area2 Area4 Area7 Area1 Area3 Area10
I need the program to look at this text and see the duplicates and then show a warning that includes the Area number for duplication
Thanks in advance
嗨。好问题:)
通过Split（）函数将条目存储到数组中
Hi. Nice problem :)
Store the entries into an array via the Split() function
嗨。好问题:)
Hi. Nice problem :)
啊坚果！你又把我打败了。
我走了，在VB中写了一些示例代码，回来，刷新线程以防万一，willaka将再次打击。 :)
我要建议的一件事是，通过使用richtextbox而不是常规文本框，实际上可以用某种方式突出显示重复的单词 - 更改颜色或使用粗体，下划线或其他。
Ah nuts! You beat me to it again.
I went off and wrote some sample code in VB, came back, refreshed the thread just in case, and willakawill strikes again. :)
One thing I was going to suggest is that by using a richtextbox rather than a regular textbox, one can actually highlight the duplicated words in some way - change their colour, or use bold, underline or whatever.
啊坚果！你又把我打败了。
我走了，在VB中写了一些示例代码，回来，刷新线程以防万一，willaka将再次打击。 :)
我要建议的一件事是，通过使用richtextbox而不是常规文本框，实际上可以用某种方式突出显示重复的单词 - 更改颜色或使用大胆，下划线或其他什么。
Ah nuts! You beat me to it again.
I went off and wrote some sample code in VB, came back, refreshed the thread just in case, and willakawill strikes again. :)
One thing I was going to suggest is that by using a richtextbox rather than a regular textbox, one can actually highlight the duplicated words in some way - change their colour, or use bold, underline or whatever.
我只选择那些我知道你正在研究的人。这是职业自豪感的问题:)
违规项目也可以在纯文本框中突出显示，包含SetFocus，SelStart和SelLength
I only go for the ones that I know you are working on. It''s a matter of professional pride :)
The offending item can also be highlighted in a plain textbox with SetFocus, SelStart and SelLength
这篇关于VB6和Access 2003的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
