王玄91篮球教学全集:Command1.SetFocus这句话错了吗？

来源：百度文库编辑：神马品牌网时间：2024/05/06 18:43:14

实时错误'5'
无效的过程调用或参数
Option Explicit
Dim x As Integer, y As Integer, z As Integer

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Command1.SetFocus
End Sub
Private Sub Command1_Click()
Form1.Label1.Visible = False
Form1.Label2.Visible = False
x = Int(Rnd * 10)
y = Int(Rnd * 10)
z = Int(Rnd * 10)
Text1.Text = CStr(x)
Text2.Text = CStr(y)
Text3.Text = CStr(z)
If x = 7 Or y = 7 Or z = 7 Then
Form1.Label1.Visible = True
Else
Form1.Label2.Visible = True
End If

End Sub

Private Sub Command2_Click()
Unload Form1
End Sub

不是Command1.SetFocus错了，是Dim x As Integer, y As Integer, z As Integer 应该在
Private Sub Command1_Click()
Form1.Label1.Visible = False
Form1.Label2.Visible = False
x = Int(Rnd * 10)
y = Int(Rnd * 10)
z = Int(Rnd * 10)
Text1.Text = CStr(x)
Text2.Text = CStr(y)
Text3.Text = CStr(z)
If x = 7 Or y = 7 Or z = 7 Then
Form1.Label1.Visible = True
Else
Form1.Label2.Visible = True
End If
End Sub
这个里面

Command1.SetFocus这句话错了吗？ real,isnumber,setfocus,这三个PB代码各是什么意思,能做什么用啊?? SetFocus怎么理解 setfocus() 函数是什么意思？窗体frm,控件Command1、Label、模块Module1 vb编程里面setfocus与getfocus的区别是什么？ QB的问题单击command1,每行显示的内容 VB问题如何用键盘的w键控制command1....... 这句话怎么翻译? 这句话什么意思？