如何利用VB.NET[阵列]设计求出座标与距离?

您是第 4661 个阅读者

可列印版加为IE收藏收藏主题上一主题 | 下一主题

小佛爷

级别: 小人物

▼

[Basic][求助] 如何利用VB.NET[阵列]设计求出座标与距离?

请问如何用阵列设计一个：
..

访客只能看到部份内容，免费加入会员或由脸书 Google 可以看到全部内容

[ 此文章被小佛爷在2007-05-31 16:08重新编辑 ]


x0 [楼主] From：台湾中华HiNet \| Posted：2007-05-31 14:14 \|

overing

级别: 初露锋芒

x55

▲

如果是要求两座标点距离应该是用不到阵列...
难道要把阵列标号拿来算!?

抓上4个TEXTBOX跟一个按键
TEXTBOX分别命名为"X1","X2","Y1","Y2"

复制程式

Sub Command1_Click()
　Dim 距离#
　距离=(Abs(Val(X1)-Val(X2))^2+Abs(Val(Y1)-Val(Y2))^2)^0.5
　MsgBox 距离
End Sub

设 "点1"座标为(X1,Y1)
"点2"座标为(X2,Y2)
将两点座标(四个数字)打上对应的四个TEXTBOX
然后按下按钮

P.S.这是VB6写法,Net应该差不多@@

[ 此文章被overing在2007-05-31 17:59重新编辑 ]

Zippy G2 600W Intel C2Q Q9550 Gigabyte GA-X48-DQ6 Gigabyte GV-NX96T512H-B G-skill pi 1100MHz 2Gx4 ACARD ANS-9010 32GB (Windows7 10sec boot!!) WD 150GB(WD1500ADFD)/640GB(6400AASK)
x0 [1 楼] From：未知地址 \| Posted：2007-05-31 17:49 \|

Powered by PHPWind v1.3.6 Copyright © 2003-04 PHPWind	Processed in 0.060181 second(s),query:16 Gzip disabled 本站由瀛睿律师事务所担任常年法律顾问 \| 免责声明 \| 本网站已依台湾网站内容分级规定处理 \| 连络我们 \| 访客留言