vb语言转换！ 详细的！

来源：百度知道 编辑：UC知道 时间：2024/09/20 21:41:34
Dim a(100) As Double
Dim n&
Dim Plus As Boolean
Dim yunsuan(100) As Integer
Dim a100 As Double

If Plus = True Then
Plus = False
Text1.Text = "1"
Else
Text1.Text = Text1.Text & "1"
End If
End Sub

是语言解释吗？
Dim a(100) As Double ‘定义a（100）数组为双精度型
Dim n& ’定义n为字符串型
Dim Plus As Boolean 定义PLUS为布尔型，也就是判断是真还是假。
Dim yunsuan(100) As Integer 定义yuansuan（100）数组为整数型
Dim a100 As Double 定义a100为双精度型

If Plus = True Then ‘如果plus为真，则
Plus = False plus为假。
Text1.Text = "1" ‘text1.text为“1”
Else ’否则
Text1.Text = Text1.Text & "1" ‘text1.text为text1.text和1的组成
End If ’退出判断
End Sub ‘退出当前过程