早教吧
育儿知识
作业答案
考试题库
百科
知识分享
创建时间
资源类别
相关度排序
共找到 265 与text 相关的结果，耗时21 ms
答案是10,但我需要过程,求高手赐教,把每个过程也写下DimaAsIntegerPrivateSubCommand1Click()DimbAsInteger,cAsIntegera=2:b=-1CallMySub(b,c)c=c+bCallMySub(c,b)a=a+c
数学
c) c = c +
VB文本替换求改错```PrivateSubCommand1Click()DimsAsStringDimsLineAsStringlj=App.Path&"\"&Text1.Text&".txt"lj2=App.Path&"\完成文件\"&Text1.Text&".tx
其他
& "\完成文件\" & T
VB随机函数初学..PrivateSubCommand1Click()DimaAsIntegerDimx,yAsSingleFori=1To10x=Val(Text1.Text)y=Val(Text2.Text)a=Int(y*Rnd+x)Text3=aNextEndS
其他
= Int(y * Rnd
VB转换函数出错DimAaAsSingleAa=CSng(
text
1.Text)*CSng(
text
2.Text)*CSng(
text
3.Text)出现实时错误13不知道怎么回事好像是CSng(
text
3.Text)错误请给出正确的写法..
其他
法..
vb计算问题Constpi=3.14159DimmessPrivateSubCommand1Click()'DimsumAsDoubleDimaAsDoubleDimbAsDoubleDimcAsDoubleDimtAsDoubleDimdAsDoublea=Text1
其他
ubleDim d As D
懂VB的高手进来翻译下下面的代码Dimd(10000)AsLongDimkAsIntegerPrivateSubCommand1Click()DimaAsLonga=Val(
text
1.Text)k=k+1i=kDoWhilei>1Andd(i-1)>ad(i)=d(i
其他
While i > 1 A
EXCELVB为何结果=0PrivateSubLabel1Click()Label1.AutoSize=TrueEndSubPrivateSubTextBox4Change()EndSubPrivateSubFormLoad()DimnumberAsIntegerEnd
其他
er As IntegerE
下面程序中的x1=(-b+Sqr(b^2-4*a*c))/(2*a)这一句错在哪里?PrivateSubCommand1Click()DimaAsSingle,bAsSingle,cAsSingleDimx1AsSingle,x2AsSinglea=Val(Text1.
数学
Single,x2 As
VB6.0无效限定符,求教各位大神PrivateSubCommand1Click()DimXAsDouble,YAsDouble,ZAsDouble,BAsDouble,LAsDouble,HAsDouble,fAsDouble,aAsDouble,b1AsDouble
其他
uble, a As Dou
Dimsaslong,xasintegers=0Forx=9to10Step2S=s+xNextxText1.Text=sS的值是多少,答案为什么是25
数学
<
1
2
3
4
5
6
7
8
9
10
>
热门搜索：
