vb编程如何自动匹配

① vb标准表达式中数据类型不匹配如何解决

如果ID是数值类型的，'" & MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 1) & "'这样表达就会类型不匹配，把单引号去掉，改为以下就OK：
rs.Open "select * from 各州信息 where ID=" & MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 1) & "", conn, adOpenKeyset, adLockBatchOptimistic

② VB 程序实例：设计登录程序，用户名（rain）和密码(345)匹配则进入下一个页面，否则给出提示

代码窗口