这段vb代码出了什么问题?

来源:百度知道 编辑:UC知道 时间:2024/05/25 17:21:38
Private Sub Command1_Click()

Dim a, b, c As Double
a = (x - 2)
b = (1 / 2)
c = (2 - x)

Text1.Text = a ^ b + c ^ b + 8

End Sub

你自己看一下,X没赋值,系统默认为0,A=X-2,那A就小于零,a^b就无意义,你把a=(x-2)换为(2-x),或者把b的值改为大于0的数

x没有定义(Dim)

text1.text=str(a ^ b + c ^ b + 8)