vb等級(jí)考試題目與評(píng)析72(更新版)
【正文】 ommand1，標(biāo)題為 計(jì)算并輸出 。然后在命令按鈕中添加事件代碼，其代碼如下： Private Sub Command1_Click() Dim i As Integer For i = 0 To 1 If (i) = 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ì)話框向文本框中輸入文本的代碼寫(xiě)法有很多種，這只是比較常見(jiàn)的一種。 這一題主要考察了對(duì)于隨機(jī)文件的讀取與寫(xiě)入操作，在讀文件時(shí)，可以使用 Get語(yǔ)句，其語(yǔ)法如下： Get 文件號(hào) ,記錄號(hào) ,變量名 本題主要代碼如下： Option Explicit Private Type PalInfo Name As String * 8 Tel As String * 10 Post As Long End Type Dim Pal As PalInfo Private Sub Command1_Click() Open For Random Access Read As 1 Len = Len(Pal) Get 1, 3, Pal = = = End Sub Private Sub Command2_Click() Open For Output As 1 Print 1, , , Close 1 End Sub
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1