也可以vb作业 vb课程设计的代写
需要联系我 qq 314021146

有1020个西瓜，第一天卖一半多两个，以后每天卖剩下的一半多两个，问几天后能卖完。编写程序

找出一千以内所有完数

Module Module1
Sub Main()
Dim i, j, k As Integer
For j = 2 To 1000
k = 0
For i = 1 To j / 2
If j Mod i = 0 Then
k = k + i
End If
Next
If j = k Then
Console.WriteLine("完全数为" & k)
End If
Next
Console.ReadLine()
End Sub
End Module

怎么把ACCESS2010与VB6.0链接起来

写一个vb计时器

一个百米计时器

楼主这两道题怎么做啊

以下定义数组或给数组元素赋值的语句中，正确的是
A．Dim a As Variant a=Array(1，2，3，4，5)
B．Dim a (10) As Integer a=Array(1，2，3，4，5)
C．Dim a%(10) a(1)="ABCDE"
D．Dim a (3)，b(3) As Integer a(0)=0 a(1)=1 a(2)=2 b=a
帮忙分析一下ABC错在哪里

用visual studio 怎么在数据库内 做到 增加 删除 修改 和 查询 谢谢 帮忙

楼主，能告诉我下这两题怎么写吗，麻烦了

VB安装包吗