⺣ - רҵ·ĵϷƽ̨

ǰλãҳ > vb程序题库选择?- 百度文库

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

  • 62 Ķ
  • 3
  • 2025/5/25 21:10:44

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)

  • ղ
  • Υٱ
  • Ȩ
ĵ10.00 Ԫ VIP
ߣ...

92ƪĵ

ĵ飺

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

οͿͨغɸƺŰ棩
ƪ
ʱؼۣ10 Ԫ/ ԭ:20Ԫ
VIP
ؼۣ29 Ԫ/ ԭ:99Ԫ
0.3 Ԫ/ ÿ150
ȫվɸ
VIP
ؼۣ29 Ԫ/ ԭ:99Ԫ
0.3 Ԫ/ ÿ150
ȫվɸ
עĵпܡֻĿ¼ݲȫ֮ǰעѸ޷ػ⣬ϵЭ㴦
΢ţfanwen365 QQ370150219
Copyright © ⺣ All Rights Reserved. ICP16052595-3 վͼ ͷQQ370150219 䣺370150219@qq.com