
vb设置命令当text1的text是130067时将command1的enabled属性设置为true
3个回答
展开全部
Private Sub Text1_Change()
if text1="130067" then
command1.enabled=true
else
command1.enabled=false
end if
End Sub
if text1="130067" then
command1.enabled=true
else
command1.enabled=false
end if
End Sub
追问
vb设置命令当text1的text是130067,且text2的text是130068时将command1的enabled属性设置为true
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Text1_Change()
if val(text1.text)=130067 then command1.enabled=true
End Sub
第二道题
Private Sub Text1_Change()
if val(text1.text)=130067 and val(text2.text)=130068 then command1.enabled=true
End Sub
Private Sub Text2_Change()
Text1_change
End Sub
if val(text1.text)=130067 then command1.enabled=true
End Sub
第二道题
Private Sub Text1_Change()
if val(text1.text)=130067 and val(text2.text)=130068 then command1.enabled=true
End Sub
Private Sub Text2_Change()
Text1_change
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
看了你对你对popmoon的追问,
Private Sub Form_Load()
Command1.Enabled = False
End Sub
Private Sub Text1_Change()
If Text1.Text = "130067" And Text2.Text = "130068" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
Private Sub Text2_Change()
If Text1.Text = "130067" And Text2.Text = "130068" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
Private Sub Form_Load()
Command1.Enabled = False
End Sub
Private Sub Text1_Change()
If Text1.Text = "130067" And Text2.Text = "130068" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
Private Sub Text2_Change()
If Text1.Text = "130067" And Text2.Text = "130068" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询