录入窗口中加了一个按钮，订单中新输入的客户如果客户表中没有可以添加，如果已存在则提示
这是我写的代码，
Dim dd As Row = Tables("订单表").Current
Dim kk As Col = Tables("客户表").Cols("客户")
If dd("客户") = kk Then
MessageBox.Show("此客户已存在!", "提示")
Else
Dim kh As Row = Tables("客户表").AddNew()
kh("客户") = dd("客户")
kh("电话") = dd("电话")
kh("公司名称") = dd("公司名称")
MessageBox.Show("客户添加成功!", "提示")
End If
详细错误信息：
重载决策失败，因为没有 Public“=”可以用这些参数调用:
'Public Shared Operator =(a As String, b As String) As Boolean':
与参数“b”匹配的参数无法从“Col”转换为“String”。
加好友 
发短信
Post By：2022/2/28 12:18:00 [显示全部帖子]
