现在有一个access材料总表table1
索引 材料ID 物料描述 库存
暂空) 12.0150012 A 12535
暂空) 12.0150013 B 12535
暂空) 12.0150015 C 12535
暂空) 12.0150018 D 12535
暂空) 15.0150010 E 12535
.....
某个工程所用的材料表table2的所有内容包含在table1中(即:所有table2的内容包含在table1中)
table2
索引 材料ID 物料描述 数量(库存的一部分)
暂空) 12.0150012 A 530
暂空) 12.0150013 B 100
现在我将datagird与新建table连接,如何运用最快的办法输入table2 ??
1\用户熟悉的内容为"物料描述",但是文字输入较慢,可以增加自动记忆功能吗,代码如何考虑?
2\正在考虑编写尽可能简单的索引,例如"螺丝刀"---"lsd",这样与1\的办法结合.如果合理的话如何编写索引最科学呢有没有更好的考虑办法???
索引 材料ID 物料描述 库存
暂空) 12.0150012 A 12535
暂空) 12.0150013 B 12535
暂空) 12.0150015 C 12535
暂空) 12.0150018 D 12535
暂空) 15.0150010 E 12535
.....
某个工程所用的材料表table2的所有内容包含在table1中(即:所有table2的内容包含在table1中)
table2
索引 材料ID 物料描述 数量(库存的一部分)
暂空) 12.0150012 A 530
暂空) 12.0150013 B 100
现在我将datagird与新建table连接,如何运用最快的办法输入table2 ??
1\用户熟悉的内容为"物料描述",但是文字输入较慢,可以增加自动记忆功能吗,代码如何考虑?
2\正在考虑编写尽可能简单的索引,例如"螺丝刀"---"lsd",这样与1\的办法结合.如果合理的话如何编写索引最科学呢有没有更好的考虑办法???
你可考虑用SQL SERVER语句
\用户熟悉的内容为"物料描述",但是文字输入较慢,可以增加自动记忆功能吗,代码如何考虑?
2\正在考虑编写尽可能简单的索引,例如"螺丝刀"---"lsd",这样与1\的办法结合.如果合理的话如何编写索引最科学呢===========================================================
1:你把物料描述的输入放到一个COMBOBOX中,增加一个后,在COMBOBOX中增加一条记录2:你可以多见个字段,记录名字的汉语拼音,设置成索引.查询的时候就查这个索引
http://search.csdn.net/Expert/topic/1638/1638651.xml?temp=.3481409
一起学习吧!!
Private Const SHACF_AUTOSUGGEST_FORCE_ON As Long = &H10000000Private Const SHACF_AUTOSUGGEST_FORCE_OFF As Long = &H20000000Private Const SHACF_AUTOAPPEND_FORCE_ON As Long = &H40000000Private Const SHACF_AUTOAPPEND_FORCE_OFF As Long = &H80000000Private Const SHACF_DEFAULT As Long = &H0Private Const SHACF_FILESYSTEM As Long = &H1Private Const SHACF_URLHISTORY As Long = &H2Private Const SHACF_URLMRU As Long = &H4Private Const SHACF_URLALL As Long = (SHACF_URLHISTORY Or SHACF_URLMRU)Private Const DLLVER_PLATFORM_WINDOWS As Long = &H1 'Windows 95
Private Const DLLVER_PLATFORM_NT As Long = &H2 'Windows NTPrivate Type DllVersionInfo
cbSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformID As Long
End TypePrivate Declare Function SHAutoComplete Lib "shlwapi" _
(ByVal hwndEdit As Long, _
ByVal dwFlags As Long) As LongPrivate Declare Function DllGetVersion Lib "shlwapi" _
(dwVersion As DllVersionInfo) As Long
Private Function GetIEVersion(DVI As DllVersionInfo) As Long
DVI.cbSize = Len(DVI)
Call DllGetVersion(DVI) GetIEVersion = DVI.dwMajorVersion
End Function
Private Function GetIEVersionString() As String
Dim DVI As DllVersionInfo
DVI.cbSize = Len(DVI)
Call DllGetVersion(DVI) GetIEVersionString = "Internet Explorer " & _
DVI.dwMajorVersion & "." & _
DVI.dwMinorVersion & "." & _
DVI.dwBuildNumber
End Function
Private Sub Command1_Click() Dim DVI As DllVersionInfo If GetIEVersion(DVI) >= 5 Then
Call SHAutoComplete(Text1.hWnd, SHACF_DEFAULT)
Command1.Caption = "SHAutoComplete is On"
Command1.Enabled = False
Text1.SetFocus
Text1.SelStart = Len(Text1.Text)
Else
MsgBox "Sorry ... you need IE5 to use this demo", vbExclamation
End If
End Sub
Private Sub Form_Load() Dim DVI As DllVersionInfo Label1.Caption = "Using Shlwapi.dll for " & GetIEVersionString
Command1.Enabled = GetIEVersion(DVI) >= 5
Command1.Caption = "SHAutoComplete is Off"End Sub