Php 理解VBScript_Php_Javascript_Html_Excel_Vba

Php 理解VBScript

php javascript html excel vba

Php 理解VBScript,php,javascript,html,excel,vba,Php,Javascript,Html,Excel,Vba,我有一个VBScript，我正在转换成PHP，我有一些部分我不理解，也不知道它的输出。。。如果可能的话，还可以在HTML/PHP中为我提供类似的方法 TextBox1.Value = 1# txtTurnoverIncl = TextBox1 Format(CDbl(txtTurnoverExcl.Text) * _ CDbl(txtRoyalty.Text) / 100, "#,##0.00") If txtTurnoverExcl.T

我有一个VBScript，我正在转换成PHP，我有一些部分我不理解，也不知道它的输出。。。如果可能的话，还可以在HTML/PHP中为我提供类似的方法

TextBox1.Value = 1#
txtTurnoverIncl = TextBox1
Format(CDbl(txtTurnoverExcl.Text) * _
                             CDbl(txtRoyalty.Text) / 100, "#,##0.00")
If txtTurnoverExcl.Text <> "" Then
Format(Round(.Text * 14 / 114, 2), "#,##0.00")
TextBox1 = Now()
TextBox3 = Date
TextBox4 = Format(MyDate, "dddd")

我想就这些。

最后一个函数以相当复杂的方式返回名为“Textbox10”、“Textbox11”和“Textbox12”的文本框的值之和。我猜在PHP中，您会这样做（假设您正在发布表单）：

TextBox1.Value=1 35;

-将值1以双精度格式分配给textbox控件。（谢谢麦克风）

txtTurnoverIncl=TextBox1

-将控件的引用

TextBox

分配给名为

txtTurnoverIncl

CDbl（txtTurnoverExcl.Text）

-将文本框中的文本

txtTurnoverExcl

转换为双精度，即带小数点的数值，例如2.6-如果您想对该值执行数学运算，这非常有用

格式（…，“#，##0.00”）

-格式编号如下：

2.60

或

8.25

，即小数点后有两位数字

Round（.Text*14/114，2）

.Text

意味着你在

与（somecontrol）

块的内部，因此它实际上是

somecontrol.Text

，即获取控件的文本。Round函数将对数字进行四舍五入，例如

Round（662.791,2）

将返回

662.79

，

Round（662.796,2）

将返回

662.8

Now（）

-返回执行代码的计算机上的当前日期和时间

Date

或

Date（）

-与Now（）类似，但只有日期，时间才会是00:00:00

格式（MyDate，“dddd”）

-根据机器上的区域性获取MyDate的星期几的名称。例如，对于希伯来文化，它将返回

周二。通常，Format（）给定日期和字符串将根据字符串对日期进行格式化，例如Format（Now（），“dd/MM/yyyy”）
将返回14/12/2010


TextBox1.Value=1 35;
-将值1以双精度格式分配给textbox控件。（谢谢麦克风）
txtTurnoverIncl=TextBox1
-将控件的引用TextBox
分配给名为txtTurnoverIncl

CDbl（txtTurnoverExcl.Text）
-将文本框中的文本txtTurnoverExcl
转换为双精度，即带小数点的数值，例如2.6-如果您想对该值执行数学运算，这非常有用
格式（…，“#，##0.00”）
-格式编号如下：2.60
或8.25
，即小数点后有两位数字
Round（.Text*14/114，2）
-.Text
意味着你在与（somecontrol）
块的内部，因此它实际上是somecontrol.Text
，即获取控件的文本。Round函数将对数字进行四舍五入，例如Round（662.791,2）
将返回662.79
，Round（662.796,2）
将返回662.8

Now（）
-返回执行代码的计算机上的当前日期和时间
Date
或Date（）
-与Now（）类似，但只有日期，时间才会是00:00:00
格式（MyDate，“dddd”）
-根据机器上的区域性获取MyDate的星期几的名称。例如，对于希伯来文化，它将返回周二。通常，Format（）给定日期和字符串将根据字符串对日期进行格式化，例如Format（Now（），“dd/MM/yyyy”）
将返回14/12/2010

首先，最好是分析整个事情（语义上）在做什么，而不是查看代码序列。所以这篇文章的其余部分有点推测性
屏幕上显示了几个文本框

TextBox1
。。。使用值1（double）初始化，稍后包含当前时间（now（）
）（imho本身就是一个sin-brrrr-希望对此有良好的业务逻辑解释）
TextBox3
。。。用当前日期初始化
TextBox4
。。。初始化为“我们不知道的东西”-希望是一个日期（MyDate
），格式为工作日（“ddddd”
）
TextBox10
-TextBox12
。。。似乎用于计算变量SumCashUp

我们还有一些变量，可能是文本框（有时我们会看到代码中添加了.Text）

txtTurnoverIncl
txtl
txtRoyalty
SumCashUp

还有一个代码片段，从毛利润中计算出14%的利润（*14/114
），对结果进行取整并格式化。。。我们不知道这个结果在哪里被使用。我们可以推测它可能是另一个表单字段（因为.Text
）-可能是txtRoyalty-但我们不知道
基本上，所有代码片段都是关于将值放入屏幕上显示的文本框和/或使用该文本框的值来计算某些内容（如SumCashUp或14%GM）
所以我想解决问题的途径一定是

获取文本框的源布局
Private Function SumCashUp() As Double
    Dim i As Long
    Dim tmp As Double
    For i = 10 To 12
        With Me.Controls("TextBox" & i)
            If IsNumeric(.Text) Then
                tmp = tmp + CDbl(.Text)
            End If
        End With
    Next i
    SumCashUp = tmp
End Function

function sumCashUp() {
   return (double) $_POST['Textbox10'] + (double) $_POST['Textbox11'] + (double) $_POST['Textbox12'];
}