从出错信息来看,你的窗体中确实存在MSComm1这个控件(或对象),但它并不是Microsoft Comm Control控件(具体是什么就不知道了),由于它不存在CommPort属性,所以就出错并提示"未找到方法或数据成员"了.
代码是从别的电脑复制过来的,但你的电脑上并没有Microsoft Comm Control控件(一般VB精简版会有这种情况),就会发生这样的错误了.
已经测试,没有错误,只要在text1.text到text④text有值就可以
private
sub
command1_click()
dim
a,
b,
c,
d,
x,
y
as
single
a
=
val(text1.text)
b
val(text2.text)
c
val(text③text)
d
val(text④text)
text⑤text
(b
-
d)
/
(c
text⑥text
x
*
end
如果你的仍然有错误"未找到方法或数据成员",说明你的vb有问题.
你是什么系统?
你首先要保证你的form上有Command1、Command2、Command3
然后将代码改成Private
Sub
Command1_Click()
Command2.Enabled
ture
Command③Enabled
End
就可以了
你的index没有设置,可能这就是你的未找到方法或数据成员的原因
x是什么来的.
确认Text1~Text6是否存在
x没有赋值
已经测试,没有错误,只要在Text1.Text到Text④Text有值就可以
Private Sub Command1_Click()
Dim a, b, c, d, x, y As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text③Text)
d = Val(Text④Text)
Text⑤Text = (b - d) / (c - d)
Text⑥Text = b - x * a
End Sub
如果你的仍然有错误"未找到方法或数据成员",说明你的VB有问题.
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!