VB编程时提示未找到方法或数据成员,怎么解决?

如题,请大家帮帮忙,如果问题能解决,事后另加分其中一部分代码是这样的:PrivateSubmenuDeleteroom_Click()DimtxtSQLAsStringD... 如题,请大家帮帮忙,如果问题能解决,事后另加分

其中一部分代码是这样的:
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
展开
 我来答
帐号已注销
2020-01-22 · TA获得超过77.1万个赞
知道小有建树答主
回答量:4168
采纳率:93%
帮助的人:168万
展开全部

该错误发生的原因和解决方法如下:

对象或成员名称拼写错误。

检查名称拼写并检查 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

百度网友e28c80924
推荐于2017-11-25 · TA获得超过1013个赞
知道小有建树答主
回答量:451
采纳率:0%
帮助的人:501万
展开全部
未找到方法或数据成员(错误 461)

集合、对象或用户定义类型不包含引用的成员。该错误发生的原因和解决方法如下:

对象或成员名称拼写错误。
检查名称拼写并检查 Type 语句或对象文档,以确定成员以及对象或成员名称的正确拼写。

您指定了一个超出范围的集合索引。
检查 Count 属性以确定某个集合成员是否存在。注意,集合索引从 1 开始,而不是从 0 开始,因此 Count 属性返回最大可能的索引数
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友a85e82dc2
2008-03-16 · 超过18用户采纳过TA的回答
知道答主
回答量:54
采纳率:0%
帮助的人:0
展开全部
你是不是没引用和"frmroom.msglist.rows"有关的对象。还是这几个字写错了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式