在Vb环境下做柱形图 让shape的高度等于text里的数怎么写语句啊 shape.height=text1.text 类型不符
人气：353 ℃ 时间：2020-02-05 07:40:29
解答
Private Sub Text1_Change()
If IsNumeric(Text1) Then If Val(Text1) >= 0 Then Shape1.Height = Val(Text1)
End Sub
推荐
- VB中Text1.text=text1.text+CStr(a(i))+" " If i=4 then text1.text=text1.text+chr(13)+chr(10)
- 正在充放电的电容器的外电路中为什么会有瞬间电流
- 甲乙两地相距100千米,甲骑自行车从A地出发一小时后,乙开车也从A地出发,结果比甲早到15分钟,已知乙的
- 解方程：x²＋6x=2x＋12 2x²-3x-1=0 亲们会写的帮帮忙咯.
- 物体的初速度为2m/s，加速度为2m/s2，当它的速度增加到6m/s时，所通过的位移为_m．
- 春天有哪些树?
- 而或长烟一空,皓月千里.这句里的“或”是什么意思?
- 有一列数,按一定规律排列成1,-2+1 ,4+1,4,-8,16,-32,...,其中某三个相邻数的和是-108,这三个数分
猜你喜欢
