Dim A As String, B As String
創(chuàng)新互聯(lián)建站堅(jiān)持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:網(wǎng)站建設(shè)、成都網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時(shí)代的洪雅網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
A = "123456"
B = "123456"
If A = B Then GoTo xiangdeng
MsgBox "不相等"
GoTo buxiangdeng
xiangdeng:
MsgBox "相等"
buxiangdeng:
vb.net規(guī)定如果要比較字符串,不能用“=”,strcomp(str1,str2,n)或者string.compare(str1,str2)
例如:
Dim a As String = "c"
Dim b As String = "c"
Dim n As Integer = String.Compare(a, b)
If n = 0 Then
MsgBox("=")
Else
MsgBox("")
End If
用 Like
% = 任意數(shù)量的字符
?= 單個(gè)字符
類似簡易的正規(guī)則比對(duì)。
具體可參照MSDN
例:(以下代碼可以直接放到程序里執(zhí)行)
dim str as string
str = "abc123"
if str like "a%" then msgbox "yes"
if str like "%a%2%" then msgbox "yes"
if str like "%3" then msgbox "yes"
if str like "%3?" = false then msgbox "no"
可以參考下面的代碼:
str1="abcde"
str2=inputbox("請(qǐng)輸入一個(gè)字符串!")
if str1=str2 then
msgbox "它們是一樣的呀!"
else
msgbox "它們是不一樣的!"
end?if
擴(kuò)展資料:
VB函數(shù)
And 運(yùn)算符: 執(zhí)行兩個(gè)表達(dá)式的邏輯連接。?
Array 函數(shù): 返回含一數(shù)組的變體 。
Asc 函數(shù): 返回字符串首字母的 ANSI 字符代碼。
賦值運(yùn)算符 (=):給變量或?qū)傩再x值。
Description 屬性: 返回或者設(shè)置說明某個(gè)錯(cuò)誤的字符串。
Dictionary 對(duì)象: 存儲(chǔ)數(shù)據(jù)鍵、項(xiàng)目對(duì)的對(duì)象。
Dim 語句: 聲明變量并分配存儲(chǔ)空間。
除法運(yùn)算符 (/): 兩數(shù)相除并以浮點(diǎn)數(shù)格式返回商。
參考資料來源:百度百科-Visual Basic