金蝶软件的工资计算公式是如何实现的?

dearfws 2001-05-08 10:42:00
金蝶的工资计算公司是采用脚本语言输入的,不知如何实现?
...全文
254 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
playyuer 2001-05-08
  • 打赏
  • 举报
回复
请问vb中有没有可以把算术字符串表达式的值计算出来的函数
http://www.csdn.net/expert/topic/63/63488.shtm
http://www.csdn.net/expert/TopicView.asp?id=63488
playyuer 2001-05-08
  • 打赏
  • 举报
回复
法1:
引用 Microsoft Script Control 1.0 (也可用控件)
objects: Form1、Command1、Text1
Code:
Private Sub Form_Load()
Text1.Text = "1+2+sqr(3)"
End Sub
Private Sub Command1_Click()
Dim s As New MSScriptControl.ScriptControl
s.Language = "VBScript"
s.AddObject "Form1", Me
s.AddCode "a=" & Trim(Text1.Text)
s.ExecuteStatement "Form1.Caption = a"
End Sub

法2:
Dim c As New ADODB.Connection
c.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWind2K.mdb;Persist Security Info=False"
Dim r As New ADODB.Recordset
Text1.Text=sqr(1*1+1)
r.Open "Select DISTINCT " & Trim(Text1.Text) & " From YourTable", c
'YourTable为任意已存在的表名 (Ms SQL Server 可不用 From 子句)
MsgBox r.Fields(0).Value

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