13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺

ElASP.NET開發平臺的軟、硬件要求

?硬件要求

(1)客戶機

CPU：90MHz以上的Pentium處理器

內存：32MB以上

(2)服務器

CPU：133MHz以上的Pentium處理器

內存：128MB以上

硬盤：145MB以上可用空間

Web數據庫技術教程1

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

ElASP.NET開發平臺的軟、硬件要求（續）

?軟件要求

.NETFramework需要下列一種操作系統的支持：

帶有ServicePack2.0的Windows2000Professional

帶有ServicePack2.0的Windows2000Server

帶有ServicePack2.0的Windows2000AdvancedServer

WindowsXPProfessional

WindowsServer2003

Web數據庫技術教程2

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺(續)

IS).NETFrameworkSDK的安裝

?安裝.NETFramework

(1)運行dotnetfk.exe。安裝程序自動解壓，然后彈出安裝對話框,

選擇“是”

Web數據庫技術教程3

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

E.NETFrameworkSDK的安裝（續）

Web數據庫技術教程4

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

EJ.NETFrameworkSDK的安裝（續）

（2）彈出許可協議，選擇“同意”，再單擊“安裝”，繼續安

Web數據庫技術教程5

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

EJ.NETFrameworkSDK的安裝（續）

（3）開始安裝，安裝完成彈出安裝完成對話框，單擊“確定”，

結束安裝

Web數據庫技術教程6

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

E.NETFrameworkSDK的安裝（續）

Web數據庫技術教程7

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

E.NETFrameworkSDK的安裝（續）

?安裝.NETFrameworkSDK

（1）運行setup.exe。安裝程序自動解壓，然后彈出安裝對話框。

單擊“是”

Web數據庫技術教程8

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

四.NETFrameworkSDK的安裝（續）

Web數據庫技術教程9

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

EJ.NETFrameworkSDK的安裝（續）

（2）出現.NETFrameworkSDK歡迎對話框，單擊“下一步”

Web數據庫技術教程10

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺(續)

M.NETFrameworkSDK的安裝（續）

(3)彈出許可協議，選擇“同意”，再單擊“下一步”，繼續

安裝

Web數據庫技術教程11

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

EJ.NETFrameworkSDK的安裝（續）

（4）出現安裝選項對話框，建議全選。然后單擊“下一步”

Web數據庫技術教程12

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

M.NETFrameworkSDK的安裝（續）

⑸出現選擇目標文件夾對話框，可以使用系統缺省安裝文件夾,

也可以另選文件夾。選定后，單擊“下一步”

Web數據庫技術教程13

13ASP.NET的開發平臺和VB.NET

ASP.NET的開發平臺（續）

E.NETFrameworkSDK的安裝（續）

（6）.NETFrameworkSDK開始安裝

Web數據庫技術教程14

13ASP.NET的開發平臺和VB.NET

VB.NET簡介

ElVB.NET的數據類型

?Short（短整數）數據類型

以帶符號的16位（2字節）整數形式存儲

?Decimal（十進制數）數據類型

以帶符號的128位（16字節）十進制數形式存儲，并

以10為塞

Web數據庫技術教程15

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

VB.NET的數據類型（續）

?Integer（整數）數據類型

以帶符號的32位（4字節）整數形式存儲

?Long（長整數）數據類型

以帶符號的64位（8字節）整數形式存儲

Web數據庫技術教程16

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?Single（單精度浮點數）數據類型

以帶符號的32位（4字節）單精度浮點數形式存儲

?Double（雙精度浮點數）數據類型

以帶符號的64位（8字節）雙精度浮點數形式存儲

Web數據庫技術教程17

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?Byte（字節）數據類型

以無符號的8位（1字節）數據形式存儲

?Boolean（布爾）數據類型

以16位（2字節）數值形式存儲，其取值只能是True

或False,表示“真"或"假「“是”或“非1

“對”或“錯”。在將數值類型數據轉換成布爾型數

據時，0將轉換成False,其他均轉換成True

