永发信息网

vb缺少函数或变量

答案:1  悬赏:60  手机版
解决时间 2021-11-22 21:17
  • 提问者网友:我没有何以琛的痴心不悔
  • 2021-11-22 11:19
vb缺少函数或变量
最佳答案
  • 五星知识达人网友:冷風如刀
  • 2021-11-22 11:28
程序应该没问题,可能是你的控件名称和程序的没有匹配,我用VB默认的控件名 如下:

Private Sub Command1_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
If a + b <= c Or a + c <= b Or b + c <= a Then
s = "组不成三角形"
Else
p = a / 2 + b / 2 + c / 2
s = Sqr(p * (p - a) * (p - b) * (p - c))
End If
Text4.Text = s
End Sub
这样子是可以实现改功能的追问以前还好用的 今天就不能运行了
然后我加上dim a,b,c as int 就行了追答这就不清楚了,VB好像可以不用申明变量的,变量的类型自动默认为Variant, 我的那个与你的一样样,刚刚运行了,可以实现的
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