-3
Private Sub InitNSD()
'For Vendor
With nsdUnit
.ClearColumn
.AddColumn "Unit ID", 1794.89
.AddColumn "Unit", 2264.88
.Connection = CN.ConnectionString
'.sqlFields = "VendorID, Company, Location"
.sqlFields = "UnitID, Unit"
.sqlTables = "Unit"
.sqlSortOrder = "Unit ASC"
.BoundField = "UnitID"
.PageBy = 25
.DisplayCol = 2
.setDropWindowSize 7000, 4000
.TextReadOnly = True
.SetDropDownTitle = "Units Record"
End With
End Sub
你的問題需要更多,只是一小段代碼。就像也許告訴我們哪一行你得到的錯誤? – shf301
也可以方便地知道nsdUnit的數據類型。 –