去百度文庫,查看完整內容>
內容來自用戶:元YuaN元YuaN
復習
一、VB的數(shù)據(jù)類型
Boolean(布爾型):類型說明符:Boolean,占用2字節(jié)
Byte(字節(jié)):類型說明符:Byte占用1字節(jié).
Integer(整型):類型說明符:Integer,類型標識%,占用2字節(jié).
Long(長整型):類型說明符:Long,類型標識"&",占用4字節(jié).
Single(單精度型):類型說明符:Single,類型標識"!",占用4字節(jié).
Double(雙精度型):類型說明符:Double,類型標識"#",占用8字節(jié).
Currency(貨幣型):類型說明符:Currency,類型標識"@",占用8字節(jié).
Date(日期型):類型說明符:Date,占用8字節(jié).
String(字符串,變長):類型說明符:String,類型標識"$"
二、VB的運算符
賦值運算符:用來給變量或對象的屬性賦值.把運算符右邊的內容(包括常量,變量,函數(shù)返回值或對象的屬性)賦給左邊的變量或對象.屬性.
使用賦值號應注意:
1.賦值號左邊必須是變量或對象的屬性,不能是數(shù)值,常量和表達式.
2.賦值號兩端的數(shù)據(jù)類型應該匹配,不匹配時應進行適當轉換.
3.給對象賦值時,只有運行時可改寫的對象屬性才能被賦值.
數(shù)學運算符
∧指數(shù)運算
-負號運算符
* /乘除運算,其中除法所得到的結果為實數(shù)
\ 整除,所得到結果為實際結果的整數(shù)部分.
MOD取模運算,兩數(shù)相除取余數(shù).
+ - 加減運算.
字符串運算符
&+ 連接字符.
&與+連接運算符的區(qū)別
&強制兩個表達式Loop While BackColor順序查找(Next iEnd If例:將五個數(shù)Dim d(10000) As Lo
'''''''''''''''''前3大題答案,第四題樓下的補上吧 :-D一,D C C D D B C B B B二,-42.82842712474619-3HELLO-34516lo7Ab三,(1)Private Sub Label1_Click()Dim i As IntegerFor i = 100 To 999If i = Int(i / 100) ^ 3 + Int((i - Int(i / 100) * 100) / 10) ^ 3 + (i - Int(i / 100) * 100 - Int((i - Int(i / 100) * 100) / 10) * 10) ^ 3 Then n = n + 1Next iEnd Sub水仙花數(shù)共有:4 個(2)Private Sub Command1_Click()Dim strSr As String * 40, strSr1 As String * 40, a(1 To 10) As IntegerDim I, j, n, p, temp As IntegerFor I = 1 To 10strSr = "清輸入10個數(shù)" + Chr(13) + Chr(10) + "然后單擊確定"strSr1 = InputBox(strSr): n = n + 1a(I) = Val(strSr1)Next IFor I = 1 To n - 1p = IFor j = I + 1 To nIf a(p) > a(j) Then p = jNext jtemp = a(I): a(I) = a(p): a(p) = tempNext IFor I = 1 To 10Print a(I)Next IEnd Sub。
新建一個窗體,上面添加一個command和一個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文件內容,一行一行寫
Close #1
Timer1.Interval = 1000 '注意這里應該是1000,即1秒鐘計時一次,當然也可以提高精度比如500毫秒計時一次,注意最高精度為15毫秒,一般建議1000毫秒
Delay = 10 '這里是延遲時間,delay*timer1.interval 為延遲毫秒數(shù),10*1000=10000即10秒,當然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)建和倒計時打開的步驟
全國計算機等級考試二級C,VB等等不同語言筆試部分的公共基礎知識考試內容是一樣的
筆試部分經(jīng)常考查的是算法復雜度、數(shù)據(jù)結構的概念、棧、二叉樹的遍歷、二分法查找,對此部分進行重點學習。
詳細重點學習知識點:
1.算法的概念、算法時間復雜度及空間復雜度的概念
2.數(shù)據(jù)結構的定義、數(shù)據(jù)邏輯結構及物理結構的定義
3.棧的定義及其運算、線性鏈表的存儲方式
4.樹與二叉樹的概念、二叉樹的基本性質、完全二叉樹的概念、二叉樹的遍歷
5.二分查找法
6.冒泡排序法
第一題答案:Private Sub Command1_Click()Dim i%, j%For j = 1 To 3For i = 1 To jPrint j * i;Next iPrintNext jEnd Sub第一個空寫j第二個空寫j*i第二題答案:Private Sub Command1_Click()Dim i%, j%For i = 1 To 9For j = i + 1 To 10If a() < a() Thenb = a(j)a(j) = a(i)a(i) = bEnd IfNext jNext iEnd Sub第二題答案:Private Sub Command1_Click()Dim i%, j%For i = 1 To 9For j = i + 1 To 10If a() < a() Thenb = a(j)a(j) = a(i)a(i) = bEnd IfNext jNext iEnd Sub填空應該寫b。
2013年3月開始,全國計算機二級實行了無紙化改革,改革后VB的題型包括選擇題40個(40分),上機操作題3個(60分)。
選擇題中,公共基礎知識10個(10分);VB基礎知識及應用30個(30分),其中側重基礎理論的大約10個題,側重應用的大約20題。所有選擇題全部單選形式。
上機題包括基本操作題(包含2小題)、簡單應用題(包含兩小題)和綜合應用題(只有1題)三個部分,分值分別為18、24、18。
所以公共基礎知識的題型只有單選題,一共10道,占10分。
----2級不是很難。主要分兩塊(不喜歡共產黨的做法)。一塊是筆試,一塊是上機實際操作。先筆試后上機。
----上機操作主要就是:程序代碼找錯:程序代碼填空:按要求編寫程序:程序問題填空(相當于答題):,主要就是這幾個。。。筆試只要你VB實際編寫與操作能力好些,過是完全沒問題的。
----筆試測試,最討厭的就是鄙視測試.主要包括的是:填空,選擇題,找錯,寫代碼/其中最要命的就是理論性問題,很多書上的東西是要死記硬背的,我很不喜歡,很多都是類似概念的問題,很麻煩!所以你想VB考2級,書本上的概念是要背的,概念題中具體是什么由于時間過去蠻久的了,我記得也不是很清楚了,總之是像“VB在沒有窗口的情況下必須包含什么過程”答案是Sub main,就是這類的問題,這只是舉個例子,在實際考試中題目偏的離譜了!
----
---但只要你有技術上有一套,經(jīng)常編寫程序的,應該不是很困難的。一定要多看書!?。。±碚搯栴}要多被!這就是我對VB2級的感覺了,呵呵。。。對了,要帶鞋套!那次我就是沒帶鞋套,要買鞋套錢又在女朋友那,差點沒能進去上機考試!
聲明:本網(wǎng)站尊重并保護知識產權,根據(jù)《信息網(wǎng)絡傳播權保護條例》,如果我們轉載的作品侵犯了您的權利,請在一個月內通知我們,我們會及時刪除。
蜀ICP備2020033479號-4 Copyright ? 2016 學習鳥. 頁面生成時間:3.527秒