Web數據庫技術教程18

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?Date（日期）數據類型

以64位（8字節）整數形式存儲，表示從01年01月01

日到9999年12月31日的日期和從00:00:005011:59:59

的舟間

Date值必須用井號括起來，其格式為mm/dd/yyyy。

Date類型數值轉換成String類型數值時，日期將以計

算機所能識別的短數據格式顯示，時間將以計算機有

效的時間格式（12小時制或24小時制）顯示

Web數據庫技術教程19

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?Char（字符）數據類型

以無符號的16位（2字節）整數形式存儲。每個數字

代表一個Unicode字符。不能直接在字符型數據和數

值型數據之間轉換。但可以用AscW和ChrW函數進行轉

換。字符必須用引號"”括起來

Web數據庫技術教程20

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?String（字符串）數據類型

以無符號的16位（2字節）整數形式存儲。字符串表

示一串Unicode字符組成的序列，必須用引號"”括

起來

Web數據庫技術教程21

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的數據類型（續）

?Object（對象）數據類型

以32位（4字節）地址形式存儲，此地址為對象引用。

可以聲明為對象類型的數據分配任何數據類型，包括

數值型、布爾型、字符型、日期型、結構和枚舉等

Web數據庫技術教程22

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的常量和變量

?常量

所謂常量是指在程序中不變的數據，如123、“xyz

常量可用Const來聲明，如：

ConstPI=3.14159265

Web數據庫技術教程23

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的常量和變量（續）

?變量

用來臨時存放數據。變量具有名字和數據類型。變量

在使用前必須先定義，其定義語句為：

Dim變量名As數據類型

變量的值可以在定義后再賦值，也可以在定義時賦值。

變量的值的類型必須和它定義的數據類型一致

Web數據庫技術教程24

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的常量和變量（續）

變量有簡單變量和數組（Array）。簡單變量用一個

變量名表示一個數據。數組可以用一個數組名表示-

系列變量，并用數字（索引）來識別他們

在VB.NET中所有數組都以“0”為起始長度

Dimx（10）AsInteger

表示有10個元素，編號從0到9

Web數據庫技術教程25

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的運算符

?算術運算符

與一般算術運算相同：自左向右，先乘除后加減，有

括號時，括號內先算。增加了整除（\）和模（Mod）

運算

Web數據庫技術教程26

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的運算符（續）

?賦值運算符

用來將運算結果賦給運算符左面的變量

Web數據庫技術教程27

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

囚VB.NET的運算符（續）

運算符說明

A

=AA=B相當于A=AAB

+=A+=B相當于A=A+B

-=A-=B相當于A=A-B

*=A*=B相當于A=A*B

/=A/=B相當于A=A/B

\=A\=B相當于A=A\B

&=A&=B相當于A=A&B

Web數據庫技術教程28

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的運算符（續）

?連接運算符

將兩個表達式連接在一起

運算符說明

+如果兩個操作數為String,則把他們連接成一個字符串，否

則作加號

&將操作數轉換成String,然后作連接算符

Web數據庫技術教程29

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

ElVB.NET的運算符（續）

?比較運算符

比較數值的大小或數據的長度

Web數據庫技術教程30

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

囚VB.NET的運算符（續）

運算符說明

=若人=8,則其結果為True,否則其結果為False

>若A>B,則其結果為True,否則其結果為False

>=若A>=B,則其結果為True,否則其結果為False

<若A<B,則其結果為True,否則其結果為False

<=若A〈=B,則其結果為True,否則其結果為False

O若A〈>B,則其結果為True,否則其結果為False

Web數據庫技術教程31

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

ElVB.NET的運算符（續）

?邏輯運算符

基本邏輯運算有3種：AND、OR和NOT

運算符說明

ANDAANDB只有當A、B均為True時，結果才為True

ORAORB當A、B中有一個為True時,結果就為True

NOTNOTA取A的反，即當A為True時，NOTA為False

Web數據庫技術教程32

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

：：VB.NET的過程和函數

