在Vb环境下做柱形图 让shape的高度等于text里的数怎么写语句啊 shape.height=text1.text 类型不符

问题描述:

在Vb环境下做柱形图 让shape的高度等于text里的数怎么写语句啊 shape.height=text1.text 类型不符

Private Sub Text1_Change()
If IsNumeric(Text1) Then If Val(Text1) >= 0 Then Shape1.Height = Val(Text1)
End Sub