求助VB高手

来源：百度知道编辑：UC知道时间：2024/05/06 01:09:57

我的QQ号码是75659445希望广大高手帮助
Private Sub Command1_Click()
Text1.Text = "想学"
End Sub

Private Sub Command2_Click()
Text1.Text = "VB好学吗?"
End Sub

Private Sub Command3_Click()
End
End Sub
请教:当Text1.Text = "VB好学吗?"时,点击Command1让Text1.Text = 好学

这个简单做个判断

Private Sub Command1_Click()
if text1.text = "VB好学吗?" then
text1.text = "非常好学"
else
text1.text = "想学"
end if
End Sub

把这个替换掉你上面那个就可以了

...........

VB高手进~~~求助！！！ vb问题，高手求助 vb高手求助求助 VB高手进求助VB高手求助VB高手...!! VB高手进！求助 vb求助啊~~~ vb高手请进！！！ VB高手大哥请进求助VB选择题急求助！VB高手请进！