?過程

響應事件時執行的代碼塊,用Sub……EndSub定義,

其語法為：

[Private|Public|Friend]SubSubName([ArgumentsList])

Statements

EndSub

Web數據庫技術教程33

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

（1）通用過程

由應用程序來調用，否則它就處于空閑狀態，建立通用過程是

為了將不同事件過程所要執行的相同的語句提取出來，而不必

在每一個事件過程中重復同樣的語句

Web數據庫技術教程34

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

（2）事件過程

當對象的某個事件發生時，自動調用相應事件名的過程。一個

控件的事件過程名由控件名、下劃線和事件名組成。如希

望

在單擊按鈕Btnl時，就可以調用一個過程，則該過程應命名為

Btnl_Click

Web數據庫技術教程35

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

?函數

有返回值的子過程就是函數。函數用Function...

EndFunction定義。其語法為：

[Private|Public|Friend]FunctionFunctionName（Arguments

List）[AsDataType]

Statements

EndFunction

Web數據庫技術教程36

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

（1）數值輸出函數

①FormatNumber函數

用來規定數值數據小數點后面的位數。函數格式為:

FormatNumbe（數值表達式，小數點后面的位數）

Web數據庫技術教程37

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

[例13T]13-1.aspx

<ScriptLanguage二〃VB〃Runat二〃Server”〉

SubPageLoad()

DimAAsInteger=1000

Response.Write(，/1000/3="，&A/3&〃<Br〉〃)

Response.Write(“1000/3取小數點以后三位二”&

FormatNumber(A/3,3)&〃〈Br〉〃)

Response.Write(“1000/6取小數點以后兩位=“

&FormatNumber(A/6,2)&〃〈Br〉〃)

EndSub</Script>

Web數據庫技術教程38

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

5http://127.0.0.1/13-1.aspx-.…⑥叵||*|

文件魚）編輯更）查看也）收藏?工具（X）

他?直）http:〃1270.0.1/13-1器▼轉到仙正

1000/3=333.333333333333

1000/3取小數點以后三位二333.333

1000/6取小數點以后兩位=166.67

國完畢■Internet

Web數據庫技術教程39

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

②Int函數和Fix函數

Int函數和Fix函數都用來移除數值數據的小數部分而返回其整

數值。函數格式也相同：

Int(Number)

Fix(Number)

區別在于如果Number參數為負數，貝肛nt函數返回小于或等于

Number的第一個負整數，而Fix函數返回大于或等于Number參數

的第一個負整數

Web數據庫技術教程40

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

<]VB.NET的過程和函數（續）

DimMyNumberAsInteger

MyNumber=Int(99.8)'返回99

MyNumber=Fix(99.8)'返回99

MyNumber=Int(-99.8)'返回-100

MyNumber=Fix(-99.8)'返回-99

MyNumber=Int(-99.2)'返回-100

MyNumber=Fix(-99.2)'返回-99

Web數據庫技術教程41

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

③Rnd函數和Randomize語句

Rnd函數

返回一個Single類型的隨機數，該隨機數小于1但大于

或等于0。函數格式為：

Rnd［（Number）］

Web數據庫技術教程42

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

ElVB.NET的過程和函數（續）

Randomize語句

用來初始化隨機數生成器。其格式為:

Randomize[Number]

Web數據庫技術教程43

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

（2）字符串輸出函數

①UCase函數和LCase函數

UCase函數可將一個英文字符串中的字符全部轉換成

大寫字符，而LCase函數可將一個英文字符串中的字

符全部轉換成小寫字符。函數格式為：

Ucase（“字符串”）

LCase（“字符串”）

Web數據庫技術教程44

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

②Len函數

Len函數用來計算字符串的長度，包括標點和空格。

函數格式為：

Len（"字符串”）

③Trim函數

Trim函數用來刪除字符串前后的空格，而字符串中間

的空格不會被刪除。函數格式為：

Trim（“字符串”）

Web數據庫技術教程45

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

④Left、Right和Mid函數

