Private Sub Form_Load()
     Combo1.ListIndex = 0
     If userId = "" Then
          cnt = 0
          txtuser.Text = "q"
          txtpwd.Text = "1234"
     End If
End Sub
与sql都连接好了，但运行时老说是无效属性值

Combo1没有值时应该是Combo1.ListIndex =-1。相当于Combo1.Text = ""
所以要事先给它赋值

[ 本帖最后由 LK868 于 2013-7-8 22:03 编辑 ]

学习中，新人多指教！

跟我想要的不一样，愁人啊