[ 收藏 ] [ 简体中文 ]  
臺灣貨到付款、ATM、超商、信用卡PAYPAL付款,4-7個工作日送達,999元臺幣免運費   在線留言 商品價格為新臺幣 
首頁 電影 連續劇 音樂 圖書 女裝 男裝 童裝 內衣 百貨家居 包包 女鞋 男鞋 童鞋 計算機周邊

商品搜索

 类 别:
 关键字:
    

商品分类

  •  管理

     一般管理学
     市场/营销
     会计
     金融/投资
     经管音像
     电子商务
     创业企业与企业家
     生产与运作管理
     商务沟通
     战略管理
     商业史传
     MBA
     管理信息系统
     工具书
     外文原版/影印版
     管理类职称考试
     WTO
     英文原版书-管理
  •  投资理财

     证券/股票
     投资指南
     理财技巧
     女性理财
     期货
     基金
     黄金投资
     外汇
     彩票
     保险
     购房置业
     纳税
     英文原版书-投资理财
  •  经济

     经济学理论
     经济通俗读物
     中国经济
     国际经济
     各部门经济
     经济史
     财政税收
     区域经济
     统计 审计
     贸易政策
     保险
     经济数学
     各流派经济学说
     经济法
     工具书
     通货膨胀
     财税外贸保险类考试
     英文原版书-经济
  •  社会科学

     语言文字
     社会学
     文化人类学/人口学
     新闻传播出版
     社会科学总论
     图书馆学/档案学
     经典名家作品集
     教育
     英文原版书-社会科学
  •  哲学

     哲学知识读物
     中国古代哲学
     世界哲学
     哲学与人生
     周易
     哲学理论
     伦理学
     哲学史
     美学
     中国近现代哲学
     逻辑学
     儒家
     道家
     思维科学
     马克思主义哲学
     经典作品及研究
     科学哲学
     教育哲学
     语言哲学
     比较哲学
  •  宗教

  •  心理学

  •  古籍

     经部  史类  子部  集部  古籍管理  古籍工具书  四库全书  古籍善本影音本  中国藏书
  •  文化

     文化评述  文化随笔  文化理论  传统文化  世界各国文化  文化史  地域文化  神秘文化  文化研究  民俗文化  文化产业  民族文化  书的起源/书店  非物质文化遗产  文化事业  文化交流  比较文化学
  •  历史

     历史普及读物
     中国史
     世界史
     文物考古
     史家名著
     历史地理
     史料典籍
     历史随笔
     逸闻野史
     地方史志
     史学理论
     民族史
     专业史
     英文原版书-历史
     口述史
  •  传记

  •  文学

  •  艺术

     摄影
     绘画
     小人书/连环画
     书法/篆刻
     艺术设计
     影视/媒体艺术
     音乐
     艺术理论
     收藏/鉴赏
     建筑艺术
     工艺美术
     世界各国艺术概况
     民间艺术
     雕塑
     戏剧艺术/舞台艺术
     艺术舞蹈
     艺术类考试
     人体艺术
     英文原版书-艺术
  •  青春文学

  •  文学

     中国现当代随笔
     文集
     中国古诗词
     外国随笔
     文学理论
     纪实文学
     文学评论与鉴赏
     中国现当代诗歌
     外国诗歌
     名家作品
     民间文学
     戏剧
     中国古代随笔
     文学类考试
     英文原版书-文学
  •  法律

     小说
     世界名著
     作品集
     中国古典小说
     四大名著
     中国当代小说
     外国小说
     科幻小说
     侦探/悬疑/推理
     情感
     魔幻小说
     社会
     武侠
     惊悚/恐怖
     历史
     影视小说
     官场小说
     职场小说
     中国近现代小说
     财经
     军事
  •  童书

  •  成功/励志

  •  政治

  •  军事

  •  科普读物

  •  计算机/网络

     程序设计
     移动开发
     人工智能
     办公软件
     数据库
     操作系统/系统开发
     网络与数据通信
     CAD CAM CAE
     计算机理论
     行业软件及应用
     项目管理 IT人文
     计算机考试认证
     图形处理 图形图像多媒体
     信息安全
     硬件
     项目管理IT人文
     网络与数据通信
     软件工程
     家庭与办公室用书
  •  建筑

     执业资格考试用书  室内设计/装潢装修  标准/规范  建筑科学  建筑外观设计  建筑施工与监理  城乡规划/市政工程  园林景观/环境艺术  工程经济与管理  建筑史与建筑文化  建筑教材/教辅  英文原版书-建筑
  •  医学

     中医
     内科学
     其他临床医学
     外科学
     药学
     医技学
     妇产科学
     临床医学理论
     护理学
     基础医学
     预防医学/卫生学
     儿科学
     医学/药学考试
     医院管理
     其他医学读物
     医学工具书
  •  自然科学

     数学
     生物科学
     物理学
     天文学
     地球科学
     力学
     科技史
     化学
     总论
     自然科学类考试
     英文原版书-自然科学
  •  工业技术

     环境科学
     电子通信
     机械/仪表工业
     汽车与交通运输
     电工技术
     轻工业/手工业
     化学工业
     能源与动力工程
     航空/航天
     水利工程
     金属学与金属工艺
     一般工业技术
     原子能技术
     安全科学
     冶金工业
     矿业工程
     工具书/标准
     石油/天然气工业
     原版书
     武器工业
     英文原版书-工业技
  •  农业/林业

     园艺  植物保护  畜牧/狩猎/蚕/蜂  林业  动物医学  农作物  农学(农艺学)  水产/渔业  农业工程  农业基础科学  农林音像
  •  外语

  •  考试

  •  教材

  •  工具书

  •  中小学用书

  •  中小学教科书

  •  动漫/幽默

  •  烹饪/美食

  •  时尚/美妆

  •  旅游/地图

  •  家庭/家居

  •  亲子/家教

  •  两性关系

  •  育儿/早教

  •  保健/养生

  •  体育/运动

  •  手工/DIY

  •  休闲/爱好

  •  英文原版书

  •  港台图书

  •  研究生
     工学
     公共课
     经济管理
     理学
     农学
     文法类
     医学

  •  音乐
     音乐理论

     声乐  通俗音乐  音乐欣赏  钢琴  二胡  小提琴
  • 界面設計與Visual Basic(第4版)
    該商品所屬分類:研究生 -> 工學
    【市場價】
    243-352
    【優惠價】
    152-220
    【作者】 梁愛華、齊華山、徐歆愷、李紅豫、孫力紅 
    【所屬類別】 圖書  教材  研究生/本科/專科教材  工學圖書  計算機/網絡  程序設計  BasicVBVBScript 
    【出版社】清華大學出版社 
    【ISBN】9787302496601
    【折扣說明】一次購物滿999元台幣免運費+贈品
    一次購物滿2000元台幣95折+免運費+贈品
    一次購物滿3000元台幣92折+免運費+贈品
    一次購物滿4000元台幣88折+免運費+贈品
    【本期贈品】①優質無紡布環保袋,做工棒!②品牌簽字筆 ③品牌手帕紙巾
    版本正版全新電子版PDF檔
    您已选择: 正版全新
    溫馨提示:如果有多種選項,請先選擇再點擊加入購物車。
    *. 電子圖書價格是0.69折,例如了得網價格是100元,電子書pdf的價格則是69元。
    *. 購買電子書不支持貨到付款,購買時選擇atm或者超商、PayPal付款。付款後1-24小時內通過郵件傳輸給您。
    *. 如果收到的電子書不滿意,可以聯絡我們退款。謝謝。
    內容介紹



    開本:16開
    紙張:膠版紙
    包裝:平裝-膠訂

    是否套裝:否
    國際標準書號ISBN:9787302496601
    叢書名:高等學校計算機基礎教育教材精選

    作者:梁愛華、齊華山、徐歆愷、李紅豫、孫力紅
    出版社:清華大學出版社
    出版時間:2018年05月 


        
        
    "

    編輯推薦
    1. 全書把所有教學內容組織成例題,將語法介紹和控件使用融為一體,克服了語法知識的枯燥性,分散難點,使學生在有趣的例題中學習語法、了解對像的使用方法;2. 每章內容分成基礎部分和提高部分,有利於分層教學,緩解課時緊張問題;3. 為涉及算法的例題增設編程點撥;4. 通過具體例題分階段介紹調試方法;5. 增設項目實戰案例,將各章所學內容綜合運用,由易到難,*終實現具有較強實用性的花卉管理繫統;6. 每章增設章節練習,其中包括基本功能要求、拓展要求、提示等;7. 每章提供本章主要內容和各例題的知識要點,在附錄中提供對像、基本語法的索引和單號習題答案;8. 配備課件,內容包括電子教案、全書所有例題的代碼以及習題的可執行文件。  
    內容簡介
    本書是以Visual Basic(簡稱VB)程序設計零起點讀者為主要對像的程序設計教材,2004年8月、2009年12月、2014年8月分別出版了第1版、第2版和第3版。第1版和第2版被評為北京市高等教育精品教材,本次再版進一步強化了編程能力的培養,增加了項目綜合實戰內容並提高了趣味性。
    全書選用趣味性、針對性強的例題組織內容,並將語法介紹和控件使用融為一體,克服了語法知識的枯燥性。全書共分9章,分別是Visual Basic概述(使用窗體、標簽等)、順序結構程序設計(使用圖像框、多窗體等)、分支結構程序設計(使用單選按鈕、復選框、菜單等)、循環結構程序設計(使用列表框、PSet等)、數組(使用形狀、控件數組等)、過程(使用標準模塊等)、文件(使用文件繫統控件等)、訪問數據庫(使用ADO等)和VB綜合實戰。全書各章內容分成基礎部分和提高部分,並在各章提供本章主要內容和知識要點,每章末尾有章節練習,*後一章提供完整項目實戰案例,通過具體實例分階段介紹調試程序的方法。附錄提供對像和基本語法的索引、上機考試樣題、單號習題答案。本書配有電子教案和源代碼等素材。
    本書可作為高等院校Visual Basic程序設計課程的教材,也可作為自學者的指導書。
    目錄
    目錄
    界面設計與Visual Basic(第4版)第1章Visual Basic概述1
    1.1什麼是Visual Basic1
    1.2安裝Visual Basic程序2
    1.3設計Visual Basic程序的步驟4
    1.4Visual Basic的特點14
    1.5提高部分15
    1.5.1可視化集成開發環境15
    1.5.2對像和類的概念18
    1.5.3屬性、事件和方法18
    1.6章節練習19
    習題121
    基礎部分21
    提高部分22

    目錄


    界面設計與Visual Basic(第4版)第1章Visual Basic概述1


    1.1什麼是Visual Basic1


    1.2安裝Visual Basic程序2


    1.3設計Visual Basic程序的步驟4


    1.4Visual Basic的特點14


    1.5提高部分15


    1.5.1可視化集成開發環境15


    1.5.2對像和類的概念18


    1.5.3屬性、事件和方法18


    1.6章節練習19


    習題121


    基礎部分21


    提高部分22


    第2章順序結構程序設計24


    2.1結構化程序設計的三種基本結構25


    2.2VB語言基礎25


    2.2.1VB語句的書寫規則25


    2.2.2常量、變量及變量定義26


    2.2.3算術運算符與表達式29


    2.3數據賦值30


    2.4數據輸出33


    2.4.1用標簽輸出數據33


    2.4.2用消息框輸出數據35


    2.4.3用圖像框輸出圖形數據37


    2.4.4用窗體輸出數據39


    2.5數據輸入42界面設計與Visual
    Basic (第4版)目錄2.5.1用文本框輸入數據42


    2.5.2用滾動條輸入數據44


    2.5.3用輸入框輸入數據46


    2.6提高部分48


    2.6.1窗體與常用控件的進一步介紹48


    2.6.2消息框與輸入框54


    2.6.3常用數據類型介紹56


    2.6.4常用內部函數彙總58


    2.6.5文件路徑的概念60


    2.7章節練習61


    習題264


    基礎部分64


    提高部分67


    第3章分支結構程序設計70


    3.1關繫、邏輯運算符與表達式71


    3.1.1關繫運算符與表達式71


    3.1.2邏輯運算符與表達式72


    3.2If語句74


    3.2.1使用If語句處理簡單分支問題74


    3.2.2使用嵌套的If語句處理多分支問題83


    3.3使用Select Case語句處理多分支問題86


    3.4菜單設計90


    3.5提高部分95


    3.6章節練習99


    習題3101


    基礎部分101


    提高部分106


    第4章循環結構程序設計108


    4.1用ForNext語句處理循環問題109


    4.2認識Do WhileLoop和DoLoop While語句118


    4.3循環語句的嵌套120


    4.4提高部分123


    4.4.1組合框123


    4.4.2自行畫圖126


    4.5章節練習130


    習題4133


    基礎部分133


    提高部分135


    第5章數組137


    5.1一維數組138


    5.2控件數組145


    5.3提高部分146


    5.3.1數組的高級應用146


    5.3.2二維數組149


    5.4章節練習152


    習題5153


    基礎部分153


    提高部分156


    第6章過程158


    6.1過程的定義與調用159


    6.1.1函數(Function)過程的定義與調用159


    6.1.2子程序(Sub)過程的定義與調用165


    6.2變量的作用域168


    6.2.1過程級變量及其作用域168


    6.2.2窗體級變量及其作用域169


    6.2.3程序級變量及其作用域171


    6.3標準模塊172


    6.4提高部分176


    6.4.1靜態變量的使用176


    6.4.2過程的遞歸調用177


    6.5章節練習181


    習題6182


    基礎部分182


    提高部分183


    第7章文件185


    7.1文件概述186


    7.2文件瀏覽187


    7.3順序文件的讀寫操作189


    7.4提高部分194


    7.4.1文件繫統控件與通用對話框194


    7.4.2記錄類型198


    7.4.3文件的進一步介紹200


    7.4.4常用文件操作語句和函數204


    7.5章節練習209


    習題7212


    基礎部分212


    提高部分213


    第8章訪問數據庫216


    8.1數據庫的概念與建立216


    8.1.1數據庫概念216


    8.1.2數據庫和表的建立217


    8.2用ADO控件訪問數據庫219


    8.3提高部分228


    8.4章節練習235


    習題8237


    基礎部分237


    提高部分238


    第9章VB綜合實戰240


    9.1繫統功能240


    9.2數據庫結構設計242


    9.3其他文件準備243


    9.3.1圖片素材243


    9.3.2音頻素材244


    9.3.3文本素材244


    9.4各模塊功能實現245


    9.4.1“觀花”窗體的實現245


    9.4.2“尋花”窗體的實現248


    9.4.3“看圖識花”窗體的實現251


    9.4.4“新花”窗體的實現255


    9.4.5“養花小竅門”對話框的實現258


    9.4.6MDI主窗體的實現260


    9.4.7子窗體與主窗體的配合263


    9.5改進與提高264


    附錄A常用字符與ASCII代碼對照表266


    附錄B對像、基本語法索引267


    附錄C單號題參考答案269


    附錄D上機考試樣題290


    參考文獻294

    前言
    前言
    界面設計與Visual Basic(第4版)學習Visual Basic的目的是利用其可視化的編程工具,開發應用程序。為此需要做兩方面的工作: 設計用戶界面和編寫程序代碼。由於設計界面相對容易,因此開發Visual Basic應用程序的關鍵是如何編寫能夠實現相應功能的程序代碼。
    本書2004年8月、2009年12月、2014年8月分別出版了第1版、第2版和第3版,第1版和第2版被評為北京市高等教育精品教材,本次再版進一步強化了編程能力的培養,增加了項目綜合實戰內容並提高了趣味性。
    本書采用獨特、靈活的內容組織形式,深入淺出地介紹了界面設計和代碼編寫的思想方法,在著力增加趣味性的前提下,強化本課程的實踐性,以期達到事半功倍的教學效果。目前,許多高等院校將“Visual Basic程序設計”作為非工科專業的門程序設計課程。本書是作者在圍繞“教師方便教,學生容易學”的主題,開展一繫列的探索與實踐活動後,以零起點讀者為主要對像編寫的程序設計教材,因此可作為高等院校,尤其是應用型本科院校的教材,也可作為自學者的參考書。
    本書具有如下特點:

    前言


    界面設計與Visual Basic(第4版)學習Visual Basic的目的是利用其可視化的編程工具,開發應用程序。為此需要做兩方面的工作: 設計用戶界面和編寫程序代碼。由於設計界面相對容易,因此開發Visual Basic應用程序的關鍵是如何編寫能夠實現相應功能的程序代碼。


    本書2004年8月、2009年12月、2014年8月分別出版了第1版、第2版和第3版,第1版和第2版被評為北京市高等教育精品教材,本次再版進一步強化了編程能力的培養,增加了項目綜合實戰內容並提高了趣味性。


    本書采用獨特、靈活的內容組織形式,深入淺出地介紹了界面設計和代碼編寫的思想方法,在著力增加趣味性的前提下,強化本課程的實踐性,以期達到事半功倍的教學效果。目前,許多高等院校將“Visual Basic程序設計”作為非工科專業的門程序設計課程。本書是作者在圍繞“教師方便教,學生容易學”的主題,開展一繫列的探索與實踐活動後,以零起點讀者為主要對像編寫的程序設計教材,因此可作為高等院校,尤其是應用型本科院校的教材,也可作為自學者的參考書。


    本書具有如下特點:


    (1)
    每章內容分成基礎部分和提高部分。將常用對像的屬性、事件、方法以及語法知識等必須掌握的內容放在基礎部分中;將具有擴展性和提高性的內容安排在提高部分中。通過基礎部分的學習,掌握常用對像的使用方法和基本語法,初步建立可視化程序設計的思維方式,具備編寫一般應用程序的能力。提高部分可根據學生能力或課時安排等因素自主選學,但其不影響後續章節的學習。


    (2)
    所有教學內容組織成例題。根據知識要點精心編寫例題,提供大量、有趣的規範化程序。通過對例題的分析和講解,強化語法知識,歸納對像的使用特點。


    (3)
    涉及算法的例題增設編程點撥。針對學生“設計界面易,編寫代碼難”的情況,書中凡涉及算法的例題,在給出其代碼之前,都增設了編程點撥。


    (4)
    在各章開頭提供本章主要內容和例題的知識要點列表,在各章末尾提供章節練習環節。每道練習題均包含題目基本要求,根據題目難度有的增加了提示和拓展模塊。在附錄B中提供對像、基本語法的索引。


    (5)
    分階段介紹調試方法。為了培養學生調試程序、排除錯誤的能力,本書分階段通過具體例題介紹了調試程序的方法。


    (6)
    提供項目實戰案例。本書以“繁花似錦”為實例,圍繞花卉的相關知識,綜合運用多種控件以及文件、數據庫等,從界面設計到代碼編寫,由淺入深,逐步完善整個繫統。通過項目實戰,不但可以鞏固所學的內容,而且可以訓練學生的綜合設計能力,培養嚴謹的設計思維。


    (7)
    習題形式新穎,提供單號習題答案。與教材內容相對應,各章習題也分為基礎和提高兩部分。為了逐步提高學生的編程能力,精心編寫了形式新穎的習題,並提供單號習題答案,以方便學生自測和教師布置作業。


    (8)
    配備課件。提供包括電子教案、全部例題代碼及習題可執行文件在內的學習資料。為了減輕教師備課負擔,本書將基礎部分中的所有內容制作成生動的電子教案。通過運行習題的可執行文件,使讀者在著手做題前充分了解習題的功能要求和運行效果。


    使用建議:


    (1)
    基礎部分必學。基礎部分是學生必須掌握的知識,在教學過程中教師可將部分例題留給學生自學。


    (2)
    提高部分選學。書中的提高部分是為了幫助讀者更上一層樓,教師可以根據實際情況,選擇其中部分內容進行介紹。為了提高學生的上機編程和調試能力。


    (3)
    章節練習中提供的提示僅供參考,有餘力的學生應繼續完成拓展功能。


    (4)
    單、雙號習題成對做。單號習題提供參考答案,雙號習題則在類型上與前一單號習題相同,知識點也接近。基礎部分中提供的習題都是基本的,題量也不多,建議讀者全部完成,提高部分中的習題可根據情況選做。


    本書中的所有程序均在Visual Studio 6.0版本下運行通過。


    全書由北京聯合大學的梁愛華、齊華山主編和統稿,徐歆愷、李紅豫和孫力紅參加了部分章節的編寫。


    由於工作變動等原因,本書前三版的主編崔武子教授不再參加本書的改版工作。本書得到崔老師授權改版,在此特向崔老師對本書的貢獻表示感謝。


    在使用前三版教材和編寫第4版的過程中,得到了多年共同參加精品課程建設的全體團隊成員的大力支持和幫助,在此表示衷心的感謝。


    限於作者水平,書中難免有錯誤和疏漏之處,懇請讀者批評和指正。


     


    作者


    2018年2月界面設計與Visual
    Basic (第4版)前言


     


    本書特點


    界面設計與Visual Basic(第4版)1. 全書所有教學內容組織成例題,將語法介紹和控件使用融為一體,克服了語法知識的枯燥性,分散難點,使學生在學習有趣的例題中,學習語法、了解對像的使用方法;


    2. 每章內容分成基礎部分和提高部分,有利於分層教學,緩解課時緊張問題;


    3. 為涉及算法的例題增設編程點撥;


    4. 通過具體例題分階段介紹調試方法;


    5. 本書增設項目實戰案例。將各章所學內容綜合運用,由易到難,終實現具有較強實用性的花卉管理繫統;


    6. 每章增設章節練習,其中包括基本功能要求、拓展要求、提示等;


    7. 每章提供各例題的知識要點,在附錄中提供對像、基本語法的特殊形式的索引和單號習題答案;


    8. 配備課件,該課件包括電子教案、全書所有例題的代碼以及習題的可執行文件。
    在線試讀
    第5章數組本章將介紹的內容[4/5]基礎部分: 數組的定義素的引用。 控件數組的概念。 求平均值、(小)值;查找和排序算法。提高部分:  數組的高級應用。各例題知識要點例5.1數組的概念;數組的定義;引素。例5.2一維數組的應用: 逆序輸出。例5.3一維數組的應用: 求(小)值;順序查找。例5.4冒泡排序。例5.5控件數組。(以下為提高部分例題)例5.6選擇法排序。例5.7二維數組。例5.8過程調用時傳遞數組參數。例5.9動態數組。在計算機應用領域中,常常遇到需要對批量數據進行處理的情況,如統計大量的學生考試成績和求平均值等。這類問題通常都具有數據處理量大、各數據間存在內部聯繫的特點。如果單純采用簡單變量處理這些數據,不但煩瑣而且對於某些問題還可能根本無法解決。在VB中,通常使用數組解決這類問題。所謂數組,就是由一組(若干個)類型相同的相關變量結合在一起而構成的集合;而構成數組的每一個變量稱素。作為同一數素,它們都使用統一的變量名稱,隻是通過不同的下標加以區分。隻有一個下標的數組稱為一維數組,有兩個下標的數組稱為二維數組。界面設計與Visual Basic(第4版)第5章數組5.1一 維 數 組【例5.1】數組引例。窗體上添加3個標簽和2個命令按鈕,其中第3個標簽的AutoSize屬性為True。程序運行時,隨機產生10個兩位整數顯示在黃色標簽中;單擊“平均值”按鈕,計算該10個數的平均值,顯示在藍色標簽中,如圖51所示;單擊“大於平均值”按鈕,找出該10個數中大於平均值的整數,顯示在藍色標簽中,如圖52所示。 注意,隻有在計算出平均值後,“大於平均值”按鈕纔有效。圖51計算10個數據的平均值圖52顯示大於平均值的數據【解】將標簽AutoSize屬性設置為True時,其大小可根據顯示內容的長度自動進行調整。為了實現產生隨機數據、計算平均值的功能,可編寫代碼如下: Dim sum As Long'定義窗體級變量,存放10個整數的累加和 Private Sub Form_Load() Dim a As Long Dim i As Long Randomize'產生隨機種子 For i= 1 To 10 a= Int(Rnd  90) 10'產生一個10到99之間的整數a lblData.Caption= lblData.Caption a'連接顯示a sum= sum a'將a累加到sum中 Next End Sub Private Sub cmdAve_Click()'單擊“平均值”按鈕 lblAve.Caption= "平均值是" sum / 10 cmdLarge.Enabled= True'使“大於平均值”按鈕可用 End Sub在Form_Load過程的For循環中,使用變量a依次存放10個隨機數據,待循環結束時sum中存放了10個數據的累加和,而a中僅保留了後一個隨機數據。但是,為了進一步找出大於平均值的各個數據,就必須要全部保存10個整數,以便在計算出平均值後,再通過比較判斷,依次得到大於平均值的各數據。為此,不能隻定義1個變量a,而需要定義10個變量,如a1,a2,…,a10。由於各變量相互獨立,不能再使用ForNext語句產生數據。修改後的程序代碼如下: Dim sum As Long'以下11個變量在兩個事件中都要使用,定義為窗體級變量 Dim a1 As Long'以下定義10個窗體級變量,分別存放10個隨機數 Dim a2 As Long  Dim a10 As Long Private Sub Form_Load() Randomize a1= Int(Rnd  90) 10'以下10條語句產生10個隨機數並保存 a2= Int(Rnd  90) 10  a10= Int(Rnd  90) 10 lblData.Caption= a1 " " a2 ... a10'顯示10個數據 sum= a1 a2 ... a10'累加10個數據 End Sub Private Sub cmdAve_Click()'單擊“平均值”按鈕 lblAve.Caption= "平均值是" sum / 10 cmdLarge.Enabled= True End Sub Private Sub cmdLarge_Click()'單擊“大於平均值”按鈕 Dim ave As Double ave= sum / 10 lblAve.Caption= If a1 ave Then'以下10個If語句,找出大於平均值的各數據 lblAve.Caption= lblAve.Caption a1 End If If a2 ave Then lblAve.Caption= lblAve.Caption a2 End If  If a10 ave Then lblAve.Caption= lblAve.Caption a10 End If End Sub這樣煩瑣的程序纔僅對10個數據進行處理,若要求對100個、1000個甚至更多的批量數據進行同樣的處理,則代碼量激增,令人無法接受。使用本章介紹的數組解決此類批量處理問題,將使整個程序代碼書寫簡潔、清晰。使用數組實現例6.1功能的程序代碼如下: Dim sum As Long Dim a(1 To 10) As Long '定義數組a,包含10個Long素 Private Sub Form_Load() Dim i As Long Randomize For i= 1 To 10 a(i)= Int(Rnd  90) 10 '產生隨機數,存放在下標素中 lblData.Caption= lblData.Caption a(i) " " sum= sum a(i) '將下標素值累加到sum中 Next End Sub Private Sub CmdAve_Click() lblAve.Caption= "平均值是" sum / 10 cmdLarge.Enabled= True End Sub Private Sub CmdLarge_Click() Dim ave As Double Dim i As Long ave= sum / 10 lblAve.Caption= For i= 1 To 10 If a(i) ave Then '判斷下標素是否大於平均值ave lblAve.Caption= lblAve.Caption a(i) '連接a(i) End If Next End Sub程序說明: (1) 采用數組後可以方便地使用同一個數組名代表邏輯上相關的一批變量(10個),而為了表示不同素,隻需要簡單地素的下標即可。(2) 語句Dim a(1 To 10) As Long定義了一個名為a的一維數組,它包含素: a(1),a(2),…,a(9),a(10),其中素都是一個Long類型的變量,也就是說,素中隻能存放整型數據。請注意: 在使用數組前,必須對其進行定義。VB中定義一維數組的一般形式如下: Dim數組名(\\[下界 To \\]上界)As數據類型其中,上界和下界規定素下標的取值範圍,它們的值不得超過Long數據類型的範圍。數組中素的個數為: 上界-下界 1。若省略\\[下界 To\\],則繫統默認下界為0。例如: Dimb(-2 To 3) AsLong定義了一維數組b,其中包含6個Integ素: b(-2),b(-1),b(0),b(1),b(2),b(3);Dimx(4)AsString定義了一維數組x,其中包含5個素x(0),x(1),…,x(4)。(3) 數組名的命名規則與變量名相同。(4)素代表內存中的一個,它可以像普通變量一樣使用,隻不素用下標形式表示。引用一素的一般形式是 數組名(下標)注意: 下標的取值範圍應在定義該數組時所限定的\\[下界,上界\\]範圍內,不得越界。(5) 繫統為數素分配連續的。如圖53所示為數組a在內存中的存儲結構示意圖,繫統為其分配10個連續的(4B×10=40B)。圖53數組的存儲結構示意(6) 由於在多個事件過程中都要用到變量sum和數組a,所以將它們定義為窗體級。【例5.2】窗體上添加4個標簽和1個命令按鈕。程序運行時,隨機產生20個兩位整數,顯示在黃色標簽中,如圖54所示;單擊“逆序輸出”按鈕,在綠色標簽中逆序顯示各個整數,如圖55所示。圖54運行初始界面圖55逆序輸出【解】為了逆序輸出各數據,必須要全部保存20個整數,如果使用普通的變量存儲,需定義20個不同的變量,處理起來十分煩瑣。而且當處理的數據量增加到上百甚至上千時,采用普通的變量存儲的方法便無法適用。因此,這種情況下,我們引入數組存儲一組同類型的內部有聯繫的變量。程序代碼如下: Option Base 1'指定數組素下標下界 Dim a(1 to 20) As Long'定義窗體級數組a,包含20素 Private Sub Form_Load() Dim i As Long For i= 1 To 20 a(i)= Int(Rnd  90) 10'產生隨機數,存放在下標素中 lblData.Caption= lblData.Caption a(i) " "'將a(i)連接到標簽中 Next End Sub Private Sub CmdRev_Click() Dim i As LongFor i= 20 To 1 Step -1'逆序輸出 lblOut.Caption= lblOut.Caption a(i) " " Next End Sub程序說明: (1) 語句Option Base 1的作用是,在定義數組時若省略\\[下界 To\\],素的下標從1開始。因此,本例中語句Dim a(10) As Long等價於Dim a(1 To 10) As Long。出現在Option Base 後面的數字隻能是0或1,如果是素下標從0開始(此時該語句沒有實質意義)。(2) Option Base語句必須出現在數組定義之前,且位於所有事件過程的前面。其作用範圍僅限於出現在同一代碼窗口且在定義時未指出下標下界的數組。在一個代碼窗口中,Option Base語句隻能出現一次。(3) 通常情況下,數組操作總是借助於循環語句實現。在例5.1和例5.2中,正是使用了ForNext語句,巧妙地利用循環變量i素下標的一一對應關繫實現了素的逐一引用,並素進行相應的處理。現實生活中的許多問題都可以使用數組解決。為了更好地掌握數組的應用,應在平時的編程練習中注意多模仿、多實踐,不斷總結經驗,提高獨立編程能力。【例5.3】窗體上添加6個標簽和1個命令按鈕。程序運行時,隨機產生10個1~100的整數顯示在黃色標簽中,如圖56所示;單擊“查找”按鈕,找出該10個數中的值,顯示在藍色標簽中,將值所在的位置顯示在綠色標簽中,如圖57所示。 圖56運行初始界面圖57查找值及位置【解】題目要求查找一組數中的值及其所在位置,需要將這組數保存到數組中,並根據數組的下標確素所在的位置。一種簡單的方法是定義數組時下標從1開始,這素下標就與位置完全對應。程序代碼如下: Dim a(1 To 10) As LongPrivate Sub CmdSearch_Click()Dim i As Long Dim j As Long Dim Max As Long Max= a(1) j= 1 For i= 2 To 10 If Max a(i) Then Max= a(i) j= i End If Next LblMax.Caption= Max LblIndex.Caption= jEnd Sub第5章數組本章將介紹的內容[4/5]基礎部分: 數組的定義素的引用。 控件數組的概念。 求平均值、(小)值;查找和排序算法。提高部分:  數組的高級應用。各例題知識要點例5.1數組的概念;數組的定義;引素。例5.2一維數組的應用: 逆序輸出。例5.3一維數組的應用: 求(小)值;順序查找。例5.4冒泡排序。例5.5控件數組。(以下為提高部分例題)例5.6選擇法排序。例5.7二維數組。例5.8過程調用時傳遞數組參數。例5.9動態數組。在計算機應用領域中,常常遇到需要對批量數據進行處理的情況,如統計大量的學生考試成績和求平均值等。這類問題通常都具有數據處理量大、各數據間存在內部聯繫的特點。如果單純采用簡單變量處理這些數據,不但煩瑣而且對於某些問題還可能根本無法解決。在VB中,通常使用數組解決這類問題。所謂數組,就是由一組(若干個)類型相同的相關變量結合在一起而構成的集合;而構成數組的每一個變量稱素。作為同一數素,它們都使用統一的變量名稱,隻是通過不同的下標加以區分。隻有一個下標的數組稱為一維數組,有兩個下標的數組稱為二維數組。界面設計與Visual Basic(第4版)第5章數組5.1一 維 數 組【例5.1】數組引例。窗體上添加3個標簽和2個命令按鈕,其中第3個標簽的AutoSize屬性為True。程序運行時,隨機產生10個兩位整數顯示在黃色標簽中;單擊“平均值”按鈕,計算該10個數的平均值,顯示在藍色標簽中,如圖51所示;單擊“大於平均值”按鈕,找出該10個數中大於平均值的整數,顯示在藍色標簽中,如圖52所示。 注意,隻有在計算出平均值後,“大於平均值”按鈕纔有效。圖51計算10個數據的平均值圖52顯示大於平均值的數據【解】將標簽AutoSize屬性設置為True時,其大小可根據顯示內容的長度自動進行調整。為了實現產生隨機數據、計算平均值的功能,可編寫代碼如下:   Dim sum As Long'定義窗體級變量,存放10個整數的累加和  Private Sub Form_Load()  Dim a As Long      Dim i As Long      Randomize'產生隨機種子      For i= 1 To 10       a= Int(Rnd  90)  10'產生一個10到99之間的整數a          lblData.Caption= lblData.Caption & & a'連接顯示a          sum= sum  a'將a累加到sum中      Next  End Sub    Private Sub cmdAve_Click()'單擊“平均值”按鈕   lblAve.Caption= "平均值是" & sum / 10      cmdLarge.Enabled= True'使“大於平均值”按鈕可用  End Sub在Form_Load過程的For循環中,使用變量a依次存放10個隨機數據,待循環結束時sum中存放了10個數據的累加和,而a中僅保留了後一個隨機數據。但是,為了進一步找出大於平均值的各個數據,就必須要全部保存10個整數,以便在計算出平均值後,再通過比較判斷,依次得到大於平均值的各數據。為此,不能隻定義1個變量a,而需要定義10個變量,如a1,a2,…,a10。由於各變量相互獨立,不能再使用ForNext語句產生數據。修改後的程序代碼如下:   Dim sum As Long'以下11個變量在兩個事件中都要使用,定義為窗體級變量  Dim a1 As Long'以下定義10個窗體級變量,分別存放10個隨機數  Dim a2 As Long           Dim a10 As Long    Private Sub Form_Load()   Randomize      a1= Int(Rnd  90)  10'以下10條語句產生10個隨機數並保存      a2= Int(Rnd  90)  10              a10= Int(Rnd  90)  10      lblData.Caption= a1 & "  " & a2 & ... & a10'顯示10個數據      sum= a1  a2  ...  a10'累加10個數據  End Sub    Private Sub cmdAve_Click()'單擊“平均值”按鈕   lblAve.Caption= "平均值是" & sum / 10      cmdLarge.Enabled= True  End Sub    Private Sub cmdLarge_Click()'單擊“大於平均值”按鈕  Dim ave As Double      ave= sum / 10      lblAve.Caption=       If a1 > ave Then'以下10個If語句,找出大於平均值的各數據       lblAve.Caption= lblAve.Caption & a1 &       End If      If a2 > ave Then      lblAve.Caption= lblAve.Caption & a2 &       End If                   If a10 > ave Then       lblAve.Caption= lblAve.Caption & a10      End If  End Sub這樣煩瑣的程序纔僅對10個數據進行處理,若要求對100個、1000個甚至更多的批量數據進行同樣的處理,則代碼量激增,令人無法接受。使用本章介紹的數組解決此類批量處理問題,將使整個程序代碼書寫簡潔、清晰。使用數組實現例6.1功能的程序代碼如下:   Dim sum As Long  Dim a(1 To 10) As Long  '定義數組a,包含10個Long素  Private Sub Form_Load()  Dim i As Long      Randomize      For i= 1 To 10       a(i)= Int(Rnd  90)  10    '產生隨機數,存放在下標素中          lblData.Caption= lblData.Caption & a(i) & "  "          sum= sum  a(i)    '將下標素值累加到sum中      Next  End Sub    Private Sub CmdAve_Click()   lblAve.Caption= "平均值是" & sum / 10      cmdLarge.Enabled= True  End Sub    Private Sub CmdLarge_Click()   Dim ave As Double      Dim i As Long      ave= sum / 10      lblAve.Caption=       For i= 1 To 10      If a(i) > ave Then    '判斷下標素是否大於平均值ave           lblAve.Caption= lblAve.Caption & a(i) & '連接a(i)          End If      Next  End Sub程序說明: (1) 采用數組後可以方便地使用同一個數組名代表邏輯上相關的一批變量(10個),而為了表示不同素,隻需要簡單地素的下標即可。(2) 語句Dim  a(1 To 10)  As  Long定義了一個名為a的一維數組,它包含素: a(1),a(2),…,a(9),a(10),其中素都是一個Long類型的變量,也就是說,素中隻能存放整型數據。請注意: 在使用數組前,必須對其進行定義。VB中定義一維數組的一般形式如下: Dim數組名(\\[下界 To \\]上界)As數據類型其中,上界和下界規定素下標的取值範圍,它們的值不得超過Long數據類型的範圍。數組中素的個數為: 上界-下界 1。若省略\\[下界 To\\],則繫統默認下界為0。例如: Dimb(-2 To 3) AsLong定義了一維數組b,其中包含6個Integ素: b(-2),b(-1),b(0),b(1),b(2),b(3);Dimx(4)AsString定義了一維數組x,其中包含5個素x(0),x(1),…,x(4)。(3) 數組名的命名規則與變量名相同。(4)素代表內存中的一個,它可以像普通變量一樣使用,隻不素用下標形式表示。引用一素的一般形式是              數組名(下標)注意: 下標的取值範圍應在定義該數組時所限定的\\[下界,上界\\]範圍內,不得越界。(5) 繫統為數素分配連續的。如圖53所示為數組a在內存中的存儲結構示意圖,繫統為其分配10個連續的(4B×10=40B)。圖53數組的存儲結構示意(6) 由於在多個事件過程中都要用到變量sum和數組a,所以將它們定義為窗體級。【例5.2】窗體上添加4個標簽和1個命令按鈕。程序運行時,隨機產生20個兩位整數,顯示在黃色標簽中,如圖54所示;單擊“逆序輸出”按鈕,在綠色標簽中逆序顯示各個整數,如圖55所示。圖54運行初始界面圖55逆序輸出【解】為了逆序輸出各數據,必須要全部保存20個整數,如果使用普通的變量存儲,需定義20個不同的變量,處理起來十分煩瑣。而且當處理的數據量增加到上百甚至上千時,采用普通的變量存儲的方法便無法適用。因此,這種情況下,我們引入數組存儲一組同類型的內部有聯繫的變量。程序代碼如下:   Option Base 1'指定數組素下標下界  Dim a(1 to 20) As Long'定義窗體級數組a,包含20素    Private Sub Form_Load()  Dim i As Long      For i= 1 To 20       a(i)= Int(Rnd  90)  10'產生隨機數,存放在下標素中          lblData.Caption= lblData.Caption & a(i) & " "'將a(i)連接到標簽中      Next  End Sub    Private Sub CmdRev_Click()  Dim i As LongFor i= 20 To 1 Step -1'逆序輸出       lblOut.Caption= lblOut.Caption & a(i) & " "      Next  End Sub程序說明: (1) 語句Option Base 1的作用是,在定義數組時若省略\\[下界  To\\],素的下標從1開始。因此,本例中語句Dim a(10) As Long等價於Dim a(1 To 10) As Long。出現在Option  Base 後面的數字隻能是0或1,如果是素下標從0開始(此時該語句沒有實質意義)。(2) Option Base語句必須出現在數組定義之前,且位於所有事件過程的前面。其作用範圍僅限於出現在同一代碼窗口且在定義時未指出下標下界的數組。在一個代碼窗口中,Option Base語句隻能出現一次。(3) 通常情況下,數組操作總是借助於循環語句實現。在例5.1和例5.2中,正是使用了ForNext語句,巧妙地利用循環變量i素下標的一一對應關繫實現了素的逐一引用,並素進行相應的處理。現實生活中的許多問題都可以使用數組解決。為了更好地掌握數組的應用,應在平時的編程練習中注意多模仿、多實踐,不斷總結經驗,提高獨立編程能力。【例5.3】窗體上添加6個標簽和1個命令按鈕。程序運行時,隨機產生10個1~100的整數顯示在黃色標簽中,如圖56所示;單擊“查找”按鈕,找出該10個數中的值,顯示在藍色標簽中,將值所在的位置顯示在綠色標簽中,如圖57所示。 圖56運行初始界面圖57查找值及位置【解】題目要求查找一組數中的值及其所在位置,需要將這組數保存到數組中,並根據數組的下標確素所在的位置。一種簡單的方法是定義數組時下標從1開始,這素下標就與位置完全對應。程序代碼如下: Dim a(1 To 10) As LongPrivate Sub CmdSearch_Click()Dim i As Long    Dim j As Long    Dim Max As Long    Max= a(1)    j= 1    For i= 2 To 10    If Max< a(i) Then          Max= a(i)            j= i        End If    Next    LblMax.Caption= Max    LblIndex.Caption= jEnd Sub
    Private Sub Form_Load()Dim i As Long    Randomize    For i= 1 To 10     a(i)= Int(Rnd  100)  1        LblData.Caption= LblData.Caption & " " & a(i)    NextEnd Sub程序說明: (1) Dim a(1 To 10) As Long定義了窗體級的數組a,且下標從1開始。Max和j兩個變量分別保存當素中的值和下標。查找中首先將兩個變量分別賦值為素的值和下標。通過循環依次對後續的9素進行順序查找。後將這兩個變量的值顯示在界面對應的標簽中。(2) 如果定義數組時下界省略,素下標從0開始。素所在位置與下標之間差1,界面上顯示時就需要將下標 1。【例5.4】冒泡排序。窗體上添加4個標簽和2個命令按鈕。程序運行時,單擊“產生數據”按鈕,隨機產生10個1~100的整數顯示在黃色標簽中,如圖58所示;單擊“冒泡排序”按鈕,用冒泡排序法對黃色標簽中的整數按照從小到大的順序排序,顯示在綠色標簽中,如圖59所示。圖58產生數據圖59冒泡排序【解】題目要求將一組數用冒泡排序法從小到大排序。首先需要將這組數保存到數組中,然後按照冒泡排序的方法進行排序。冒泡排序的思想是: 比較相鄰素,如果個比第二個大,就交換它們兩個。從前往後對每一素做同樣的工作,至素應該是的數,輪比較結束。第二輪則對除素外素重復上述步驟。後續每一輪都對持續素重復上述過程,直到沒有任素需比較,則排序結束。程序代碼如下: Dim a(9) As LongPrivate Sub CmdRnd_Click()Dim i As Long    Randomize    For i= 0 To 9     a(i)= Int(Rnd  90)  10        LblBefore.Caption= LblBefore.Caption & " " & a(i)    NextEnd Sub
    Private Sub CmdSort_Click()Dim i As Long    Dim j As Long    Dim t As Long        For i= 1 To 9    For j= 0 To 9 - i          If a(j) > a(j  1) Then              t= a(j)                a(j)= a(j  1)                a(j  1)= t            End If        Next            Next    For i= 0 To 9     LblAfter.Caption= LblAfter.Caption & " " & a(i)    NextEnd Sub程序說明: (1) Dim a(9) As Long定義了窗體級的數組a,由於下界省略,因此下標為0~9,共素。定義兩個循環變量i和j,i表示冒泡排序的輪次,共需9輪;j則表示每輪中素下標範圍。隨著輪次增加,需素持續減少。(2) 如果排序要求是從大到小,則隻需要在比較時將判斷語句改為a(j) > a(j 1)時交換即可。5.2控 件 數 組【例5.5】利用單選按鈕設置不同字體。要求當單擊某個單選按鈕時,改變標簽中文字的字體,界面如圖510所示,執行界面如圖511所示。圖510設計界面圖511字體選擇【解】本例中字體的選擇采用的都是單選按鈕,類型相同,而且這4個單選按鈕的名稱就是字體名稱。下面采用控件數組實現。程序代碼如下:  Private Sub OptFont_Click(Index As Integer)  LblTitle.Font= OptFont(Index).Caption  End Sub程序說明:  (1) 將具有相同類型和名稱的一組控件稱為控件數組。以本例題中的4個單選按鈕為例,它們都屬於同一控件類型——單選按鈕,且具有相同的控件名OptFont,因而這4個單選按鈕就是一個控件數組。與前面介紹的數組類似,可通過索引號(Index屬性)標識和區分同一控件數組內的各個控件。(2) 在設計階段,添加第1個單選按鈕後,其Index屬性值是空的,但把第1個按鈕復制3次並創建成單選按鈕控件數組後,此時4個單選按鈕的Index屬性自動變為0、1、2、3,這是繫統默認設置的結果。實際上也可以通過Index屬性人為指定索引號,其取值範圍是0~32 767,但對於同一控件數組中的各控件,索引號必須互不相同。(3) 在設計時,使用控件數組比直接向窗體中添加相同類型的多個控件所消耗的資源要少;而且對於同一控件數組中的各控件,它們都共享相同的事件過程,從而可減少程序的編碼量。(4) 程序運行時無論單擊哪一個單選按鈕,都會觸發OptFont_Click事件過程。當單擊Arial按鈕時,將調用OptFont的公共事件過程OptFont_Click,並將該按鈕的索引號0賦予參數Index,再根據Index的不同取值而執行相應操作。同理,單擊Times New Roman按鈕時,也將執行OptFont_Click事件過程,並將索引號3傳遞給Index參數,即同一控件數組中的各控件共享同一事件過程。(5) 引用控件數組中各控件對像的方法是:     控件數組名(索引號)如OptFont(0)代表OptFont數組中索引號為0的單選按鈕,即Arial按鈕;OptFont(0).Caption則引用的是索引號為0的單選按鈕的Caption屬性。5.3提 高 部 分〖1〗5.3.1數組的高級應用【例5.6】刪素。窗體上添加5個標簽、1個文本框和1個命令按鈕,如圖512所示。程序運行時,隨機產生10個兩位整數顯示在黃色標簽中,在文本框中輸入要刪素的下標,單擊“刪除”按鈕,將指定下標素刪除,並將刪除後的新數組顯示在綠色標簽中,如圖513所示。
    書摘插畫
    插圖
    插圖

    插圖

    插圖

    插圖

    插圖

    插圖










     
    網友評論  我們期待著您對此商品發表評論
     
    相關商品
    在線留言 商品價格為新臺幣
    關於我們 送貨時間 安全付款 會員登入 加入會員 我的帳戶 網站聯盟
    DVD 連續劇 Copyright © 2024, Digital 了得網 Co., Ltd.
    返回頂部