龙之谷手游舞娘刷图:问一个关于VB编程的问题

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 09:28:34
编7个text,一个command
我想让当text2+到text6 =100 + text1 * 10
然后如果两边等于。text7就显示“是这个工资”
如果不等于,就显示“不是这个工资”
请问谁能教教我?
先把我代码发上来

If Text1.Text = "0" Then
MsgBox "你过不过了!0天还拿来算!", 16, "花儿无缺制作"
Exit Sub
End If
If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" Then
MsgBox "一个都不能少!", 16, "花儿无缺制作"
Exit Sub
End If
If Text2.text + Text3.text + Text4.text + Text5.Text + Text6.Text = 100 + Text1.text * 10 Then
Text7.Text = "是这个工资"
Else
Text7.Text = "不是这个工资"
Exit Sub
End If

if val(text2.text)+val(text3.text)+val(text4.text)+val(text5.text)+val(text6.text)=val(text1.text)*10+100 then
msgbox"是这个工资!", 16, "花儿无缺制作"
else
msgbox"不是这个工资!", 16, "花儿无缺制作"
end if

汗。。

每个TEXT加 val()