vb之家

用count,否则的话,如果记录太多,你将不停地MoveNext,不停地判断b=a.DimiAsInteger,nAsLong,sAsStringText8=""Adodc1.RecordSource

你说的应该不是List控件,应该是RichTextBox控件才有这个属性那堆字符是rtf文件的内容.你用windows的写字板弄点东西保存为rtf文件,然后用文本编辑工具打开,就看到类似的东西.你也可

自己一点点试,A在循环前应该赋初值A=0在A=A+1后放一条debug.printi,j,k,a可以得到如下结果.看看变化iJKA11111122113321142125213622272238311

索引再问：能不详细点我不知道索引是什么意思再答：我估计你需要很多很多的帮助，不仅仅是index这个东西推荐你去看一个网站吧，学习一下http://www.bccn.net/Article/kfyy/v

PrivateSubForm_Click()N=InputBox("","",5)ReDima(N+1,N+1),b(N+1,N+1)Clsk=8ForI=1ToNPrintString((N-I)*

解题思路：历史知识的积累解题过程：<三国演义>最终答案：略

Randomize'随机种子初始化DimInt_AAsIntegerInt_A=Int(Rnd()*10)'生成0-9之间的随机整数Int_A=Int(Rnd()*100)‘生成0-99之间的随机整数

20没有问题

PrivateSubfun()ifimod2=0thenforx=itoastep2s=s*xnextxelseforx=(i+1)toastep2thens=s*xnextxendif试试看行不行吧

PrivateSubForm_Click()DimAAsLong,BAsLongA=Val(InputBox("请输入第一个数："))B=Val(InputBox("请输入第二个数："))Print"

&这个符号在VB里一般是文本连接用的,比如字符串“AA”&“BB”,结果等于“AABB”,和+号的用法差不多,只是+号在连接数字时是数字相加,如“1”+“1”结果有可能等于2,而“1”&“1"结果则等

VB定义一个:2维数组的类型;有9个存放数据的数组单元:-------------------------------------------------------------a(1,1);a(1,

以下代码可以实现1到N的偶数平方和与奇数平方和之差'按钮1代码:PrivateSubCommand1_Click()dimmin,maxasintegermin=1'设定参与计算的最小值max=50'

PrivateSubcommand1_click()DimmAsInteger,nAsIntegerDimaAsInteger,bAsIntegerDimrAsIntegerm=InputBox("输

第一个问题,即使x是变体型,也会打印出来小数,最好有整个的申明和代码,才能判断出来是什么原因.第二个问题a

意思是“路径”,也可能是一个普通的变量,没有具体的意思,具体要看用在什么地方

dima(9)asintegerprivatesubcommand1_click()dimiasintegerrandomizefori=0to9a(i)=int(rnd*101)text1.text

PrivateSubCommand1_Click()Dims&,i&i=2WhileiMod115OriMod173‘先找到符合条件的第一个ii=i+2WendFori=iTo5000Step374’

到百度搜索“windowAPI查询”或“vb学习系统”包能找到!

VisualBasic编程语言意思是可视的语言VisualBasic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言.VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统,可以轻易的