请问一下vb中的if语句的用法 很简单的一个VB if 语句的用法!!!!

VB\u7f16\u7a0b\u4e2d\u201cIF\u201d\u8bed\u53e5\u8981\u5982\u4f55\u4f7f\u7528\uff1f

VB\u7684\u8fd9\u4e2aif\u5176\u5b9e\u53ef\u4ee5\u7528\u610f\u601d\u6765\u914d\u4e0a\u53bb\u7684.. if\u5728\u8fd9\u91cc\u5c31\u662f"\u5982\u679c/\u5224\u65ad". then\u5728\u8fd9\u91cc\u5c31\u662f"\u63a5\u7740".else\u5728\u8fd9\u91cc\u5c31\u662f"\u76f8\u53cd"..end if\u5728\u8fd9\u91cc\u5c31\u662f"\u7ed3\u675f\u5224\u65ad" ..

\u8fd9\u4e9b\u53ea\u662f\u6211\u7684\u7ffb\u8bd1..\u4f46\u662f\u7406\u89e3\u8fd9\u4e9b\u5c31\u6bd4\u8f83\u597d\u7528\u4e86..

\u6bd4\u5982\u4f8b\u5b50:
if text1.text = "ok" then ' \u5982\u679ctext1.text\u91cc\u9762\u7684\u5185\u5bb9\u662f"ok" \u90a3\u4e48\u5c31\u6267\u884c\u4e0b\u5217\u4ee3\u7801
msgbox "\u6587\u672c\u6846\u91cc\u7684\u5185\u5bb9\u662fok"
else '\u76f8\u53cd,\u5982\u679ctext1.text\u91cc\u9762\u7684\u5185\u5bb9\u4e0d\u662f"ok", \u90a3\u4e48\u5c31\u6267\u884c\u4e0b\u5217\u4ee3\u7801
msgbox "\u6587\u672c\u6846\u91cc\u7684\u5185\u5bb9\u4e0d\u662fok"
end if

\u8fd9\u91cc\u53ea\u662f\u4e00\u4e2a\u7b80\u5355\u7684\u5224\u65ad.. \u5224\u65adtext1.text\u91cc\u9762\u7684\u5185\u5bb9\u662f\u4e0d\u662f"ok"

\u4f8b\u5b502:
if dir("c:\1.exe") "" then
msgbox "C\u76d8\u67091.exe"
else
msgbox "C\u76d8\u6ca1\u67091.exe"
end if

\u603b\u4e4b,\u6709if\u5c31\u5fc5\u987b\u8981end if
\u540e\u9762\u6709end if \u524d\u9762\u4e5f\u5fc5\u987b\u8981 if

\u8ba4\u771f\u5b66\u5594..! \u52a0\u6cb9..

if n=1 then
msgbox"1"
elseif n=2 then
msgbox "2"
else
msgbox "\u5176\u5b83"
end if

\u6216\u8005\u4f60\u7684\u610f\u601d\u662f\uff1a
if n=1 or n=2 then
msgbox""
end if

\u662f\u4e0d\u662f\u8fd9\u6837\uff0c\u53ea\u8981n\u4e0d\u4e3a\u7a7a\uff0c\u5c31\u51fa\u73b0MSGBOX
if n "" then
msgbox""
END IF
\u4f60\u8981\u8bf4\u4e00\u4e0b\uff0c\u9700\u8981\u5224\u65ad\u7684\u6761\u4ef6\u662f\u4ec0\u4e48\u3002N\u8981\u6ee1\u8db3\u4ec0\u4e48\u6761\u4ef6\u3002

1、首先,鼠标双击进入代码窗口,如下图所示。

2、然后按下单引号即可开始注释。

3、这时可以看到被注释的语句是绿色的文字。

4、也可以打开编辑窗口,在下拉菜单中,找到并点击此按钮即可多行注释。

5、也可以点击这个取消多行注释。



If...Then...Else 语句

