谁能帮我做一下关于vb的题 高分悬赏
1、创建vb应用程序的三个主要步骤?2、窗体常用的方法有哪些?3、变量根据作用域的不同可以分为几种?4、vb常用的数据类型有那些?5、len、mid、left、val、r...
1、创建vb应用程序的三个主要步骤?
2、窗体常用的方法有哪些?
3、变量根据作用域的不同可以分为几种?
4、vb常用的数据类型有那些?
5、len、mid、left、val、rnd、函数的用法
9、控件数组如何建立?控件数组有什么好处?
11、随即生成111~888之间的整数,存放在10*10的数组中,找出最大值,输出其值、行号、列号
12、编写一个计算阶乘的函数
1^2+2^2+3^2+...+999^2
13、能被5除余数为1的最小5个正整数
不会的请不要答 谢谢了 我只有20分 全给你了 展开
2、窗体常用的方法有哪些?
3、变量根据作用域的不同可以分为几种?
4、vb常用的数据类型有那些?
5、len、mid、left、val、rnd、函数的用法
9、控件数组如何建立?控件数组有什么好处?
11、随即生成111~888之间的整数,存放在10*10的数组中,找出最大值,输出其值、行号、列号
12、编写一个计算阶乘的函数
1^2+2^2+3^2+...+999^2
13、能被5除余数为1的最小5个正整数
不会的请不要答 谢谢了 我只有20分 全给你了 展开
展开全部
楼上太懒···
2除此之外还有move,hide,refresh等较常用
11Dim a(9, 9) As Integer, max As Integer, maxi As Integer, maxj As Integer
Private Sub Form_Click()
Randomize
For i = 0 To 9
For j = 0 To 9
a(i, j) = Int(Rnd * 778) + 111
Next j, i
max = a(0, 0)
For i = 0 To 9
For j = 0 To 9
If max < a(i, j) Then max = a(i, j)
Next j, i
Print "最大值是" & max & "最大值行标为" & maxi & "最大值列标为" & maxj
End Sub
12
Private Sub form_click()
Dim sum#, i% '注意用double,integer会溢出
For i = 1 To 999
sum = sum + jc(i)
Next i
Print sum
End Sub
Function jc#(a%)
jc = a ^ 2
End Function
13
Private Sub Form_click()
Dim a As Integer, b As Integer
Do
If a Mod 5 = 1 Then
Print a
b = b + 1
End If
a = a + 1
Loop Until b = 5
End Sub
2除此之外还有move,hide,refresh等较常用
11Dim a(9, 9) As Integer, max As Integer, maxi As Integer, maxj As Integer
Private Sub Form_Click()
Randomize
For i = 0 To 9
For j = 0 To 9
a(i, j) = Int(Rnd * 778) + 111
Next j, i
max = a(0, 0)
For i = 0 To 9
For j = 0 To 9
If max < a(i, j) Then max = a(i, j)
Next j, i
Print "最大值是" & max & "最大值行标为" & maxi & "最大值列标为" & maxj
End Sub
12
Private Sub form_click()
Dim sum#, i% '注意用double,integer会溢出
For i = 1 To 999
sum = sum + jc(i)
Next i
Print sum
End Sub
Function jc#(a%)
jc = a ^ 2
End Function
13
Private Sub Form_click()
Dim a As Integer, b As Integer
Do
If a Mod 5 = 1 Then
Print a
b = b + 1
End If
a = a + 1
Loop Until b = 5
End Sub
展开全部
1设计界面,设置对象属性,编写代码
2Print方法,Cls方法,Show方法
3三种:全局变量,窗体变量和模块变量,局部变量
4本来就不多,啥叫常用。。。Integer整型,Long长整型,Single单精度,Double双精度,Currency货币类型(这个算是少用吧),Boolean布尔型,String字符串,Date日期型,Byte字节型,Variant变体类型,Object对象类型,
5 len(字符串)求字符串长度,例:len("abcd计算机123")结果是10
mid(字符串,n,m)从原字符串的左端截取n个字符开始(包括第n个字符)截取m个字符,结果为截取的子串,例:mid("Beijing China",4,7)结果是"jing Ch"
left(字符串,n)从原字符串的左端截取n个字符,结果为截取的子串,例:left("china",2)结果为"Ch"
val(字符串)把字符串转换为数值,例:val("12.34")结果是12.34
rnd(number)随机函数,产生0到1之间的单精度随机数,例:rnd结果是小于10的任意随机数
6.对某控件ctrl+c(复制),ctrl+v(粘贴),是在程序设计中,为了处理方便, 把具有相同类型的若干变量按有序的形式组织起来
剩下的明天再答,吃饭去- -!
2Print方法,Cls方法,Show方法
3三种:全局变量,窗体变量和模块变量,局部变量
4本来就不多,啥叫常用。。。Integer整型,Long长整型,Single单精度,Double双精度,Currency货币类型(这个算是少用吧),Boolean布尔型,String字符串,Date日期型,Byte字节型,Variant变体类型,Object对象类型,
5 len(字符串)求字符串长度,例:len("abcd计算机123")结果是10
mid(字符串,n,m)从原字符串的左端截取n个字符开始(包括第n个字符)截取m个字符,结果为截取的子串,例:mid("Beijing China",4,7)结果是"jing Ch"
left(字符串,n)从原字符串的左端截取n个字符,结果为截取的子串,例:left("china",2)结果为"Ch"
val(字符串)把字符串转换为数值,例:val("12.34")结果是12.34
rnd(number)随机函数,产生0到1之间的单精度随机数,例:rnd结果是小于10的任意随机数
6.对某控件ctrl+c(复制),ctrl+v(粘贴),是在程序设计中,为了处理方便, 把具有相同类型的若干变量按有序的形式组织起来
剩下的明天再答,吃饭去- -!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
第十二题
for i= 1 to 999
s=s + i * i
next i
print s
for i= 1 to 999
s=s + i * i
next i
print s
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询