发表于 2009-1-5 19:48
| 
鍦╒B涓嬭璁″紑鍙戝疄鏃剁殑鏁版嵁閲囬泦鏇茬嚎
鍙戝竷: 2008-7-15 14:35 | 浣滆: 缃戠粶杞浇 | 鏉ユ簮: 缃戠粶杞浇 | 鏌ョ湅: 66娆
鍦╒B涓嬭璁″紑鍙戝疄鏃剁殑鏁版嵁閲囬泦鏇茬嚎
鍑哄锛歅Conline
璐ｄ换缂栬緫锛歾wg
[04-2-14 9:27] 浣滆咃細鍚翠笢鐢
路鐑偣鎺ㄨ崘:路闊抽涔嬬帇浜夐湼鎴:WinampVS Foobar銆路琛ヤ竵绔熶篃闇淇ˉ锛佸井杞倓鎮勪负琛ヤ竵鎵撹ˉ涓併路楣挎璋佹墜?鍥戒骇浼樺寲杞欢澶ф瘮鎷!銆路鏁版嵁搴撳涔:鏌ヨ鍖哄垎澶у皬鍐欍涓鍛ㄦ柊杞偣璇:鎷ユ湁100GB璧勬簮鐨勬挱鏀惧櫒銆路鏈鐐儏涔:2鏈14鏃ョ殑鐗瑰埆鏉ヤ俊銆路鑺傛棩褰辩墖鎷嶆憚鍚庢湡澶勭悊閫熸垚銆路鎯呬功瀹濋壌涔:蹇冭璁╀綘鍚銆路鎯呬功瀹濋壌涔:鐪熸儏鍛婄櫧銆路璋冧紭Web绔欑偣鎬ц兘瀹屽叏鏀荤暐銆路缁樺埗瑗块棬瀛恠l55鎵嬫満銆路Fireworks鍒朵綔 IE 娴忚鍣ㄥ浘鏍囥路鑼堵峰挅鍟÷锋灉姹-PS钀ラ犱紤闂叉皵姘涖路鐢≒hotoshop鐢讳竴棰楁澗鏍戙路瓒ｅ懗娓告垙,鎸戞垬鑷垜:鎵撲紒楣呫路鎯呬汉鑺傛棩涓婚灞忎繚-鐖便
1. 寮曡█
銆銆鍦ㄧ瑪鑰呭弬涓庤繃鐨勫紑鍙戠殑鏈虹粍杞寸摝鎺у埗绯荤粺涓紝瑕佹眰鑳藉瀹炴椂閲囬泦杞寸摝杞姩閫熷害鍊糣锛屽苟鑳芥牴鎹疄鏃堕噰闆嗗埌鐨勬暟鎹粯鍒跺嚭V鍦10鍒嗛挓鍐呭彉鍖栫殑鐭湡瓒嬪娍鍥惧拰涓鏃ュ唴鍙樺寲鐨勯暱鏈熻秼鍔垮浘锛屼互渚胯娴嬭酱鐡﹁浆鍔ㄧ殑瓒嬪娍鎯呭喌锛屾煡鐪嬫帶鍒舵晥鏋溿傝绯荤粺鍦╒B6.0鐜涓嬭繘琛屽紑鍙戯紝寮濮嬫椂閲囩敤浜哣B鍖呭惈鐨凙ctivex鎺т欢鎶鏈粯鍒舵洸绾匡紝鍦ㄦ晥鏋滀笉鐞嗘兂鐨勬儏鍐典笅锛岀瑪鑰呭埄鐢╒B缁樼敾鍑芥暟锛屾渶缁堟垚鍔熷疄鐜颁簡瀹炴椂鏁版嵁閲囬泦鏇茬嚎鐨勭粯鍒朵笌鏄剧ず銆傜瑪鑰呭皢浠ヨ酱鐡﹀疄鏃堕噰闆嗛熷害鍊糣鐨勭煭鏈熻秼鍔垮浘涓轰緥锛岃皥涓涓嬪疄鏃堕噰闆嗘洸绾跨殑璁捐涓庡疄鐜拌繃绋嬨
2. 缁樺浘鎺т欢鐨勯夋嫨
銆銆绯荤粺寮鍙戝垵鏈燂紝閲囩敤VB鍐呮墍鍚殑Activex鎺т欢鎶鏈潵瑙ｅ喅瀹炴椂閲囬泦鏇茬嚎鐨勭粯鍒堕棶棰樸俈B鎺т欢涓彁渚涗簡澶栭儴Activex鎺т欢Mschart鏉ョ粰璇ュ簲鐢ㄧ▼搴忔坊鍔犲浘琛ㄥ姛鑳斤紝鐢ㄥ畠鑳藉垱寤哄寘鎷潯褰€侀ゼ褰€佺嚎褰㈢瓑涓嶅悓绫诲瀷鐨勪笁缁村浘琛ㄣ傚埄鐢ㄨ鎺т欢锛屽彲瀵硅〃涓殑鎵鏈夐」鐩繘琛屽畬鍏ㄦ帶鍒讹紝渚嬪鏍囬銆佸浘琛ㄣ佽剼娉ㄣ佽酱銆佹暟鎹偣绯诲垪绛夌瓑锛岀敋鑷宠繕鑳芥棆杞浘琛紝涓烘瘡涓鍏冪礌鍔犱笂鑳屾櫙銆佽缃厜婧愶紝鎶婂畠浠斁鍦ㄦ兂瑕佺殑鍦版柟銆
銆銆鏈郴缁熶腑闇瑕佸疄鏃舵祴閲忚酱鐡﹂熷害V鐨勫疄闄呭硷紝骞舵牴鎹疄鏃舵洿鏂扮殑鐭湡閫熷害鏁版嵁鏁扮粍銆侀暱鏈熼熷害鏁版嵁鏁扮粍鍒嗗埆缁樺埗鐭湡瓒嬪娍鏇茬嚎鍥句笌闀挎湡瓒嬪娍鏇茬嚎鍥撅紝杩欎袱涓秼鍔垮浘鍧囨槸閫熷害鍊(Y杞)鍜屾椂闂达紙X杞达級鐨勫叧绯绘洸绾匡紝骞堕殢鐫鏃堕棿鍙樺姩瀹炴椂鏇存柊锛屼互渚胯娴嬨
銆銆鐭湡瓒嬪娍鍥剧殑缁樺埗锛岀敱浜庢祴閲10鍒嗛挓鍐呯殑鏁版嵁锛屾瘡涓绉掓祴閲忎竴娆★紝鍥犳姣10鍒嗛挓鍐呴兘鏈600涓暟鎹紝涓虹粯鍒舵洸绾匡紝杩樿璧嬩簣涓涓垵鍊硷紝鎵浠ラ熷害鐭湡鏁版嵁瀹氫箟涓洪暱搴︿负601鐨勬暟缁勩傚皢鏁版嵁鍒濆鍖栧悗锛屽埄鐢∕schart鎺т欢寰楀埌濡備笅鍥1鎵绀虹殑鐭湡瓒嬪娍妯℃嫙鍥俱
鍥 1 鐭湡瓒嬪娍 妯℃嫙鍥
銆銆璇ュ浘鐨勯潤鎬佹樉绀哄瑙傛瘮杈冪悊鎯筹紝浣嗘槸姣忕涓娆＄殑鏁版嵁鏇存柊浣垮睆骞曟瘡绉掗挓閮戒細寮曡捣鐢变簬閲嶇粯甯︽潵鐨勯棯鐑侊紝杩欏ぇ澶ч檷浣庝簡鍥惧舰鐣岄潰鐨勫彲瑙嗘т笌缇庤鎬с傜敱姝ゅ彲瑙侊紝Mschart鎺т欢涓嶅お閫傜敤浜庣粯鍒跺疄鏃舵暟鎹噰闆嗙郴缁熺殑鐩稿叧鏇茬嚎銆備负浜嗚В鍐宠繖涓毦棰橈紝绗旇呭皾璇曞埄鐢ㄤ簡VB鎻愪緵鐨勭粯鐢诲嚱鏁扮瓑绠鍗曟槗鐢ㄧ殑澶氬獟浣撳疄鐜版妧鏈紝骞跺彇寰椾簡闈炲父濂界殑鏁堟灉锛屼互涓嬫槸鎴戜滑鐨勫疄鐜版楠ゃ
3. 缁樺浘鍑芥暟鐨勪娇鐢
銆銆鍦ㄨ绠楁満搴旂敤涓佸浘褰㈢▼搴忚璁￠氬父鏄竴绉嶆瘮杈冨鏉傜殑鍔冲姩锛屽湪浠ュ墠鐨勪紶缁熻瑷濡侰璇█锛岀粯鍒跺浘褰㈡槸涓浠堕潪甯搁夯鐑︾殑浜嬶紝鍦ㄧ湡姝ｅ紑濮嬬粯鍥惧墠闇瑕佸仛澶ч噺鐨勫伐浣溿備絾鏄湪VB6.0涓紝缁樺浘鍗村彉寰楀崄鍒嗚交鏉撅紝瀹冪殑鍩烘湰鍥惧舰鍖呮嫭鐐广佺洿绾裤佺煩褰€佸渾鍜屾き鍦嗐備娇鐢ㄧ粯鍥惧嚱鏁扮粯鍒剁殑鍥惧舰鏃㈠彲浠ュ皢绐椾綋浣滀负瀹瑰櫒锛屼篃鍙互灏哣B涓殑鎺т欢Picturebox浣滀负瀹瑰櫒銆
銆銆鍦ㄥ疄鏃堕噰闆嗘暟鎹洸绾夸腑鍙渶鐢ㄥ埌鐩寸嚎鐨勭粯鍒舵柟娉曪紝鍦╒B涓敾鐩寸嚎鏄氳繃line鍑芥暟鏉ュ疄鐜扮殑锛屽畠鐨勮娉曚负:
object.Line[Step1](x1,y1)[ Step2](x2,y2),[color],[B],[F]
銆銆鍏朵腑锛屽彲閫夐」Step1璁剧疆璧风偣鍧愭爣鐩稿浜庡綋鍓嶅浘褰綅缃浘鏍囩殑鍋忕Щ閲忥紱(x1,y1) 鎸囧畾鐩寸嚎鐨勮捣鐐瑰潗鏍囨垨鐭╁舰鐨勫乏涓婅鍧愭爣锛涘彲閫夐」Step2璁剧疆缁堢偣鍧愭爣鐩稿浜庡綋鍓嶅浘褰綅缃浘鏍囩殑鍋忕Щ閲忥紱(x2,y2) 鎸囧畾鐩寸嚎鐨勭粓鐐瑰潗鏍囨垨鐭╁舰鐨勫彸涓嬭鍧愭爣锛沜olor鏄寚缁樼敾鎵鐢ㄧ殑RGB棰滆壊锛屽彲浠ヨ蹇界暐銆傚湪缁樺埗鐩寸嚎鏃讹紝line鍑芥暟鐨凚鍜孎閮戒笉閫夈
4. 瀹炴椂閲囬泦鏁版嵁鏇茬嚎鐨勭粯鍒
銆銆缁樺埗瀹炴椂閲囬泦鏁版嵁鏇茬嚎鏄负浜嗗疄鏃惰娴嬶紝浠ヤ究鎺屾彙瀹炴椂閲囬泦鏁版嵁鍙樺姩鐨勮秼鍔匡紝浣挎洸绾挎樉绀烘晥鏋滄渶浣炽傜粯鍒舵洸绾垮墠瑕佸皢闇瑕佺殑缁樺浘鑼冨洿鍙婂潗鏍囪酱鐨勫昂瀵稿埢搴﹁瀹氬ソ锛岀劧鍚庢牴鎹熷害娴嬮噺缁撴灉鍙婇噰闆嗘椂闂寸粯鍒跺疄鏃舵祴閲忔洸绾裤
4.1 鍧愭爣杞翠笌缃戞牸璁剧疆
銆銆鏂板缓Form锛屽皢灞炴ame璁句负 frmchart锛屽湪绐椾綋涓婃坊鍔犳帶浠禤icturebox浣滀负瓒嬪娍鍥剧殑鏄剧ず瀹瑰櫒锛屽悓鏃讹紝涓洪檷浣庣粯鍥惧鏉傛э紝骞惰兘鎺у埗鍥剧墖鑳屾櫙锛屾垜浠坊鍔犱簡涓涓猄hape鎺т欢骞堕夊彇璇ユ帶浠剁殑鐭╁舰浣滀负缁樺浘鑼冨洿锛屼互璇ョ煩褰㈢殑涓嬭竟绾夸负妯潗鏍囷紝宸﹁竟绾夸负绾靛潗鏍囥傜敱浜庨熷害鑼冨洿5mm/s,鎺у埗鏃堕棿涓10鍒嗛挓锛屽洜姝ゆ垜浠埄鐢ㄦ帶浠跺皢宸﹁竟绾垮垎涓5鏍硷紝姣忔牸浠ｈ〃閫熷害鏈澶ф祴閲忚寖鍥寸殑1/5锛屽嵆1mm/s,灏嗕笅杈圭嚎鍒嗕负10鏍硷紝姣忔牸浠ｈ〃1鍒嗛挓銆
4.2 瀹炴椂閲囬泦鏁版嵁鏇茬嚎缁樺埗
鍥2 鐭湡瓒嬪娍绀烘剰鍥
銆銆鍦ㄥ仛濂戒笂杩版楠ょ殑鍩虹涓婏紝绗旇呭埄鐢≒icturebox鐨凩ine鏂规硶寰楀埌浜嗗鍥2鎵绀虹殑杈冧负鐞嗘兂鐨勫疄鏃舵洸绾跨粯鍒舵晥鏋溿
4.3 绋嬪簭瀹炵幇浠ｇ爜
銆銆缁樺埗瀹炴椂閲囬泦鏁版嵁鏇茬嚎鐨勭▼搴忔簮浠ｇ爜濡備笅锛
Dim x0, y0, h, w
Dim I as integer
x0 = Shape1.Left
y0 = Shape1.Top + Shape1.Height
h = Shape1.Height / 1
w = Shape1.Width / 300
Picture1.ForeColor = QBColor(1)
Picture1.Cls
Y1 = Shape1.Height
For I=0 to 600
Picture1.Line (x0 + i * w, y0 - dqsj(i) * h)-(x0 + (i + 1) * w,y0 - dqsj(i + 1, Q) * h )
Next
//璇存槑锛氬叾涓紝dqsj鏄褰10鍒嗛挓鍐呭疄鏃堕噰闆嗛熷害鍊肩殑鏁扮粍銆
