早教吧
育儿知识
作业答案
考试题库
百科
知识分享
创建时间
资源类别
相关度排序
共找到 56 与PrivateSubCommand1Click 相关的结果，耗时1 ms
VB,万分感谢29、窗体上有命令按钮Command1和Command2，请阅读下列程序：DimaAsInteger:
PrivateSubCommand1Click
():a=a+3:Printa:EndSub:PrivateSubCommand2Click():a=a+2
其他
te Sub Command
VB求一个数的质数因子错误
PrivateSubCommand1Click
()DimaAsIntegerDimkAsIntegerDimiAsIntegera=InputBox("输入")Fori=1ToaIfaModi=0Then'判断为因子后执行判断素数Fork=2T
其他
od i = 0 Then
求一道VB改错题！这道题的第一行错误已经找出，第二个实在是不知道改！求高人指点！
PrivateSubCommand1Click
()DimcountAsIntegerDimaAsInteger,bAsInteger,cAsIntegerDimxAsIntegercount
其他
Dim x As Integ
VB这题怎么算啊（25）在窗体上画1个命令按钮，其名称为Command1，然后编写下列程序：
PrivateSubCommand1Click
()Dima(10)AsIntegerDimxAsIntegerFori=1To10a(i)=8+iNextx=2Printa(f(
其他
a(i)=8+i Nex
VB文本替换求改错```
PrivateSubCommand1Click
()DimsAsStringDimsLineAsStringlj=App.Path&"\"&Text1.Text&".txt"lj2=App.Path&"\完成文件\"&Text1.Text&".tx
其他
& "\完成文件\" & T
VB编程“求1到1000以内所有奇数之和”（dowhile结构）
PrivateSubCommand1Click
()DimiAsIntegerDimsAsIntegers=0:i=0IfiMod2=1ThenDoWhilei>1000i=i+1:s=s+iLoopEndI
其他
> 1000i = i +
VB语句哪里有错误？请指出来并改正谢谢~！
PrivateSubCommand1Click
()Dima(1To10)AsIntegerDimi,max,minAsIntegerFori=1To10a(i)=100+Int(Rnd*999)NextiFori=1To10Pr
其他
nt(Rnd * 999)
vb计算阶乘问题。下面是我写的程序帮忙改正。
PrivateSubCommand1Click
()DimiAsDouble,sumAsDouble,bAsDoubleIfi=1Thensum=1Elsesum=1Fori=2Tobsum=sum*iNextiEndIfPri
其他
= 2 To b sum
VB关闭某项进程的Dimprocname$,rtn&
PrivateSubCommand1Click
()procname="explorer.exe"strcomputer="."SetobjWMIService=GetObject("winmgmts:"&"{imper
其他
nmgmts:" & "{i
Vb：一条长度为L的铁丝,要制作一个面积最大的矩形框.填空完成程序,输入铁丝的长度L,输出矩形面积的最
PrivateSubCommand1Click
()DimLAsIntegerDimchangAsIntegerDimkuaiAsIntegerDimsAsInteg
其他
As Integer
<
1
2
3
4
5
6
>
热门搜索：
