【正文】
= True And Option1 = True Then = (i) + 筆試 End If If (i) = True And Option2 = True Then = (i) + 上機(jī) End If Next i End Sub 當(dāng)然,實(shí)現(xiàn)利用輸入對(duì)話框向文本框中輸入文本的代碼寫法有很多種,這只是比較常見的一種。 對(duì)題目中已給出的命令按鈕的 Click事件代碼進(jìn)行修改,其代碼如下: Private Sub Command1_Click() Dim i As Integer, j As Integer, iSum As Integer Print 連續(xù)和為 1250的正整數(shù)是: For i = 1 To 500 iSum = 0 For j = i To 500 iSum = j + iSum If iSum = 1250 Then Exit For Next If iSum = 1250 Then Print i。 j End If Next End Sub 3. 綜合應(yīng)用( 1小題,計(jì) 30分) 注意:下面出現(xiàn) 的 考生文件夾 均為 C:\WEXAM\00000000\ 在名稱為 Form1的窗體上畫三個(gè)標(biāo)簽,其名稱分別為 Label Label2和 Label3,標(biāo)題分別為 姓名 、電話號(hào)碼 和 郵政編碼 ,再畫三個(gè)文本框(其名稱分別為 Text Text2和 Text3,初始內(nèi)容均為空白,再畫兩個(gè)命令按鈕,其名稱分別為 Comman