VB编程时提示未找到方法或数据成员,怎么解决?
其中一部分代码是这样的:
Private Sub menuDeleteroom_Click()
Dim txtSQL As String
Dim intCount As Integer
Dim mrc As ADODB.Recordset
Dim MsgText As String
If flagedit Then
If frmRoom.msgList.Rows > 1 Then '这里的.msgList提示编译错误
If MsgBox("真的要删除这条文件记录么?", vbOKCancel + vbExclamation, "警告") = vbOK Then
intCount = frmRoom.msgList.Row
txtSQL = "delete from rooms where roomNO='" & Trim(frmRoom.msgList.TextMatrix(intCount, 1)) & "'"
Set mrc = ExecuteSQL(txtSQL, MsgText)
Unload frmRoom
frmRoom.txtSQL = "select * from rooms"
frmRoom.Show
End If
End If
End If
End Sub 展开
该错误发生的原因和解决方法如下:
对象或成员名称拼写错误。
检查名称拼写并检查 Type 语句或对象文档,以确定成员以及对象或成员名称的正确拼写。
检查 Count 属性以确定某个集合成员是否存在。
注意,集合索引从 1 开始,而不是从 0 开始,因此 Count 属性返回最大可能的索引数。
Private Sub Cmddisplay_Click()
Dim str1, str2, str3 As String
str1 = IIf(optman.Value, "性别:男", "性别:女")
str2 = IIf(opthan.Value, "汉族", "少数民族")
str3 = IIf(optyes.Value, "是党员", "非党员")
End Sub
Private Sub Command1_Click()
MsgBox Option1.Value
End Sub
'如果以上不能运行或者显示的结果不是false的话建议重装vb
默认情况下是未选中的,结果应该是false,编译成exe文件拷贝到别人的机器上运行看看,如果还是true的话就重装vb。
扩展资料:
Visual Basic.NET 具有“面向对象”的特性,Visual Basic.NET 应用种程序的基本单元是对象,用 Visual Basic.NET 编程就是用“对象”组装程序。
这种“面向对象”的编程方法与传统的全部用代码编制程序的方法有很大区别,就像用集成电路芯片组装电视机和用三极管,二极管组装电视机的区别一样。显然,“面向对象”的编程方法比传统的编程方法更简单,更方便,并且编写出的程序也更加稳定。因此,“对象”可以被看做 Visual Basic.NET 程序设计的核心。
参考资料来源:百度百科-Visual Basic
集合、对象或用户定义类型不包含引用的成员。该错误发生的原因和解决方法如下:
对象或成员名称拼写错误。
检查名称拼写并检查 Type 语句或对象文档,以确定成员以及对象或成员名称的正确拼写。
您指定了一个超出范围的集合索引。
检查 Count 属性以确定某个集合成员是否存在。注意,集合索引从 1 开始,而不是从 0 开始,因此 Count 属性返回最大可能的索引数