Left、Right和Mid函數都用來截取字符串的一部分。

Left函數用來截取字符串的左起若干個字符，Right函數用來截

取字符串的右起若干個字符，而Mid函數用來截取字符串的中間

若干個字符。函數格式分別為：

Left（"字符串?■

Right（"字符串”，字符個數）

Mid（"字符串”，起始位置，字符個數）

Web數據庫技術教程46

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

⑤Replace函數

Replace函數可以將字符串中的某個或幾個連續的字

符替換成另一個字符或字符串，函數格式為：

Replace（"字符串”，“被替換的字符或子字符

串”，

“替換后的字符或子字符串”）

Web數據庫技術教程47

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

⑥StrComp函數

StrComp函數用來比較兩個字符串的大小。函數格式為：

StrComp（"第一個字符串”，“第二個字符串”，參數）

參數可以是0或1。0表示要區分字母的大小寫；1表示不區分字

母的大小寫。參數缺省表示0。

若第一個字符串大于第二個字符串，則返回1。

若第一個字符串等于第二個字符串，則返回0。

若第一個字符串小于第二個字符串，則返回-1。

Web數據庫技術教程48

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

（3）日期和時間輸出函數

①Now函數

用來取得當前的日期和時間。函數格式為:

NowO

Web數據庫技術教程49

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

[例13-2]13-2.aspx

<HtmlXScriptLanguage=〃VB〃Runat="Serve/〉

SubPageLoad（）

Response.Write（“當前的日期與時間是：”&Now（）&〃<Br〉〃）

Response.Write（〃今天是：〃&Now.Year&〃年〃&_

Now.Month&〃月〃&Now.Day&〃日"&"〈Br>〃）

Response.Write（〃現在時間是：〃&Now.Hour&〃時〃&_

Now.Minute&〃分〃&Now.Second&〃秒〃&〃〈Br〉〃）

EndSub

</ScriptX/Html>

Web數據庫技術教程50

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

，：VB.NET的過程和函數（續）

3http://127.0.0.1/13-2.aspx-...□0?

文件9編輯⑥查看。收藏⑥工具①》「

。后退，.兇圖；'」,搜索'

地址中|jghttp：///13-2.as;Y;El轉到隆接,

當前的日期與時間是:2004-7-158:55:21

今天是200弊7月15日

觀在時間是8時55分21秒

國完畢.Internet

Web數據庫技術教程51

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

②FormatDateTime函數

FormatDateTime函數用來設置日期的顯示格式

函數格式為：

FormatDateTime（日期與時間,參數）

Web數據庫技術教程52

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

參數值說明

0輸出格式為：年-月-日時：分：秒

1只輸出日期，格式為：****年**月**日

2只輸出日期，格式為：年-月-日

3只輸出時間，格式為：時：分：秒

4只輸出時間，格式為：時：分

Web數據庫技術教程53

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

[例13-3]13-3.asp

<HtmlXScriptLanguage="VB〃Runat="Serve/〉

SubPageLoad()

Response.Write(〃使用參數0時的輸出：〃&FormatDateTime

(Now,0)&”〈Br>〃)

Response.Write(〃使用參數1時的輸出：〃&FormatDateTime

(Now,l)&〃<Br>〃)

Web數據庫技術教程54

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

Response.Write(〃使用參數2時的輸出：〃&FormatDateTime

(Now,2)&〃<Br>〃)

Response.Write(〃使用參數3時的輸出：〃&FormatDateTime

(Now,3)&〃<Br〉〃)

Response.Write(〃使用參數4時的輸出：〃&FormatDateTime

(Now,4)&〃<Br>〃)

EndSub

</Script>

Web數據庫技術教程55

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

，：VB.NET的過程和函數（續）

3http://127.0.0.1/13-3.aspx-...0??

文件QF）編輯tE）查看國）收藏工具（T）

Q后退，x[g]；搜索

L,e)http：//1270.0.1/13-3.as目轉到

使用參數0時的輸出:2004-7-158:57:25

