【正文】
3 = 0 and x mod 4 = 0 例: 設(shè) x 即能被 3整除,也能被 4整除,寫出表達(dá)式。 例 :把數(shù)學(xué)式子 寫成 vb表達(dá)式。 了解函數(shù)的功能、參數(shù)的格式以及函數(shù)值的數(shù)據(jù)類型。 學(xué)生 = X = InputBox(輸入半徑 , 輸入信息 , 10, 2021, 3000) Y=MsgBox(繼續(xù)嗎? , vbYesNo, 提示信息 ) Y=MsgBox(繼續(xù)嗎? , 4, 提示信息 ) MsgBox 輸入完成 ! 順序 結(jié)構(gòu) 語句 賦值語句、數(shù)據(jù)輸入、數(shù)據(jù)輸出、 對(duì)象的方法語句、注釋、結(jié)束、暫停語句等 。 “學(xué)生: , (3) Print Print Print Print (4) Print 注意數(shù)據(jù)項(xiàng)的分隔符、語句末尾符號(hào)。 漢字 。 abcde。 123456678 Print s1=。 30 Print Format(, $,.) + 元 Print Format(, $000,) + 元 Print Format(, $, ) 單分支 IF …Then 語句 雙分支 IF …Then…Else 語句 多分支 IF …Then…Elseif… 語句 多分支情況 Select Case語句 IF語句的嵌套 無論分支多少 ,僅選其一執(zhí)行 分支結(jié)構(gòu) 語句 注意:?jiǎn)涡薪Y(jié)構(gòu)與塊結(jié)構(gòu)寫法的區(qū)別。 循環(huán)結(jié)構(gòu) 語句 Do while a=true … loop Do until a=false … loop While a=true … Wend Private Sub Command1_Click() Dim i%, j%, s% for i=1 to 3 s=1 for j=1 to i s=s+s*j next j print s next i End sub 例 1: 2 6 24 Private Sub Form_Click() Dim i%, x!, y! For i = 1 To 4 x = i * i + 2 Select Case x Case 6, 18 y = x / 2 + 6 Case 10 To 15 y = x * x Case is 18 y = x *2 Case Else y = 0 End Select Print “x=”。 “y=”。學(xué)生考試,輸入準(zhǔn)考證號(hào),能查出相應(yīng)課室號(hào)碼。 x。 y Else Print 準(zhǔn)考證號(hào)輸入錯(cuò)誤 ! End If End Sub 第 4 章 常用控件 窗體是 VB應(yīng)用程序中的頂層對(duì)象 , 窗體上的控件是子對(duì)象 ,窗體是父對(duì)象 。 引用時(shí) , 當(dāng)前窗體可以省略窗體名 。每種控件用來干什么的?涉及到的重要屬性有哪些。在什么事件中寫過程代碼。 例: 在圖片框輸出“ *****”。 Option Explicit Dim i As Integer Private Sub Form_Load() = 1000 = False = 20 = End Sub Private Sub Command2_Click() = False End Sub Private Sub Command1_Click() i = 0 = True End Sub 計(jì)時(shí)器開始工作 計(jì)時(shí)器停止工作 Private Sub Timer1_Timer() i = i + 1 = i End Sub 例 2: 模擬秒表計(jì)時(shí)程序。定義數(shù)組的名稱、維數(shù)和數(shù)組元素的數(shù)據(jù)類型。 第 5 章 數(shù)組與記錄 例: A(3) As Integer B(1 to 2, 2 to 2) As Double 實(shí)際中通過輸入數(shù)組元素的個(gè)數(shù)來確定數(shù)組的大小,就要先定