^{<menuitem id="ge2u3"></menuitem>}

Office中國論壇/Access中國論壇

標(biāo)題: 【新手入門】之一：If分支語句 [打印本頁]

作者: roych 時間: 2012-2-13 00:48
標(biāo)題: 【新手入門】之一：If分支語句
   看了ycxchen在篩選語句問題提及的問題，決定花些時間開始對所有新手進行掃盲，所以這一系列帖子會臨時置頂。后面盡可能每周完成一個帖子。
   同樣地，因為是掃盲，所以這些可能不值一哂的問題或者答案，高手們路過就好了，不過不介意大家出題接龍。
   好了，廢話少說，先拋出今天的題目(大家可以先在模塊里進行調(diào)試，并想想為什么）：
   1、2個y是一樣的嗎？如果不一樣，y都等于多少呢？
   代碼1：

Sub test()
Dim x, y
x = 2
If x > 0 Then y = 3 * x
y = 2 * x + 1
Debug.Print y
End Sub

復(fù)制代碼

代碼2：

Sub test()
Dim x, y
x = 2
y = 2 * x + 1
If x > 0 Then y = 3 * x
Debug.Print y
End Sub

復(fù)制代碼

2、立即窗體里打印出來的x和y哪個大？

Sub test()
Dim x, y, t
x = 7
y = 2
If x > y Then t = x: x = y: y = t
Debug.Print x, y
End Sub

復(fù)制代碼

作者: JosephTan 時間: 2012-2-13 06:46
怎么都沒有end if這樣編譯應(yīng)該不能成功.

作者: efcndi 時間: 2012-2-13 08:24
看看

作者: roych 時間: 2012-2-13 10:11

JosephTan 發(fā)表于 2012-2-13 06:46
怎么都沒有end if這樣編譯應(yīng)該不能成功.

單句是不用End If的。

作者: yanwei82123300 時間: 2012-2-13 11:37
謝謝幫助！進階

作者: yanwei82123300 時間: 2012-2-13 11:43
roych 老師您寫的代碼，我在哪里能夠測試呢？謝謝

作者: roych 時間: 2012-2-13 13:38
本帖最后由 roych 于 2012-2-13 13:40 編輯

yanwei82123300 發(fā)表于 2012-2-13 11:43
roych 老師您寫的代碼，我在哪里能夠測試呢？謝謝

新建模塊，復(fù)制粘貼后即可測試（別忘了打開立即窗口）。

[attach]48319[/attach]

作者: yanwei82123300 時間: 2012-2-13 14:09
roych老師請問我打開立即窗體后再按哪一個鍵去執(zhí)行呢?謝謝

作者: yanwei82123300 時間: 2012-2-13 14:12
本帖最后由 yanwei82123300 于 2012-2-13 14:13 編輯

看看圖片

作者: roych 時間: 2012-2-13 15:15

yanwei82123300 發(fā)表于 2012-2-13 14:12
看看圖片

執(zhí)行前先按下Ctrl+G以顯示立即窗口。

作者: yanwei82123300 時間: 2012-2-13 15:44
請問如何執(zhí)行謝謝

作者: yanwei82123300 時間: 2012-2-13 15:50
是按F5鍵嗎？謝謝

作者: 陽春面 時間: 2012-2-13 15:52
學(xué)習(xí)，老師辛苦

作者: ycxchen 時間: 2012-2-13 16:13
頂頂頂！

作者: roych 時間: 2012-2-13 17:18

yanwei82123300 發(fā)表于 2012-2-13 15:50
是按F5鍵嗎？謝謝

嗯。其實如果不喜歡用Debug.Print，也可以用Msgbox來處理的。只是我更習(xí)慣于用Debug.Print而已，因為它特別是對SQL語句的檢驗會方便。

作者: Grant 時間: 2012-2-13 23:35
Debug.Print 我喜歡

作者: renyucai1963 時間: 2012-2-14 07:33
學(xué)習(xí)的。

作者: 82077802 時間: 2012-2-14 08:20
謝謝幫助！進階

作者: yanghua1900363 時間: 2012-2-14 08:24
先掃盲了

作者: renyucai1963 時間: 2012-2-15 15:12
{:soso_e100:}報道學(xué)習(xí)。

作者: aioliadl 時間: 2012-2-16 12:08
學(xué)習(xí)學(xué)習(xí)

作者: renyucai1963 時間: 2012-2-17 09:01
{:soso_e100:}報到，學(xué)習(xí)。

作者: renyucai1963 時間: 2012-2-19 09:26
{:soso_e100:}報到，學(xué)習(xí)。

作者: renyucai1963 時間: 2012-2-20 10:19
{:soso_e100:}報到，學(xué)習(xí).

作者: 陽城 時間: 2012-2-20 10:41
謝謝老師的無私�。�

作者: 陽城 時間: 2012-2-20 10:44
roych 老師可以結(jié)合實例講解一些代碼？那樣更形象點�。�！謝謝

作者: roych 時間: 2012-2-20 14:57

陽城發(fā)表于 2012-2-20 10:44
roych 老師可以結(jié)合實例講解一些代碼？那樣更形象點�。。≈x謝

里面的代碼就是實例啊�？梢源蜷_立即窗口來測試的。

作者: wang1950317 時間: 2012-2-20 20:17
學(xué)習(xí)學(xué)習(xí)！

作者: yori2007 時間: 2012-4-1 22:49

作者: 大懶貓68 時間: 2012-4-2 00:01
1111111111111111111

作者: l3396949 時間: 2012-4-2 08:34
學(xué)習(xí)中！~~！~

作者: shuix 時間: 2012-4-4 08:36
感謝樓主分享

作者: 快樂向前走 時間: 2012-5-25 11:30
好好阿紅

作者: jinzhanxi 時間: 2012-7-30 09:05
謝謝分享

作者: 若離ヘ不棄° 時間: 2012-8-14 11:21
學(xué)習(xí)

作者: lin2003_lin 時間: 2012-8-17 00:33
看看

作者: smilingkiss 時間: 2013-1-31 22:20
學(xué)習(xí)中

作者: wangjianxiao 時間: 2013-2-2 17:35
運行結(jié)果怎么與我認(rèn)為的不一致，代碼1為5，代碼3為2,7

作者: wangjianxiao 時間: 2013-2-2 18:45
又掌握了一點，謝謝

作者: 你是壞蛋 時間: 2013-2-2 20:23
看看

作者: 1085491621 時間: 2013-2-2 20:39

頂一下

作者: 123shusheng 時間: 2013-2-6 21:31
學(xué)習(xí)，學(xué)習(xí)

作者: 飛不動的鷹 時間: 2013-2-22 21:52

:lol:lol

作者: 5574916 時間: 2013-2-22 22:36
長知識了，謝謝分享哦！

作者: 微微森林 時間: 2013-3-28 17:28
學(xué)習(xí)了。

作者: 游戲人生 時間: 2013-3-28 21:02
學(xué)習(xí)

作者: daisyjane 時間: 2013-9-22 11:33
很想看看

作者: 愚加熊 時間: 2014-4-25 11:03

謝謝

作者: 愚加熊 時間: 2014-4-25 11:05
謝謝

作者: msyangyi 時間: 2014-5-26 12:50
一步一個腳印

作者: wzh 時間: 2014-5-29 06:30
看看看�。�！

作者: cwh886 時間: 2014-10-1 17:25
學(xué)習(xí)

作者: 枯木一線 時間: 2014-10-8 12:30
學(xué)習(xí)一下

作者: 枯木一線 時間: 2014-10-9 15:34
Sub test()
Dim x, y, t
x = 7
y = 2
If x > y Then t = x: x = y: y = t
Debug.Print x, y
End Sub

這段代碼比較經(jīng)典，包含了流程控制（if語句）和賦值

作者: 2677598003 時間: 2014-11-21 04:41
學(xué)習(xí)

作者: gxstudent 時間: 2014-12-22 22:00
學(xué)習(xí)

作者: 天涯淪落20131 時間: 2014-12-24 13:21
123

作者: 桑松木 時間: 2014-12-27 11:56
學(xué)習(xí)學(xué)習(xí)

作者: sanjian 時間: 2014-12-28 09:42
學(xué)習(xí)了

作者: fffox 時間: 2015-1-7 18:51
代碼1：y=5。代碼2：y=6。打印出7,2

作者: qiongna 時間: 2015-1-25 22:24
學(xué)習(xí)了

作者: xyangjie 時間: 2015-4-15 17:07

作者: lbl521 時間: 2015-6-15 15:30
XIANGLEIJIAE

作者: shsun 時間: 2015-6-25 17:03
好好學(xué)學(xué)

作者: Alashome 時間: 2015-6-30 08:27
good

作者: djl52102 時間: 2015-8-15 22:29
測試了一下，還是不懂

作者: bamboo123 時間: 2015-9-3 00:44
RE: 【新手進階】之一：If分支語句 [修改]

作者: yll_rizhao2012 時間: 2015-9-15 08:55
我是小白,想學(xué)習(xí)不知從何入手

作者: roych 時間: 2015-9-15 16:23

yll_rizhao2012 發(fā)表于 2015-9-15 08:55
我是小白,想學(xué)習(xí)不知從何入手

基礎(chǔ)操作可以買一本書自行學(xué)習(xí)，語句講解則可以參考淘貼的新手入門系列

作者: songgpljh 時間: 2015-10-10 11:32
學(xué)習(xí)一下

作者: xzh8803 時間: 2015-10-21 13:31
asfad a afdasd

作者: WFH6898 時間: 2015-11-11 18:08
基礎(chǔ)，好好學(xué)習(xí)

作者: tofms 時間: 2015-11-20 09:19
從頭學(xué)習(xí)一下

作者: 0520john 時間: 2016-1-4 15:53
學(xué)習(xí)

作者: 老四123 時間: 2016-1-5 20:22
好好學(xué)習(xí)

作者: cshiq 時間: 2016-1-17 05:30
【新手進階】之一：If分支語句

作者: nowtoo 時間: 2016-1-17 22:59
學(xué)習(xí)一下

作者: layaman_999 時間: 2016-1-18 00:04
kankan

作者: Dozen 時間: 2016-2-18 22:42
學(xué)習(xí)了

作者: socar_bbman 時間: 2016-2-22 00:16
學(xué)習(xí)學(xué)習(xí)學(xué)習(xí)

作者: ifend 時間: 2016-3-29 14:45

作者: chemi_lai 時間: 2016-3-30 22:18
精簡易懂

作者: 叫你不聽話~~ 時間: 2016-3-31 12:59
學(xué)習(xí)

作者: 神經(jīng)挺住 時間: 2016-4-15 12:44
學(xué)習(xí)

作者: Superleistung 時間: 2016-4-15 15:16
推算下，做個mark：
代碼1 debug.print 出來應(yīng)該是y=5
代碼2 debug出來y=6
第三段代碼出來應(yīng)該是 x=2, y=7

作者: datouda 時間: 2016-4-16 08:17
好東西提供了一個學(xué)習(xí)的思路

作者: 13580397403 時間: 2016-4-19 00:24
謝謝分享

作者: pycqldt 時間: 2016-4-22 23:21
從頭學(xué)起

作者: 522650696 時間: 2016-4-26 21:52
這個挺好理解呀

作者: 鄱湖人2012 時間: 2016-5-6 19:57
學(xué)習(xí)

作者: XWQ2000 時間: 2016-5-20 20:20
dddddddddddddddd

作者: adobe 時間: 2016-5-22 17:17
11111111111111111

作者: 魚色 時間: 2016-5-24 15:27

作者: ajch 時間: 2016-6-3 21:11
學(xué)習(xí)了學(xué)習(xí)了

作者: 無所事事 時間: 2016-6-6 07:58
學(xué)習(xí)學(xué)習(xí)，感謝分享

作者: buchunmu 時間: 2016-6-7 00:10
看看答案

作者: ardu95 時間: 2016-6-12 06:27
新手入門

作者: cfncmjh 時間: 2016-6-24 15:31
FJJJJJJJJJJJJJJJJJ

作者: 山之冬 時間: 2016-7-1 11:11
學(xué)習(xí)。

歡迎光臨 Office中國論壇/Access中國論壇 (http://m.mzhfr.cn/)

<span id="kbahc"></span>