【正文】
:下面出現(xiàn)的 考生文件夾 均為 C:\WEXAM\00000000\ *********************************************************************** ( 1)在考生文件夾下有一個工程文件 。程序功能如下: 1)系統(tǒng)啟動時,自動向 列表框添加一個編號信息 a0001。 Value屬性,使 Option控件屬性 Value為 True時,單選按鈕被選中。 打開 ,修改后的代碼如下: Private Sub Form_Load() a0001 End Sub Private Sub Command1_Click() For i = 0 To 1 = i If = Then MsgBox 不允許重復(fù)輸入,請重新輸入 ! Exit Sub End If Next i = End Sub Private Sub Command2_Click() End End Sub 按要求保存文件即完成本題。 本題主要考查自定義數(shù)據(jù)類型。 stud(j).Name。有三個標(biāo)題分別為 學(xué)號 、 姓名 和 平均分 的標(biāo)簽;三個初始內(nèi)容 為空,用于接收學(xué)號、姓名和平均分的 文本框 Text Text2和 Text3;一個用于顯示排序結(jié)果的圖片框。 打開 ,修改后的代碼如下: Private Sub Command1_Click() Dim y As Integer For i = 0 To 2 If (i) = True Then y = Val(Option1(i).Caption) End If Next Call calc(y) End Sub Private Sub calc(y As Integer) ClearList i = 1 x = Val() + 1 Do Whil