日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

vb基础计算机应用,老师给学生的-VB计算机应用基础考试

發布時間:2023/12/20 编程问答 32 豆豆
生活随笔 收集整理的這篇文章主要介紹了 vb基础计算机应用,老师给学生的-VB计算机应用基础考试 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

(A) 10 (B) 20 (C) 30 (D) 40

◆以下程序段中__(21)____不能正確地計算5的階乘。

(A) n = 5: x = 1

For i = 1 To n

x = x * i

Next i

Print x (B) n = 5: x = 1

For i = n To 1 Step -1

x = x * i

Next i

Print x

(C) n = 5: x = 1: i = 1

Do

x = x * i

i = i + 1

Loop Until i = n

Print x (D) n = 5: x = 1: i = 1

Do

x = x * i

i = i + 1

Loop While i <= n

Print x

◆以下表達式中_(22)____與其他幾個的值不同。

(A) Left(Right("ABCDEDEFG", 6), 4) (B) Right(Left("ABCDEDEFG", 7), 4)

(C) Mid("ABCDEDEFG", 4, 4) (D) String(2, "DE")

◆在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框,然后編寫如下事件

過程:

Private Sub Command1_Click()

n = Val(Text1.Text)

For i = 2 To n

For j = 2 To sqr(i)

If i Mod j = 0 Then Exit For

Next j

If j > Sqr(i) Then Print i

Next i

End Sub

該事件過程的功能是__(23)__

(A) 輸出n以內的奇數 (B) 輸出n以內的偶數

(C) 輸出n以內的素數 (D) 輸出n以內能被j整除的數

◆二進制數11010101轉換為十進制是__(24)____。

(A) 171 (B) 213 (C) 426 (D) 427

◆設窗體中有一個文本框Text1,要求該文本框只能顯示信息而不能接收輸入的信息,以下

__(25)____語句能實現該功能。

(A) Text1.MultiLine = False (B) Text1.Visible = False

(C) Text1.Width = 0 (D) Text1.Enabled = False

◆以下定義數組或給數組元素賦值的語句中,正確的是__(26)__。

(A) Dim a As Variant (B) Dim a(10) As Integer

a=Array(1,2,3,4,5) a=Array(1,2,3,4,5)

總結

以上是生活随笔為你收集整理的vb基础计算机应用,老师给学生的-VB计算机应用基础考试的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。