VB變成當中function問題,最後只能顯示1這個數字

2022-10-25 03:36:38 字數 2277 閱讀 2324

1樓:網海1書生

任何數除以1餘數都是0的,所以你判斷一個數是不是素數,就不能把這個數再去和1除的,而應該從2開始除,所以你的function第一句應該改為:

for i = 2 to x

2樓:匿名使用者

private sub command1_click()dim n as integer, s as integer, j as integer

for i = 1 to 2000

for j = 1 to i

if i mod j = 0 then

s = s + i

end if

next

n = sushu(s)

if n = 1 then

print i

end if

next

end sub

public function sushu(x as integer)

for i = 2 to x

if x mod i = 0 then

exit for

end if

next

if i >= x then

sushu = 1

else

sushu = 0

end if

end function

vb中這個題為什麼輸出false??為什麼不是輸出數字1,0?

3樓:網海1書生

print b - a > 0

print 後面是一個邏輯表示式,所以結果肯定true或false,不可能是數字的。

就好比別人問你「b-a是不是大於0」,那麼你的回答只能是「是」或者「不是」,如果回答1或者0,別人肯定認為你是神經病。

4樓:匿名使用者

因為print後面是一個關係表示式,而關係表示式的值只能為true或者false。此題為false

vb中function過程是什麼意思,引數又是什麼意思? 10

5樓:polaris北斗

function 就是函式,可以理解為有返回值的過程,其引數定義與sub相同

例如定義如下函式:

private function f( x as double ) as double

f = x * x; '返回x的平方

end function

呼叫時這樣:

y = f(x) '計算x的平方賦值給y

6樓:匿名使用者

function 是一個可以具有返回值的過程 如:

dim a as string

private sub command1_click()msgbox test ' 彈出對話方塊顯示內容: 123call test2

msgbox a

end sub

function test() as stringtest = "123"

end function

sub test2() 'sub 過程 就不能給 test2賦值了a = "123" '只能給變數賦值 來傳遞內容 沒有function來得方便

end sub

7樓:滿以柳

簡單地說:function()函式 呼叫必須返回執行結果,而 proceduren 過程的呼叫是不用返回值。

例如:要利用函式計算兩個整數的加運算,並返回計算的結果。

定義函式

functon addret(x as integer ,y as integer)

addret=x+y

end function

呼叫函式

z=addret(6,8)

當執行上面的命令後,z 的值應該是 14

而過程就直接執行了

定義全程變數 z

定義執行過程

sub addret(x as integer ,y as integer)

z=x+y

end sub

呼叫過程

call addret(6,8)

檢視變數 z 的值應該是 14

vb.net取隨機數問題 從1-10中取6個數字,要求這6個數字不重複。該如何編寫?需要自己建一個function? 50

vb編寫function過程,判斷數字是否是迴文數。程式要求輸入一系列數字,找出所有的迴文數並顯示在文字框中 50

VB程式設計小問

越界的原因是你的i迴圈和c迴圈都是基於b的大小的,而在迴圈中,又改變了b的大小,所以越界 private sub form click print print 原數列為 dim a as integer,b as integer,c as integer,i as integer,j as inte...

CorelDraw當中如何使畫的線條變成閉合路徑

首先你要了解什麼叫閉合路徑,閉合路徑就是曲線 的頭和尾是連線的,如果是一條非直線專的曲線,你選屬中後按ctrl q,再用造形工具點右鍵自動關團,他就自己閉合了,如果是兩條曲線閉合的話,你把兩條曲線全選中,按ctrl q轉曲線,再點選單上面的組合,再用告形工具把頭的節點拖到尾的節點上他們就自動閉合了,...

VB繁簡轉換後字元變成空白塊

dim a,b 這樣定義的變數型別會是vb預設的variant型,而api函式對引數的型別是比較嚴格的,你要根據其宣告中的引數型別來定義變數,比如 dim a as long,b as string或dim a b 這樣lcmapstring才能得出正確的結果。至於用這個函式得出的繁簡轉換結果跟wo...