数据库结构:
UserName 字符串
位置字符串
价格编号
Requirement:
我有一个列表盒,里面有一些东西,比如100。用户将在列表框中随机选择10个(在将MULTISELECT属性更改为2fmMultiselect属性后)。我会有搜索按钮。选择并单击“搜索”后,必须计算并显示所选商品的总价格。
我的搜索代码(感谢亚历克斯先生)
enter code here
Private Sub CommandButton4_Click()
Dim Cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sName As String
Se