去百度文庫,查看完整內(nèi)容>
內(nèi)容來自用戶:元YuaN元YuaN
復(fù)習(xí)
一、VB的數(shù)據(jù)類型
Boolean(布爾型):類型說明符:Boolean,占用2字節(jié)
Byte(字節(jié)):類型說明符:Byte占用1字節(jié).
Integer(整型):類型說明符:Integer,類型標(biāo)識(shí)%,占用2字節(jié).
Long(長整型):類型說明符:Long,類型標(biāo)識(shí)"&",占用4字節(jié).
Single(單精度型):類型說明符:Single,類型標(biāo)識(shí)"!",占用4字節(jié).
Double(雙精度型):類型說明符:Double,類型標(biāo)識(shí)"#",占用8字節(jié).
Currency(貨幣型):類型說明符:Currency,類型標(biāo)識(shí)"@",占用8字節(jié).
Date(日期型):類型說明符:Date,占用8字節(jié).
String(字符串,變長):類型說明符:String,類型標(biāo)識(shí)"$"
二、VB的運(yùn)算符
賦值運(yùn)算符:用來給變量或?qū)ο蟮膶傩再x值.把運(yùn)算符右邊的內(nèi)容(包括常量,變量,函數(shù)返回值或?qū)ο蟮膶傩裕┵x給左邊的變量或?qū)ο?屬性.
使用賦值號(hào)應(yīng)注意:
1.賦值號(hào)左邊必須是變量或?qū)ο蟮膶傩?,不能是?shù)值,常量和表達(dá)式.
2.賦值號(hào)兩端的數(shù)據(jù)類型應(yīng)該匹配,不匹配時(shí)應(yīng)進(jìn)行適當(dāng)轉(zhuǎn)換.
3.給對(duì)象賦值時(shí),只有運(yùn)行時(shí)可改寫的對(duì)象屬性才能被賦值.
數(shù)學(xué)運(yùn)算符
∧指數(shù)運(yùn)算
-負(fù)號(hào)運(yùn)算符
* /乘除運(yùn)算,其中除法所得到的結(jié)果為實(shí)數(shù)
\ 整除,所得到結(jié)果為實(shí)際結(jié)果的整數(shù)部分.
MOD取模運(yùn)算,兩數(shù)相除取余數(shù).
+ - 加減運(yùn)算.
字符串運(yùn)算符
&+ 連接字符.
&與+連接運(yùn)算符的區(qū)別
&強(qiáng)制兩個(gè)表達(dá)式Loop While BackColor順序查找(Next iEnd If例:將五個(gè)數(shù)Dim d(10000) As Lo
剛?cè)腴T的話搞清楚三點(diǎn)就好了:
1.對(duì)象
Windows下的應(yīng)用程序界面都是以窗口的形式出現(xiàn)的,窗口就是代表屏幕上的某個(gè)矩形對(duì)象,一個(gè)窗口可能包容其他窗口,這些被包容的窗口被稱為子窗口。在VB中,把這些窗口叫做"窗體(Form)"。在窗體上,可以設(shè)置用于和用戶交互的各種不見,如"文本框(TextBox)"、"標(biāo)簽(label)"、"命令按鈕(command)"等等,這些不見統(tǒng)稱為"控件"。應(yīng)用程序的每個(gè)窗體和窗體上的所有控件都是VB的對(duì)象
2.屬性
VB為每一類對(duì)象都規(guī)定了若干屬性。比如,窗體的屬性就又背景顏色、邊框線性、窗體名稱等等。
3.方法
VB程序中的每一個(gè)窗體或控件對(duì)象,都具有若干可改變其行為或?qū)崿F(xiàn)某個(gè)特定動(dòng)作(操作)的方法。
每一點(diǎn)的具體內(nèi)容,你去找一本入門級(jí)的VB書籍,里面都有詳細(xì)的介紹。
希望能對(duì)你有所幫助。
新建一個(gè)窗體,上面添加一個(gè)command和一個(gè)timer
代碼如下
Dim Pathname As String, Filename As String, Delay As Integer
Private Sub Command1_Click()
Pathname = "e:\vb" '目錄名
Filename = "1.bat" '文件名
If Dir(Pathname, vbDirectory) = "" Then
MkDir Pathname
End If
If Right(Pathname, 1) <> "\" Then Pathname = Pathname & "\"
Open Pathname & Filename For Output As #1
Print #1, "@echo off"
Print #1, "。。" '這里面添加bat文件內(nèi)容,一行一行寫
Close #1
Timer1.Interval = 1000 '注意這里應(yīng)該是1000,即1秒鐘計(jì)時(shí)一次,當(dāng)然也可以提高精度比如500毫秒計(jì)時(shí)一次,注意最高精度為15毫秒,一般建議1000毫秒
Delay = 10 '這里是延遲時(shí)間,delay*timer1.interval 為延遲毫秒數(shù),10*1000=10000即10秒,當(dāng)然100秒1000秒隨意
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
If Delay > 0 Then
Delay = Delay - 1
Else
Shell Pathname & Filename
Timer1.Enabled = False
End If
End Sub
包含創(chuàng)建和倒計(jì)時(shí)打開的步驟
(4>3) 為true; (5<7)為false; (10=4)為false; (not(5>4))為false; 所以原表達(dá)式轉(zhuǎn)換為:
true or false and false or false,從左到右進(jìn)行true or false為true
true and false or false,,true and false為false
false or false 為false
第二部分:
x=inputbox() //自己帶參數(shù)
if x=0 then
z=0
else
if x>0 then
z=x*3.14/2-5
else
z=-3.14*x/2+3
endif
endif
//輸出Z即可。
Public Sub proc(a%()) '全局(Public)過程proc,參數(shù)為整型數(shù)組a
Static i% '聲明靜態(tài)整型變量,即在本過程中,值可以保存
Do '開始循環(huán)
a(i) = a(i) + a(i + 1) '將數(shù)組a元素的值按本公式重新賦給數(shù)組a的元素
i = i + 1
Loop While i End Sub
Private Sub Command1_Click() '點(diǎn)擊命令按鈕事件
Dim i%, x%(4) '聲明局部整型變量i和整型數(shù)組x,數(shù)組下標(biāo)從0到4
For i = 0 To 4 '開始循環(huán),循環(huán)變量i從0到4,缺省步長為1
x(i) = i + 1 '將i+1的值賦給數(shù)組x
Next i '循環(huán)結(jié)束
For i = 1 To 2 '開始循環(huán),循環(huán)變量i從1到2,缺省步長為1
Call proc(x()) '調(diào)用過程proc,參數(shù)是數(shù)組x()
Next i
For i = 0 To 4 '開始循環(huán),循環(huán)變量i從0到4,缺省步長為1
Print x(i) '輸出數(shù)組x()的各個(gè)元素
Next i
End Sub
聲明:本網(wǎng)站尊重并保護(hù)知識(shí)產(chǎn)權(quán),根據(jù)《信息網(wǎng)絡(luò)傳播權(quán)保護(hù)條例》,如果我們轉(zhuǎn)載的作品侵犯了您的權(quán)利,請(qǐng)?jiān)谝粋€(gè)月內(nèi)通知我們,我們會(huì)及時(shí)刪除。
蜀ICP備2020033479號(hào)-4 Copyright ? 2016 學(xué)習(xí)鳥. 頁面生成時(shí)間:3.095秒