Option Strict On '這一句就是嚴(yán)格要求，去掉這句就沒問題了，這是VB的語言特點；
創(chuàng)新互聯(lián)公司專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù)，包含不限于網(wǎng)站設(shè)計、成都網(wǎng)站制作、瑞昌網(wǎng)絡(luò)推廣、重慶小程序開發(fā)公司、瑞昌網(wǎng)絡(luò)營銷、瑞昌企業(yè)策劃、瑞昌品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運營等，從售前售中售后，我們都將竭誠為您服務(wù)，您的肯定，是我們最大的嘉獎；創(chuàng)新互聯(lián)公司為所有大學(xué)生創(chuàng)業(yè)者提供瑞昌建站搭建服務(wù)，24小時服務(wù)熱線：18980820575，官方網(wǎng)址：www.cdcxhl.com
嚴(yán)格來說只要是除法符號，運算結(jié)果就是double類型，既然是嚴(yán)格要求（Option Strict On）
當(dāng)然不允許你進行隱式轉(zhuǎn)換
你可以把 i = i / j ----》改成dim x as double, x = i / j
或者Dim i , j As double
至于對象類型獲取，VB6和VB.net有很大區(qū)別，比如vb.net可以寫obj.GetType().Tostring()，但是像這種簡單的、一看就知道是什么類型的數(shù)據(jù)，干嘛搞得那么復(fù)雜呢？你能直接控制為什么不直接控制住呢？所以只是做一個小程序，沒必要這么較真吧！
Option Explicit On
Option Strict On
Imports System
Module Program
Sub Main()
Dim s As String
Dim strs As String()
Dim fz,fm,n,m,t As Long
Console.Write("請輸入一個小數(shù)：")
s=Console.ReadLine().Trim()
strs=s.Split("."C)
fz=CLng(strs(0))
fm=CLng(Math.Pow(10,strs(1).Length))
fz=fz*fm+CLng(strs(1))
n=fz
m=fm
While n Mod m0
t=n Mod m
n=m
m=t
End While
fz\=m
fm\=m
Console.WriteLine("{0}={1}/{2}",s,fz,fm)
Console.Write("Press any key to continue . . . ")
Console.ReadKey(True)
End Sub
End Module
這兩個作為數(shù)值運算除法的區(qū)別：
1，/ ----就是通常數(shù)值的除法運算，例如：
8 / 2 的結(jié)果是4
6 / 5 的結(jié)果為 1.2
2，\ ----也是作數(shù)值的除法運算，但是返回的僅僅是商的整數(shù)部分，例如：
8 \ 2 的結(jié)果是 4
6 \ 5 的結(jié)果為 1
15 \ 4 的結(jié)果為 3
20 \ 3 的結(jié)果為 6
先乘除后加減，從右到左運算。
VB中運算符的計算優(yōu)先級順序如下:算術(shù)運算符和串聯(lián)運算符求冪(^)一元標(biāo)識和非(+、–)乘法和浮點除法(*、/)整數(shù)除法(\)取模(Mod)加法和減法(+、–)，字符串連接(+)字符串連接()算術(shù)移位()比較運算符。
擴展資料
vb.net?特性：
1、vb.net 完全集成到 Visual Studio 集成開發(fā)環(huán)境中，在這種集成開發(fā)環(huán)境與 VB 在若干方面有差異。主要體現(xiàn)在窗體的布局以及菜單等方面都有所不同。
2、vb.net 項目與 VB 不同。它使用基于文件夾的模型，所有項目均放置在項目文件夾層次結(jié)構(gòu)中。
3、vb.net 中使用ado.net來訪問數(shù)據(jù)庫，ado.net是.netFramework的一部分。在 vb.net 中實現(xiàn)數(shù)據(jù)訪問的方法主要有兩種。
其一是在程序設(shè)計階段，通過創(chuàng)建、配置數(shù)據(jù)適配器 DataAdapter 和生成數(shù)據(jù)集 DataSet；其二是在運行中，通過編程方式動態(tài)創(chuàng)建配置數(shù)據(jù)適配器和創(chuàng)建、生成數(shù)據(jù)集。
4、在 vb.net 中是使用asp.net技術(shù)來編寫 Web 頁面的。在asp.net中使用的也不是腳本語言，而是真正意義的編程語言。
憑借asp.net的 Web 應(yīng)用程序、XML Web Services 等基于 Web 的功能，使得 vb.net 開發(fā) Web 頁面與開發(fā) Windows 應(yīng)用程序很相似，Web 頁面代碼也顯得有條有理了。
5、vb.net 已經(jīng)成為完全的面向?qū)ο蟮木幊陶Z言，并且新增更多語言特性。
Dim BH, BL As ArrayList
Dim Cal As Integer
BH = New ArrayList
BL = New ArrayList
Dim h, l As Double
For i As Integer = 0 To LSB2.Items.Count - 1
BH.Add(LSB2.Items(i).ToString)
Next
For i As Integer = 0 To LSB1.Items.Count - 1
BL.Add(LSB1.Items(i).ToString)
Next
For I As Integer = 0 To BH.Count - 1
h = CDbl(BH.Item(I))
l = CDbl(BL.Item(I))
If (h = l) Then
Cal = 0
Else
Cal = (highAvg - lowAvg) / (h - l)
End If
LstA.Items.Add(Cal)
Next
區(qū)別：
VB?中“/”表示除法，可能含小數(shù) 3/5=0.6
“\”表示整除?，得到商，不含小數(shù) 3 \ 5 =0
用法例如：
1/2=0.5
1\2=0（解釋：小數(shù)被抹去）
--------
1/0.8=1.25
1\0.8=1（VB首先將\兩邊的值四舍五入為整數(shù)，再進行計算，因此1\0.8成了1\1=1）
--------
3.9/1.9=2.0526.....
3.9\1.9=2（3.9\1.9=4\2=2）
總之，\計算總會獲得一個整數(shù)，而/有可能還帶有小數(shù)。在一些不需要小數(shù)的計算中，例如窗體控件位置Left、Top、Width、Height值的計算，往往使用"\"。
擴展資料：
作用
matlab中的乘除法：
一、數(shù)字之間相乘/相除
a=3;
b=4;
1、相乘（*與.*沒區(qū)別）：
a*b
ans =
12
a.*b
ans =
12
2、相除（/與./沒區(qū)別）：
a=3;
b=4;
a/b
ans =
0.7500
a./b（a除以b）
ans =
0.7500
a.\b（b除以a）
ans =
1.3333
二、數(shù)字與矩陣之間相乘/相除
a=3;
A=[1,3,5;3,4,5;2,4,8];
A =
1? ? ?3? ? ?5
3? ? ?4? ? ?5
2? ? ?4? ? ?8
相乘（*與.*沒區(qū)別）：
a*A
ans =
3? ? ?9? ? 15
9? ? 12? ? 15
6? ? 12? ? 24
a.*A
ans =
3? ? ?9? ? 15
9? ? 12? ? 15
6? ? 12? ? 24
重慶分公司
重慶分公司
