һ - רҵ·ĵϷƽ̨

vb程序题库选择?- 百度文库

Դû ʱ䣺2025/7/7 11:39:28 loading ƪĵֻ
˵ݽԤݿܲȫҪĵҪݣwordʹáword΢ź:xxxxxxxQQxxxxxx ܸṩĵл֧½⡣

103ǰ Option Base 1鹲У D Ԫء A15 B16 C13 Dȷ

104 Dim a(15) As Integer鹲У B Ԫء A15 B16 C13 Dȷ

105һ˵ΪDim a(51 to 5) As Integer鹲У C Ԫء A25 B36 C30 Dȷ

106VBУĬϵ±½0ʼҪͨν綨½磬Ӧʹã A AOption Base BOption Explicit

CExplicit DLow Base

107䣬ȷ( B ) ADim a[3, 4] as Integer BDim a(3, 4) as Integer CDim a(n, n) as Integer DDim a[3][4) as Integer

108һݵֵһҪ A Aͬ Bͬ C D

109±ȡıǣ A Aֵ Bַ C Dɱ

110Dim a(0 to 3, -2 to 2,0 to 5)УaԪصĸΪ( A ) A120 B75 C60

D13

111ٶµSuḅ Sub S (x As Single, y As Single) t = x x = t / y y = t Mod y End Sub ڴһťȻд¼̣ Private Sub Command1_Click() Dim a As Single Dim b As Single a = 5: b = 4 S a, b Print a, b End Sub ʱťõĽ D A5 4 B1 1 C1.25 4 D1.25 1

112·ʽı B ͨã AڴģDim BڴģPublic CڴģPrivate DڴģStatic

113ڴһťǩд¼̣ Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer

N=10: z=N+z: y=y+z: x=x+z Label1.Caption = x

Label2.Caption = y Label3.Caption = z End Sub кεťǩʾݷֱǣ A A10 10 10

B30 30 30 C30 30 10 D10 30 30

114д( D )

A̱ΪStaticͣùеľֲStatic

BSubвǶ׶Sub CSubпǶ׵Sub

D¼̿ͨùһû

115ڴһťCommand1һıText1Ȼд ¼̣

Private Sub Command1_Click()

Dim x As Integer, y As Integer, z As Integer x = 5 y = 7 z = 0

Text1.Text = \Call p1(x, y, z) Text1.Text = Str(z) End Sub

Private Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer)

vb程序题库选择?- 百度文库.doc ĵWordĵصԣ㸴ơ༭ղغʹӡ
Ƽ
Copyright © 2012-2023 һ Ȩ | ϵ
:վز֪ʶȨݡϢ紫ȨתصƷַȨ,һ֪ͨǣǻἰʱɾ
ͷQQxxxxxx 䣺xxxxxx@qq.com
ICP2023013149
Top