repleace函数就可以了
repleace('sdsaaadd','a','')
第一个就是包含要替换字符的字符串,第二个就是要替换的字符串 第三个就是要替换成的字符串
sql="Select From 收费表 Where 项目名称='一年一班' and 收费时间>='2010-1-1' and 收费时间<='2010-6-30'"
应该叫SQL查询语句,不是公式
方法和详细的 *** 作步骤如下:
1、第一步,在桌面上,双击“
Management Studio”图标,见下图,转到下面的步骤。
2、第二步,执行完上面的 *** 作之后,单击左上角的“新建查询”按钮,见下图,转到下面的步骤。
3、第三步,执行完上面的 *** 作之后,在此界面中,输入SQL语句,见下图,转到下面的步骤。
4、第四步,执行完上面的 *** 作之后,单击左上方的“执行”选项,见下图,转到下面的步骤。
5、第五步,执行完上面的 *** 作之后,数据库中的计算公式已成功计算,见下图。这样,就解决了这个问题了。
首先在单据表A15插入公式
=COUNTA(A4:A9)
统计收据摘要有几行
A14插入公式生成日期
=DATE(O2,R2,U2)
A16插入公式
=COUNTA(数据库!A:A)
统计数据库记录行数
下面是宏
Sub Macro3()
Dim SJHS As Integer '收据摘要行数
Dim H As Integer '循环自然数
Dim SJKHS As Integer '数据库行数
SJHS = Range("A15")
SJKHS = Range("A16")
If SJHS = 0 Then
Exit Sub
Else
For H = 1 To SJHS
Sheets("数据库")Cells(SJKHS + H, 1) = Sheets("收据")Range("A14")
Sheets("数据库")Cells(SJKHS + H, 2) = Sheets("收据")Range("C2")
Sheets("数据库")Cells(SJKHS + H, 3) = Sheets("收据")Cells(H + 3, 1)
Sheets("数据库")Cells(SJKHS + H, 4) = Sheets("收据")Cells(H + 3, 13)
Sheets("数据库")Cells(SJKHS + H, 5) = Sheets("收据")Cells(H + 3, 16)
Sheets("数据库")Cells(SJKHS + H, 6) = Sheets("收据")Cells(H + 3, 19)
Sheets("数据库")Cells(SJKHS + H, 7) = Sheets("收据")Cells(H + 3, 22)
Sheets("数据库")Cells(SJKHS + H, 8) = Sheets("收据")Range("J11")
Next H
End If
MsgBox "信息登记成功,接下来请选择打印机打印!"
ApplicationDialogs(8)Show
Range("C2,A4:U9,J11") = ""
End Sub
以上就是关于数据库里保存的字段为数学公式,怎样实现查出时自动计算结果全部的内容,包括:数据库里保存的字段为数学公式,怎样实现查出时自动计算结果、SQL数据库公式、sql 怎么把数据库里的计算公式 进行计算等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)