根据表达式的值有条件地执行一组语句。

语法

If condition Then [statements][Else elsestatements]

或者,可以使用块形式的语法:

If condition Then
[statements]

[ElseIf condition-n Then
[elseifstatements] ...

[Else
[elsestatements]]

End If

If...Then...Else 语句的语法具有以下几个部分:

部分 描述
condition 必要参数。一个或多个具有下面两种类型的表达式:
数值表达式或字符串表达式,其运算结果为 True 或 False。如果 condition 为 Null,则 condition 会视为 False。
TypeOf objectname Is objecttype 形式的表达式。其中的 objectname 是任何对象的引用,而 objecttype 则是任何有效的对象类型。如果 objectname 是 objecttype 所指定的一种对象类型,则表达式为 True,否则为False。
statements 在块形式中是可选参数;但是在单行形式中,且没有 Else 子句时,则为必要参数。一条或多条以冒号分开的语句,它们在 condition 为 True 时执行。
condition-n 可选参数。与 condition 同。
elseifstatements 可选参数。一条或多条语句,它们在相关的 condition-n 为 True 时执行。
elsestatements 可选参数。一条或多条语句,它们在前面的 condition 或 condition-n 都不为 True 时执行。

说明

可以使用单行形式(第一种语法)来做短小简单的测试。但是,块形式(第二种语法)则提供了更强的结构化与适应性,并且通常也是比较容易阅读、维护及调试的。

注意 在单行形式中,按照 If...Then 判断的结果也可以执行多条语句。所有语句必须在同一行上并且以冒号分开,如下面语句所示:

If A > 10 Then A = A + 1 : B = B + A : C = C + B

在块形式中,If 语句必须是第一行语句。其中的 Else、 ElseIf,和 End If 部分可以只在之前加上行号或行标签。If 块必须以一个 End If 语句结束。

要决定某个语句是否为一个 If 块,可检查 Then 关键字之后是什么。如果在 Then 同一行之后,还有其它非注释的内容,则此语句就是单行形式的 If 语句。

Else 和 ElseIf 子句都是可选的。在 If 块中,可以放置任意多个 ElseIf 子句,但是都必须在 Else 子句之前。If 块也可以是嵌套的。

当程序运行到一个 If 块(第二种语法)时,condition 将被测试。如果 condition为 True,则在 Then 之后的语句会被执行。如果 condition 为 False,则每个 ElseIf 部分的条件式(如果有的话)会依次计算并加以测试。如果找到某个为 True 的条件时,则其紧接在相关的 Then 之后的语句会被执行。如果没有一个 ElseIf 条件式为 True(或是根本就没有 ElseIf 子句),则程序会执行 Else 部分的语句。而在执行完 Then 或 Else 之后的语句后,会从 End If 之后的语句继续执行。

提示 根据单一表达式来执行多种可能的动作时,Select Case 更为有用。不过,TypeOf objectname Is objecttype 子句不能在 Select Case 语句中使用。

注意 TypeOf 不能与诸如 Long、Integer 以及其他不是 Object 的固定数据类型一起使用。

  • 璇烽棶涓涓媣b涓殑if璇彞鐨勭敤娉
    绛旓細1銆侀鍏堬紝榧犳爣鍙屽嚮杩涘叆浠g爜绐楀彛锛屽涓嬪浘鎵绀恒2銆佺劧鍚庢寜涓嬪崟寮曞彿鍗冲彲寮濮嬫敞閲娿3銆佽繖鏃跺彲浠ョ湅鍒拌娉ㄩ噴鐨璇彞鏄豢鑹茬殑鏂囧瓧銆4銆佷篃鍙互鎵撳紑缂栬緫绐楀彛锛屽湪涓嬫媺鑿滃崟涓紝鎵惧埌骞剁偣鍑绘鎸夐挳鍗冲彲澶氳娉ㄩ噴銆5銆佷篃鍙互鐐瑰嚮杩欎釜鍙栨秷澶氳娉ㄩ噴銆
  • VB鍑芥暟if鎬庝箞鐢?
    绛旓細If <鏉′欢> Then 璇彞缁 End If 褰 <鏉′欢>鐨勫间负True锛屾墽琛屸滆鍙ョ粍鈥濓紝鍚﹀垯灏变笉鎵ц鈥滆鍙ョ粍鈥銆俰f璇彞鐨勪竴绉嶆牸寮忓涓嬶細渚1锛歺 = 100 If x >5 Then '杩欓噷浣犺鐞嗚В鍥犱负x=100锛屾墍浠ュ浜 x >5鐨勫垽鏂粨鏋滀负True Print "Ok"End If 杩欎釜浠g爜缁撴灉锛岃緭鍑"Ok"銆備互涓婁唬鐮佸氨鏄細鈥滃鏋渪澶т簬5锛...
  • vb涓璱f鏄粈涔堟剰鎬?
    绛旓細VB涓殑if璇彞鏄竴绉嶆祦绋嬫帶鍒惰鍙ワ紝瀹冪敤浜庡垽鏂煇涓潯浠舵槸鍚︽垚绔嬶紝鏍规嵁鏉′欢鐨勭湡鍋囨潵鎵ц涓嶅悓鐨勪唬鐮佸潡銆俰f璇彞鐨勫熀鏈牸寮忓涓嬶細If condition Then 鍏朵腑锛屸渃ondition鈥濅唬琛ㄩ渶瑕佸垽鏂殑鏉′欢锛屽鏋滄潯浠舵垚绔嬪垯鎵ц鈥滆鍙ュ潡1鈥濓紝鍚﹀垯鎵ц鈥滆鍙ュ潡2鈥濄俰f璇彞鍦╒B涓槸闈炲父甯哥敤鐨勶紝瀹冨彲浠ュ府鍔╃▼搴忓憳瀹炵幇澶嶆潅鐨勯昏緫鍔熻兘...
  • if()璇彞鐨勭敤娉鏄粈涔?
    绛旓細鑻=10锛鍒欐墽琛岃鍙f x Then x=1 Else x=-1鍚庯紝x鐨勫兼槸1銆倄=10鏃讹紝X涓虹湡锛屾墍浠lse娌℃湁鎵ц锛屾墽琛岀殑鏄疶hen鍚庨潰鐨剎=1銆傚湪VB璇█涓紝鍋氶昏緫杩愮畻鏃舵暟瀛0琛ㄧず鍋囷紝鍏朵粬鏁板瓧琛ㄧず鐪熴
  • vb鍒ゆ柇璇彞鎬庝箞鐢
    绛旓細鍩烘湰鐢ㄦ硶鏄細If 鏉′欢1 Then 璇彞娈 End if 鎴栵細If 鏉′欢1 Then 璇彞娈1 Else 璇彞娈2 End if 杩欐牱浣跨敤If璇彞锛屽氨鍙互浣跨▼搴忔湁閫夋嫨鎬х殑鎵ц浠g爜銆傛敞鎰忥紝If璇彞涓瀹氳鏈夊垽鏂潯浠跺拰鎵ц璇彞锛屾渶鍚庣敤 End If 缁撳熬銆備絾濡傛灉鎵ц璇彞鍙湁涓鏉★紝灏卞彲浠ョ缉鎴愪竴琛岋紝涓嶅繀鍐嶅啓End If銆傚锛欼f 鏉′欢1 Then ...
  • vb鐢IF 鍒ゆ柇
    绛旓細if璇彞鐨勭敤娉 渚1:If a=0 Then Print "a=0"渚2锛欼F a=0 Then Print "a=0"Else Print "a<>0"End If 渚3锛欼f a>0 Then Print "a>0"Else If a=0 Then Print "a=0"Else Print "a<0"End If 渚4锛欼f a<10 And a>5 Then Print "5<a<10"End IF 渚5锛欼f a>0 And a...
  • VB鐨刬f璇硶杩愮敤
    绛旓細vb鐨刬f璇硶鐨勫熀鏈粨鏋勬槸锛欼f ...锛堟潯浠) Then ...锛堝鏋滄潯浠跺惢鍚堝垯鎵ц鐨璇彞)Else ...锛堝鏋滄潯浠朵笉鍚诲悎鍒欐墽琛岀殑璇彞)End if 涓句釜渚嬪瓙锛屽鏋1=1鍒欏脊鍑哄璇濇鏄剧ずa锛屽鏋1鈮1锛屽垯寮瑰嚭瀵硅瘽妗嗘樉绀篵銆侷f 1 = 1 Then MsgBox ("a")Else MsgBox ("b")End If 杩愯缁撴灉濡傚浘 甯屾湜瀵逛綘鏈夋墍甯姪...
  • excel 涓VB鍏充簬if鐨勭敤娉
    绛旓細excel 涓VB鍏充簬if鐨勭敤娉濡備笅锛if璇彞鐨鍚箟 if璇彞瀛楅潰鎰忔濆氨鏄鏋滅殑鎰忔濓紝濡傛灉鏉′欢涓虹湡锛岄偅涔堝氨鎵цif璇彞閲岄潰鐨绋嬪簭锛岃繖涓▼搴忥紝涓鑸寚then鍚庨潰鐨勶紝涓涓猧f璇彞鍙互娌℃湁end if 锛屼絾缁濆涓嶈兘娌℃湁then锛岃繖涓鐐规槸瑕佹敞鎰忕殑锛宨f鈥︹hen鈥︹︾粨鏋 璇ョ粨鏋勪竴鑸敤浜庢瘮杈冪畝鍗曠殑鍒ゆ柇璇彞鎵ц锛屼笅闈互涓娈靛疄渚...
  • if璇彞鐨勭敤娉鏄粈涔?
    绛旓細if(!i){ ; } 濡傛灉i涓0锛!i涓虹湡锛岀户缁墽琛宨f閲岀殑璇彞 濡傛灉i涓洪潪0鍊硷紝!i涓哄亣锛岃烦杩噄f閲岀殑璇彞 if璇彞鏄寚缂栫▼璇█锛堝寘鎷琧璇█銆丆#銆VB銆乯ava銆佹眹缂栬瑷绛夛級涓敤鏉ュ垽瀹氭墍缁欏畾鐨勬潯浠舵槸鍚︽弧瓒筹紝鏍规嵁鍒ゅ畾鐨勭粨鏋滐紙鐪熸垨鍋囷級鍐冲畾鎵ц缁欏嚭鐨勪袱绉嶆搷浣滀箣涓銆
  • VB缂栫▼IF璇彞鐨浣跨敤
    绛旓細if<鏉′欢>then <璇彞> <璇彞> ...End if 涓巆璇█涓嶅悓,(vb)鐨勬潯浠惰鍙ユ洿绗﹀悎鑻辫鐨勮娉,濡傛灉then鍚庨潰鎵璺熺殑璇彞鍙湁涓鏉,鍙互鍐欐垚:if <鏉′欢> then 涓嶇敤end if 鏈夋椂杩樼敤鍒:if<鏉′欢>then <璇彞> Else <璇彞> end if 杩樺彲浠ュ湪else閲屽啀宓屽if璇彞,濡 if <鏉′欢> then <璇彞> else if <...
  • 扩展阅读:if编程实例详解 ... vb中if语句如何有两个前提 ... excel if多个条件嵌套 ... vb if语句多个条件 ... vba中if语句怎么用 ... vb中if语句编程范例 ... if函数判断包含文本 ... if包含某个文字则取值 ... vb中if语句的实例用法 ...

    本站交流只代表网友个人观点,与本站立场无关
    欢迎反馈与建议,请联系电邮
    2024© 车视网