Question

VB中说未找到方法或数据成员是什么意思啊

Private Sub Command1_Click()
CommonDialog1.Flags = cdiCFBoth Or cdicfeffect
CommonDialog1.ShowFont
List1.FontName = CommonDialog1.FontName
Text1.FontName = CommonDialog1.FontName
List1.FontSize = CommonDialog1.FontSize
Text1.FontSize = CommonDialog1.FontSize
List1.FontBold = CommonDialog1.FontBold
Text1.FontBold = CommonDialog1.FontBold
List1.FontColor = CommonDialog1.FontColor
Text1.FontColor = CommonDialog1.FontColor
End Sub

Answer 1

List1.FontColor = CommonDialog1.FontColor
Text1.FontColor = CommonDialog1.FontColor
改为
List1.ForeColor = CommonDialog1.Color
Text1.ForeColor = CommonDialog1.Color

不管是List1、Text1还是CommonDialog1，都不存在FontColor这个属性的，所以会提示未找到方法或数据成员！

追问

我改成那样后也是同样的结果啊

追答

那就不知道了，我这里测试是正常的。你确认是复制我的代码而不是自己手工修改的？注意是ForeColor（前景色），不是FontColor（字体颜色）哦！基本上所有控件都没有FontColor这个属性的！

Answer 2

这个错误说的是，你用的对象没有这个方法“A大”，实际上是你把“AddItem”写错了！

追问

没懂，能具体说说吗？谢谢