《VB资料型态与宣告》.ppt

第三講第三講VB資料型態與宣告資料型態與宣告朱子豪朱子豪 2006/10/021精选课件ppt授課重點授課重點l任務：說明VB中的資料型別、型態，變數間的轉換，與基本的檔案開始控制項l程式元素：主要控制元件功能與使用(Menu,下拉選單，檔案選單等)，資料類型，2精选课件ppt資料型別、宣告與轉換資料型別、宣告與轉換l說明1.資料型別及涵義2.資料型別宣告與轉換3.影像與向量資料的案例l行動1.資料型別宣告2.資料間轉換與運算3.資料內部元素或性質的處理4.易犯錯誤3精选课件ppt1.資料的型別資料的型別a.依資料值的可變性分變數其記憶空間內的值可以置換DimAAsIntegerA=123A=100常數其記憶空間內的值宣告後不可以置換ConstA=1004精选课件ppt資料的型別資料的型別b.依資料值的可變性分同樣的記憶體內容，會因不同的資料型別(Type)而有不同的詮釋值(value)l字串（String）:存文字，長度不定(可存放0至大約二十億個Unicode字元)5精选课件ppt資料的型別資料的型別數值:存數字，長度以次類型而定l短整數(Short)：長度2bytes(-32,76832,767)l整數(Integer)：長度4bytes(-2,147,483,6482,147,483,647)l長整數(Long)：長度8bytes(-9,223,372,036,854,775,8089,223,372,036,854,775,807)l單精度浮點數(Single)：長度4Bytes(負值時從-3.402823E38-1.401298E-45；正值時從1.401298E-45到3.402823E+38)l雙精度浮點數(Double)：長度8Bytes(負值從-1.79769313486231570E+308-4.94065645841246544E-324；正值時從4.94065645841246544E-3241.79769313486231570E+308)6精选课件ppt資料的型別資料的型別l布林(Boolean):存T/F值，長度視實作平台而定l日期(Date):存時間值，長度8Byte(Date常值必須用數字符號(#)括起來而且必須以格式M/d/yyyy指定日期值，例如#5/31/1993#)l不定型(Object):保留參考物件的4Bytes位址，可彈性存各類型資料7精选课件ppt最有效率的資料型別最有效率的資料型別l針對從不包含分數的變數來說，整數資料型別的效率要比非整數型別的效率高。在VisualBasic中，Integer是最有效率的數字型別(NumericType)l而對於分數來說，Double是最有效率的資料型別，因為目前平台上的處理器是以雙精度浮點數(Double)執行浮點運算。然而，Double作業不會像Integer的整數類資料型別一樣快8精选课件pptc.依資料結構分l單一資料(Scalar):單一項目存在的資料例，DimAAsIntegerl結構化資料組合資料(Structure)：一單元中有不同之次資料項組合ex.要先宣告userdefinedtype如下：StructurePointXYDimXAsDoubleDimYAsDoubleEndStructure之後，才可以用PointXY作為一結構性的點資料型別ex.DimPoint1AsPointXY為一點資料的型別資料的型別資料的型別9精选课件pptd.依資料長度固定否分以陣列的長度是否可以動態宣告變化其長度而言l固定：不能動態更換長度例，DimA(10)AsIntegerl動態：可以動態宣告更換長度，ex:ReDimA(10)AsIntegerI=100ReDimA(I)AsIntegerex:DimA()AsIntegerI=100ReDimA(I)AsInteger資料的型別資料的型別10精选课件pptB.資料的含意資料皆存在特定的記憶空間中，不同的資料型別表示了其記憶體單元的大小、排列的對應與內容的詮釋（見圖1）。圖1、共16bytes的記憶體其可為：16字元的String、4個Integer、2個Long、4個Single、2個Double，亦可以是16個Boolean元素的陣列資料型別及含意資料型別及含意11精选课件ppt2.資料型別宣告與轉換資料型別宣告與轉換A.資料型別宣告a.資料型別宣告處l在程式開始處宣告例，DimA(10)AsIntegerl在程式中宣告，例ReDimA(10)AsIntegerI=100ReDimA(I)AsIntegerl在函式、參數、資料前宣告例，DimBAsInteger=12DimSasString=“123”12精选课件pptb.資料型別宣告符號l布林:Booleanl字串：Stringl數值:整數：Integer長整數：Long單精度浮點數：Single雙精度浮點數：Doublel日期：Datel不定型：Object資料型別宣告與轉換資料型別宣告與轉換13精选课件pptB.資料間轉換與運算a.自行轉換法則存入低精度資料時高低精度資料同時運作時b.強迫轉換加入Type強轉函數（如CStr.CInt,CDbl等）但是若轉換內容超出此函數的資料型態允許的範圍，則會發生錯誤。例如：DimsAsStringDimbAsIntegerPrivateSubCommand1_Click().s=testb=CInt(s)EndSub資料型別宣告與轉換資料型別宣告與轉換14精选课件ppt資料型別轉換錯誤資料型別轉換錯誤15精选课件pptl但是下列寫法則可正常執行DimsAsStringDimbAsIntegerPrivateSubCommand1_Click()b=123s=CStr(b)EndSubp.s.當小數部分恰好為0.5時，Cint 和CLng 函數會將它轉換成最接近的偶數值。例如，0.5轉換成0、1.5轉換成2。CInt 和CLng 函數不同於Fix 和Int 函數，Fix 和Int 會將小數部分去除，然後轉回整數值。(詳細差別請參考MSDN)c.已宣告之資料不可再重新宣告，除ReDim以外資料型別宣告與轉換資料型別宣告與轉換16精选课件pptC.資料內部元素或性質的處理a.檢驗資料型別例如：DimPAsObjectDimSAsIntegerP=1234S=VarType(P)傳回一整數值對應資料型態S3(代表整數)資料型別宣告與轉換資料型別宣告與轉換17精选课件ppt資料型別宣告與轉換資料型別宣告與轉換字串長度與元素抽取例：DimSAsStringDimLAsIntegerS=HelloWorldL=Len(S)L1118精选课件pptD.易犯錯誤a.資料TruncateError：太長的有效小數點被截掉，存到精度角小的資料中。b.4捨5入：實數轉整數時，但如為0.5則前數為奇數則近位，否則不進c.溢位錯誤：資料容量太小無法存入新資料值DimiAsShort=32767i=i+1若i大於32767則會溢位（運算結果大於Short的容量）資料型別宣告與轉換資料型別宣告與轉換19精选课件ppt溢位錯誤溢位錯誤20精选课件pptd.宣告一次只能有一個資料項若超過一個以上則只有最後一個被宣告，其餘則未為宣告例，DimA,B,CAsInteger則只有C被宣告了，A及B皆未被宣告若要全部宣告則要撰寫如下：DimAAsIntegerDimBAsIntegerDimCAsInteger或是DimAAsInteger,BAsInteger,CAsInteger資料型別宣告與轉換資料型別宣告與轉換21精选课件ppt3.網格與向量資料的案例網格與向量資料的案例 l影像單元：為一PIXEL，其長度可為1Nibe(1/2Byte),1Byte,2Bytes,4bytes(可存實數)l影像陣列：一ROW，一維的陣列DimRow(200)AsByte一塊影像，二維的陣列DimImage1(20，2000)AsByte22精选课件ppt網格式資料網格式資料1.右圖資料為N1xN2規則分布網格資料,處理時可將其宣告為一個二維的資料矩陣2.其地理相關資訊為起始點座標,資料格的大小與資料紀錄類別(這裡假設為0-255)8777654365435431起始點座標資料格X座標長度資料格Y座標長度StructureRasterDataDimBeginPointasPoint起始點座標DimCellXasSingle資料格X座標長度DimCellYasSingle資料格Y座標長度DimCellN1asIntegerDimCellN2asIntegerDimData(N1,N2)asIntegerEndStructure23精选课件ppt影像與向量資料的案例影像與向量資料的案例 l向量單元:可為2D或3D座標，(X,Y),(X,Y,Z)l向量陣列一ARC的資料可以陣列來記錄，例，DimX（）AsSingleDimY（）AsSingle或是先宣告一結構資料型別StructureVerticesDimX（）AsDoubleDimY（）AsDoubleEndStructure再宣告DimArc_Vertices()AsVertices24精选课件ppt向量式資料向量式資料1.圖上的多邊形,由三條arc與一個Label點構成2.每一條arc由一條或多條vertex組成3.每條vertex由兩個點組成p1p2p3p4p5v1v2v3v4arc1arc2arc3StructurePointDimXasDoubleDimYasDoubleEndStructureStructureVertexDimBeginPointasPointDimEndPointasPointEndStructureStructureArcDimArcVertexasVertex()EndStructureStructurePolygonDimLabelasPointDimPolyline()asArcEndStructure25精选课件ppt4.自己動手作自己動手作!1.資料型別宣告宣告三種不同的資料型別（整數、字串、單精準度），並給予適當的值2.資料間轉換與運算試著將整數值轉為文字、取出文字（含數字）中的數值部分、將Single型別的資料轉為Integer(Hint:CStr()、CInt()26精选课件ppt自己動手作自己動手作!3.資料內部元素或性質的處理檢驗各變數的資料型別，傳回一整數值(Hint:VarType()4.易犯錯誤請在一行程式中宣告三個字串變數A、B、C27精选课件pptiTlXo#s%v(y0B3E6I9LdOgRjVmYp!t&w-z1C4G7JaMePhTkWnZr$u*x+A2E5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgSjVmYq!t&w-z1D4G7JbMePhTkWoZr$u(x+A2E5H9KcNfRiUlXp#s&v)y0C3F6IaLdPgSjVnYq!t*w-z1D4G8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSkVnYq$t*w-A1D5G8JbNeQhTlWo#r%u(y+B2E6H9LcOfRjUmXp!s&v)z0C4F7IaMdPgSkVnZq$t*x-A1D5G8KbNeQiTlWo#r%v(y+B3E6H9LcOgRjUmYp!s&w)z1C4F7JaMdPhSkWnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4G7JaMePhSkWnZr$u*x+A2D5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgRjVmYq!t-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4G7JaMePhSkWnZr$u*x+A2D5H8KcNfQiUlXo#s%v(y0B3F6I9LdOgRjVmYq!t&w-z1C4G7JbMePhTkWnZr$u(x+A2E5H8KcNfRiUlXp#s%v)y0C3F6IaLdOgSjVnYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F7IaLdPgSjVnYq$t*w-A1D4G8JbNeQhTlWoZr%u(y+BIaLdOgSjVmYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F7IaLdPgSjVnYq$t*w-A1D4G8JbNeQhTlWoZr%u(x+B2E6H9KcOfRiUmXp!s&v)z0C3F7IaMdPgSkVnYq$t*x-A1D5G8JbNeQiTlWo#r%u(y+B3E6H9LcOfRjUmYp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlXo#r%v(y+B3E6I9LcOgRjUmYp!t&w)z1C4F7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0B3E6I9LdOgRjVmYp!t&w-z1C4G7JaMePhTkWnZr$u*x+A2E5H8KcNfQiUlXp#s%v)y0B3F6IaLdOgSjVmYq!t*w-z1D4G7JbMePhTkWoZr$u(x+A2E5H9KcNfRiUlXp#s&v)y0C3F6IaLdPgSjVnYq!t*w-A1D4G8JbMeQhTlWoZr%u(x+B2E6H9KcOfRiUmXp!s&v)z0C3F7IaLdPgSkVnYq$t*w-A1D5G8JbNeQhTlWo#r%u(y+B2E6H9LcOfRjUmXp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlWo#r%v(y+B3E6H9LcOgRjUmYp!s&w)z1C4F7JaMdPhSkWnZq$u*x-A2D5H8KbNfQiTlXo#w)z0C4F7IaMdPhSkVnZq$t*x-A1D5G8KbNeQiTlWo#r%v(y+B3E6H9LcOgRjUmYp!s&w)z1C4F7JaMdPhSkWnZq$u*x-A2D5H8KbNfQiTlXo#s%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4G7JaMePhSkWnZr$u*x+A2D5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgSjVmYq!t&w-z1D4G7JbMePhTkWnZr$u(x+A2E5H8KcNfRiUlXp#s%v)y0C3F6IaLdOgSjVnYq!t*w-z1D4G8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSjVnYq$t*w-A1D4G8JbNeQhTlWoZr%u(y+B2E6H9KcOfRjUmXp!s&v)z0C4F7IaMdPgSkVnZq$t*x-A1D5G8KbNeQiTlWo#r%u(y+B3E6H9LcOfRjUmYp!s&w)z0C4F7JaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4F7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0BJaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjUmYp!t&w)z1C4F7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0B3F6I9LdOgRjVmYq!t&w-z1C4G7JbMePhTkWnZr$u*x+A2E5H8KcNfQiUlXp#s%v)y0B3F6IaLdOgSjVmYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F7IaLdPgSjVnYq!t*w-A1D4G8JbMeQhTlWoZr%u(x+B2E6H9KcOfRiUmXp!s&v)z0C3F7IaMdPgSkVnYq$t*x-A1D5G8JbNeQiTlWo#r%u(y+B2E6H9LcOfRjUmXp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlXo#r%v(y+B3E6I9LcOgRjUmYp!t&w)z5G8JbNeQhTlWo#r%u(y+B2E6H9LcOfRjUmXp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlXo#r%v(y+B3E6I9LcOgRjUmYp!s&w)z1C4F7JaMdPhSkWnZq$u*x-A2D5H8KbNfQiTlXo#s%v(y0B3E6I9LdOgRjVmYp!t&w-z1C4G7JaMePhTkWnZr$u*x+A2D5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgSjVmYq!t&w-z1D4G7JbMePhTkWoZr$u(x+A2E5H9KcNfRiUlXp#s&v)y0C3F6IaLdPgSjVnYq!t*w-z1D4G8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSkVnYq$t*w-5H9KcNfRiUlXp#s%v)y0C3F6IaLdOgSjVnYq!t*w-z1D4G8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSkVnYq$t*w-A1D5G8JbNeQhTlWoZr%u(y+B2E6H9KcOfRjUmXp!s&v)z0C4F7IaMdPgSkVnZq$t*x-A1D5G8KbNeQiTlWo#r%v(y+B3E6H9LcOgRjUmYp!s&w)z0C4F7JaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4G7JaMePhSkWnZr$u*x+A2D5H8KbNfQiUlXo#s%v(y4F7JaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4G7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0B3F6I9LdOgRjVmYq!t&w-z1C4G7JbMePhTkWnZr$u(x+A2E5H8KcNfRiUlXp#s%v)y0B3F6IaLdOgSjVmYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F7IaLdPgSjVnYq$t*w-A1D4G8JbNeQhTlWoZr%u(x+B2E6H9KcOfRiUq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F7IaLdPgSjVnYq!t*w-A1D4G8JbMeQhTlWoZr%u(x+B2E6H9KcOfRiUmXp!s&v)z0C3F7IaMdPgSkVnYq$t*x-A1D5G8JbNeQiTlWo#r%u(y+B3E6H9LcOfRjUmXp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlXo#r%v(y+B3E6I9LcOgRjUmYp!t&w)z1C4F7JaMePhSkWnZq$u*x-A2D5cOfRjUmXp!s&w)z0C4F7IaMdPhSkVnZq$t*x-A2D5G8KbNeQiTlXo#r%v(y+B3E6I9LcOgRjUmYp!t&w)z1C4F7JaMdPhSkWnZq$u*x-A2D5H8KbNfQiTlXo#s%v(y0B3E6I9LdOgRjVmYp!t&w-z1C4G7JaMePhTkWnZr$u*x+A2E5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgSjVmYq!t&w-z1D4G7JbMePhTkWoZr$u(x+A2E5H9KcNfRiUlXp#s&v)y4G7JaMePhSkWnZr$u*x+A2D5H8KcNfQiUlXo#s%v)y0B3F6I9LdOgSjVmYq!t&w-z1D4G7JbMePhTkWoZr$u(x+A2E5H9KcNfRiUlXp#s&v)y0C3F6IaLdOgSjVnYq!t*w-z1D4G8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSkVnYq$t*w-A1D5G8JbNeQhTlWoZr%u(y+B2E6H9KcOfRjUmXp!s&v)zG8JbMeQhTkWoZr%u(x+B2E5H9KcOfRiUmXp#s&v)z0C3F7IaLdPgSkVnYq$t*w-A1D4G8JbNeQhTlWoZr%u(y+B2E6H9KcOfRjUmXp!s&v)z0C4F7IaMdPgSkVnZq$t*x-A1D5G8KbNeQiTlWo#r%v(y+B3E6H9LcOfRjUmYp!s&w)z0C4F7JaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRnZq$t*x-A1D5G8KbNeQiTlWo#r%u(y+B3E6H9LcOfRjUmYp!s&w)z0C4F7JaMdPhSkVnZq$u*x-A2D5G8KbNfQiTlXo#r%v(y0B3E6I9LcOgRjVmYp!t&w)z1C4F7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0B3F6I9LdOgRjVmYq!t&w-z1C4G7JbMePhTkWnZr$u(x+A2E5H8KcNfQip!t&w)z1C4F7JaMePhSkWnZq$u*x+A2D5H8KbNfQiUlXo#s%v(y0B3F6I9LdOgRjVmYq!t&w-z1C4G7JbMePhTkWnZr$u*x+A2E5H8KcNfQiUlXp#s%v)y0B3F6IaLdOgSjVmYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUmXp#s&v)y0C3F6IaLdPgSjVnYq!t*w-A1D4KcNfQiUlXp#s%v)y0B3F6IaLdOgSjVmYq!t*w-z1D4G7JbMeQhTkWoZr$u(x+B2E5H9KcNfRiUlXp#s&v)y0C3F6IaLdPgSjVnYq!t*w-A1D4G8JbMeQhT28精选课件ppt