无效过程或参数

kingsky_110 2007-10-03 02:52:31
运行出现"无效过程或参数"

Private Sub Command1_Click()
List1.AddItem Text1.Text & " " & Text2.Text & " " & Text3.Text & " " & _
Val(Text2.Text) + Val(Text3) '添加列表项
Command1.Enabled = False '命令按钮1停止活动
Command2.Enabled = Ture '命令按钮2激活
Command2.SetFocus '焦点移到命令按钮2
End Sub


请问是什么问题啊!谢谢
...全文
76 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
cmdlang 2007-10-03
  • 打赏
  • 举报
回复
Command2.Enabled = Ture
Command2没有被设置成可用的当然不能转移焦点了
Command2.Enabled =True
fj182 2007-10-03
  • 打赏
  • 举报
回复
代码有两个问题
Private Sub Command1_Click()
List1.AddItem Text1.Text & " " & Text2.Text & " " & Text3.Text & " " & _
Val(Text2.Text) + Val(Text3) '添加列表项
Command1.Enabled = False '命令按钮1停止活动
Command2.Enabled = Ture ' True
on error resume next
Command2.SetFocus ' 转移焦点时,可能会不成功,所以最好把错误给忽略掉
End Sub
  • 打赏
  • 举报
回复
Command2.Enabled = Ture
===>
Command2.Enabled = True

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