使用ms-access 2013,我编写了一个包含很多变量的查询。有没有一种方法可以看到运行时的查询,用变量名替换变量的值?而不是“选择* where名称= strName...”我正在寻找它运行时的样子,例如,"Select * where name = "jones“。有没有办法在窗体上显示它(查询在子窗体中)?谢谢。
我有一个方法,在给定VBComponent的情况下,我可以访问.Designer,并从那里访问.Controls集合:
private void DeclareControlsAsMembers(VBComponent form)
{
var designer = form.Designer;
if (designer == null)
{
return;
}
// using dynamic typing here, because not only MSForms could have a Controls col
我正试图以编程方式在Ms-Access中填充有界组合框的行源。但是,当我查看表单时,它没有显示任何数字。
Private Sub Form_Open(Cancel As Integer)
Me.cmbErrorType.RowSourceType = "Value List"
Me.cmbErrorType.RowSource = "1;2;3;4;5;6"
End Sub
当表单打开时,我单击组合框,它在下拉菜单中没有显示任何内容。
据我所知,行源用于在组合框中构建项,而不是为什么会发生这种情况?
我在数据表视图中显示了一个子窗体,其记录源如下所示:
SELECT MyTable.*, myFunction(MyTable.id) as my_result FROM MyTable
其中,myFunction()是调用MySQL存储过程的vba函数。
问题是myFunction()被调用太频繁了。例如,每当焦点在同一记录中从一个列移动到另一个列时,即使记录保持不变,它也会被调用。有没有办法阻止这种情况的发生?
我正在使用Ms-Access,我创建了一个用户表单,上面有许多文本框。这些盒子被命名为: Box1,Box2,Box3 ...
我需要遍历所有的盒子,但我不知道哪一个是最后一个。为了避免遍历所有userform控件,我想尝试以下方法:
For i =1 To 20
If Me.Controls("Box" & i).value = MyCondition Then
'do stuff
End If
Next i
这个错误发生在Box6,这是第一个找不到的盒子。有没有办法捕获这个错误,并在它发生时退出循环。
我知道我可以使用On Error,但我更愿意
我从来没有真正做过ms access查询,但今天我需要一个。我有两张桌子,模型和订单。来自第一个表的两个字段:数字和颜色,来自第二个唯一的数字,它只能等于来自表“模型”的数字的值。我需要的是选择最常用的颜色。在mysql中,这将类似于
SELECT models.color, orders.number FROM models
INNER JOIN orders ON (orders.number =models.number)
group by color
order by count(color) desc limit 1
但是在ms-access中,
我正在尝试调整MS-Access报告上的文本框、标签或框的大小,以条形图形式显示完成百分比。 我收到一个错误,说您输入的设置对此属性无效。 在下面的示例中,蓝色进度条应该是每个部门的完成百分比。如果灰色条为100%,则蓝色进度条应为运输灰色条的95.3%,机械进度条的99.0%,工程进度条的95.1%。 Private Sub GroupHeader4_Paint()
Box188.Width = <completeion %>
End Sub ?
我希望为从MS-Access数据库检索并存储在DataTable对象/变量myDataTable中的数据生成一些格式化输出。但是,myDataTable中的某些字段包含dbNull数据。因此,如果lastname、intials或sID字段中的任何一个字段的值为dbNull,则下面的VB.net代码片段将显示错误。
dim myDataTable as DataTable
dim tmpStr as String
dim sID as Integer = 1
...
myDataTable = myTableAdapter.GetData() ' Rea