使用參數1時的輸出:2004年7月15日

使用參數2時的輸出:2004-7-15

使用參數3時的輸出:857:25

使用參數4時的輸出:08:57

茴完畢.Internet

Web數據庫技術教程56

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

國VB.NET的過程和函數（續）

③DateSerial函數

用來返回指定的日期。函數格式為:

DateSerial（年，月，日）

Web數據庫技術教程57

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

[例13-4]13-4.aspx

<ScriptLanguage二〃VB〃Runat二〃Serve/〉

SubPageLoad()

DimLastDayAsdate

LastDay=DateSerial(Year(now),Month(now)+1,1-1)

Response.Write(“本月的最后一，天是:〃&LastDay)

EndSub

</Script>

Web數據庫技術教程58

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

3http://127.0.0.1/13-4.aspx-U...BE?

文件9編輯⑥查看口收藏⑥工具?韋》?

。后退▼o⑻曲為搜索

itelhW國http：〃127.0.0.1/137.aspx竺|H鏘J瞬

本月的最后一天是:2004-7-31

田完畢.Internet

Web數據庫技術教程59

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

④DateDiff函數

計算兩個日期之間的時間間隔。函數格式為:

DateDiff（參數，日期一，日期二）

Web數據庫技術教程60

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

參數的枚舉值參數的簡寫代表的時間單位

Datelnterval.DayD天

Datelnterval.DayOfYearY天

Datelnterval.HourH時

DatelntervaLMinuteN分

Datelnterval.MonthM月

Datelnterval.QuarterQ季

Datelnterval.Seconds秒

Datelnterval.Weekdayw周

Datelnterval.WeekOfYearWw日歷周

Datelnterval.Yerayyyy年

Web數據庫技術教程61

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

::VB.NET的過程和函數(續)

[例13-5]13-5.aspx

<HtmlXScriptLanguage二〃VB〃Runat="Serve/〉

SubPageLoad()

DimDayl,Day2Asdate

Dayl斗1/1/2004#

Day2=#l/l/2005#

