杭州交通信息网抗氧化性:vb高手来一下
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 22:00:06
Private Sub Txtusename_Change()
If txtusername.Text <> "" And Txtpassword.Text <> "" Then
cmdok.Enabled = True
Else
cmdok.Enabled = False
End If
End Sub
大概是什么意思 <> "" 有什么用处阿
If txtusername.Text <> "" And Txtpassword.Text <> "" Then
cmdok.Enabled = True
Else
cmdok.Enabled = False
End If
End Sub
大概是什么意思 <> "" 有什么用处阿
'Txtusename控件中输入任何字符后触发该事件
Private Sub Txtusename_Change()
'检查txtusername.Text和Txtpassword.Text 是否为空
If txtusername.Text <> "" And Txtpassword.Text <> "" Then
'如果都不是空，则按钮cmdok可以点击
cmdok.Enabled = True
Else
'否则，如果任何一个是空，则按钮cmdok不可以点击
cmdok.Enabled = False
End If
End Sub
谁写的程序，错误太明显了！
那个文本框的改变时间应该写在Txtpassword.Text 控件里啊。怎么写在txeusename控件上了，要是正常输入那个按钮根本就不可用，要先输入密码，再输入用户名，这什么烂程序，还拿出来问啊！
说的真啰嗦
简单说，就是用用户名和密码如果都是空，OK（确定）按钮就是灰色，无效，否则就允许点击
<>是不等于号呀。＝是等于或者赋值。
上面代码就是判定如果有户名跟密码都（and语句）不是空的，则让一个cmdok的按钮有效。否则无效。
Private Sub Txtusename_Change()
If txtusername.Text <> "" And Txtpassword.Text <> "" Then'这一句就是如果txtusername和Txtpassword不为空
cmdok.Enabled = True'就激活cmdok
Else'否则就是txtusername和Txtpassword为空
cmdok.Enabled = False'就把cmdok假就是不能点击cmdok
End If
End Sub
判断用户文本框和密码框不为空