Private Sub Command2_Click()
Form_Load
End Sub

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Option1.Value = True
Option2.Value = False
Option3.Value = True
Option4.Value = False
Option5.Value = False
Option6.Value = True
Option7.Value = False
Option8.Value = False
For i = 0 To 3
Check1(i).Value = 0
Next i
Label3.Caption = ""
Image1.Picture = LoadPicture()
End Sub

上机运行，它会告诉错在什么地方

单选按钮

Option是单选按钮，只要选定了一个为“真”，其他都会自动为“假”，不用再设置了。

完全不东中