Response.Write(〃現在是：〃&Now&〃<BrXBr>")

Response.Write(“今年已過了：

DateDiff(〃d〃，Dayl,Now)&〃天〃&”<Br>〃)

Response.Write(“離明年還有："&_

DateDiff(〃d〃，Now,口@丫2)&〃天〃&〃〈81'〉〃)

EndSub</ScriptX/Html>

Web數據庫技術教程62

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

，：VB.NET的過程和函數（續）

3lhttp://127.0.0.1/13-5.aspx—__13回國

文件魚）編輯量）查看口收藏⑥工具①》F

e后退?o回回＜&/搜索以

地址小Ihttp：/〃/13-5.aspV|母轉到愜括‘

現在是:2004-7-1593:15

今年已過了：196天

離明年還有：169天

國完畢*Internet

Web數據庫技術教程63

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

⑤其它日期和時間輸出函數

函數函數格式說明

TodayToday()返回當前日期

YearYear(Date)返回給定日期的年份

MonthMonth(Date)返回給定日期的月份

DayDay(Date)返回給定日期是幾號

HourHour(Time)返回給定時間是幾點

MinuteMinute(Time)返回給定時間是幾分

SecondSecond(Time)返回給定時間是幾秒

WeekDayWeekDay(Date)返回給定日期是星期幾，1表示星期日…

Web數據庫技術教程64

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

[例13-6]13-6.aspx

<ScriptLanguage=〃VB〃Runat=〃Serve/〉

SubPageLoad()

Response.Write(〃今天是〃&Today()&〃〈Br>〃)

Response.Write(〃今年是〃&Year(Now)&〃年"&〃<Br〉〃)

Response.Write(〃本月是"&Month(Now)&〃月〃&〃<Br>〃)

Response.Write(“現在是"&Hour(Now)&“點"&_

Minute(Now)&_

〃分〃&Second(Now)&〃秒〃&〃<Br〉〃)

Web數據庫技術教程65

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

<]VB.NET的過程和函數（續）

DimIAsShort

I=Weekday(Now)

SelectCaseI

Case1

Response.Write(〃今天是星期日〃&〃<Br〉〃)

Case2

Response.Write(〃今天是星期一〃&〃<Br>〃)

Case3

Response.Write(〃今天是星期二〃&〃<Br>〃)

Case4

Response.Write(〃今天是星期三〃&〃<Br>〃)

Web數據庫技術教程66

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的過程和函數（續）

Case5

Response.Write（〃今天是星期四〃&〃<Br>"）

Case6

Response.Write（〃今天是星期五〃&〃<Br>"）

Case7

Response.Write（〃今天是星期六〃&〃<Br>〃）

EndSelect

EndSub

</Script>

Web數據庫技術教程67

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

區VB.NET的過程和函數（續）

3http://127.0.0.1/13-6.aspx-1...口回區

文件9編輯⑥查看?收藏?工具①:?,,,

。后退，。回回心力搜索"

也雄U.直）http："127.0.0.1/13-6.aspx目轉到后后'

今天是2U04-7-15

今年是2004年

本月是7月

現在是9點3分3秒

今天是星期四

田完畢9Internet

Web數據庫技術教程68

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

ElVB.NET的過程和函數（續）

（4）檢驗函數

函數功能

檢查Value的值，返回9表示Object,3表

VarType(Value)示整數，7表示日期，8表示字符串，11表示布爾

值，8200表示數組

IsNumeric(Value)檢查Value的值，返回True表示是數字類型

IsDate(Value)檢查Value的值，返回True表示是日期類型

IsArry(Value)檢查Value的值，返回True表示是數組類型

Web數據庫技術教程69

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

EIVB.NET的過程和函數(續)

[例13-7]13-7.aspx

<ScriptLanguage=〃VB〃Runat二〃Server”〉

SubPageLoad()

DimResultl,Result2,Results,Result4,Results,Result6As

Short

DimObjAsObject

Resultl二VarType(Obj)

Result2=VarType(123)

Result3-VarType(#6/6/2004#)

Result4=VarType(〃ASP.NET")

Result5=1sNumeric(456)

Result6=VarType(IsNumeric(456))

Web數據庫技術教程70

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

<]VB.NET的過程和函數（續）

Response.Write("Object的VarType()值是〃&Resultl&〃<Br〉〃)

Response.Write(〃整數的VarType()值是〃&Result2&〃<Br〉〃)

Response.Write("日期的VarType()值是〃&Results&〃<Br〉"

Response.Write(〃字符串的VarType()值是〃&Result4&〃<Br〉〃)

Response.Write(〃數字數據的IsNumeric()值是〃&Result5&

〃，即True"&〃<Br〉〃)

Response.Write(〃布爾值的VarType()值是〃&Result6&〃<Br>〃)

EndSub

</Script>

Web數據庫技術教程71

13ASP.NET的開發平臺和VB.NET

VB.NET簡介(續)

區VB.NET的過程和函數(續)

ahttp://127.0.0.1/13-7.aspx-li...底||巨|區I

文件?編輯⑥查看堡)收藏?工具9艷》患

。后退，。回國；搜索'

Uejhttp://127.0.0.1/13-7.aspx▼或轉到鏈接'

Object的UarType()值是9

整藪的UarType()循是3

日期的VarType()值是7

字符串的UarType()值是8

數字數據的IsNumenc()值是-1,即True

布爾值的VarType()值是11

⑧完畢.Internet

Web數據庫技術教程72

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的程序結構

*If語句

①If...Then結構

If…Then結構的語法如下:

IF條件Then

語句塊

EndIf

Web數據庫技術教程73

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

EIVB.NET的程序結構（續）

②If...Then...Else結構

If...Then...Else結構的語法如下:

If條件Then

語句塊1

Else

語句塊2

EndIf

Web數據庫技術教程74

13ASP.NET的開發平臺和VB.NET

VB.NET簡介（續）

囚VB.NET