jmfs.net
当前位置:首页>>关于vb题 Private Sub Form_Click() Dim a%, b%的资料>>

vb题 Private Sub Form_Click() Dim a%, b%

把下面的代码复制到窗体的代码里,运行后单击窗体就可以了。 Private Sub Form_Click() Dim a() As Integer '空数组 Dim n As Integer Dim i As Integer Dim max As Integer '数组最大值下标 Dim min As Integer '数组最小值下标 Dim t As Integ...

如果nextib(1)=10是 next i b(1)=10next sub是 next end sub的话 运行结果为两行各5个11

1 2 3 4 5

因为最后在next k 的时候,k又加了1,然后检测>2,就跳出循环了,但这个时候,k已经等于3了

第1题的输出结果是$$$ Tab[(n)]可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。 例如Print tab(10);"$",$将在第10列出现

代码是当你单击窗体时计算3的平方根,并按指定的格式打印到窗体上,代码注释如下: Private Sub Form_Click() '窗体的单击事件响应过程 Dim a As Double '声明变量a为双精度 a = Sqr(3) '使用Sqr函数计算3的平方根,将结果保存在变量a中 Print Forma...

Private a%, b%, c% Private Sub form_click() Dim a As Integer '与全局变量a同名,所以全局变量a对这个过程无效 c = 2 Call AA(c) 'AA过程中的参数是传地址的,所以全局变量C是会被改变的 b = BB(a) 'BB函数中的参数是传值的,所以本过程中的...

一 . x= 3y= 4 x= 3y= 8 x= 3y= 12 因为变量y是用了Static关键字的,它在过程结束后,其值会“保留”。 而x只是普通的局部变量,每次进入过程时,它都是默认初值0。 二 . 49 语句If i Mod 2 = 0 Then的条件为Ture时,表示i的值为偶数。 For i = ...

分有点少啊,反正没事做,帮帮你吧 一、选择题 1、在VB中,用Sring来表示的数据类型是:(D ) A.长整型 B.字符型 C.逻辑型 D. 单精度型 2、下面哪一个不是Visual Basic保留的关键字?(B ) (A)Loop(B)More(C)Mod(D)If 3.修改窗体的...

Dim i%, j%, m% s = i * 100 + j * 10 * m '一定=0 Do While s > 0 '一定不成立 '"水仙花数" Private Sub Form_Click() Dim a, b, c As Integer 'a(个)b(十)c(百) For a = 0 To 9 For b = 0 To 9 For c = 1 To 9 If a ^ 3 + b ^ 3 + c ^ 3 = a +...

网站首页 | 网站地图
All rights reserved Powered by www.jmfs.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com