大学vb课后习题答案
1. vb程序设计课后习题答案
高等学院程序设计规划教材VB(清华大学出版社,郑阿奇主编)课后答案
2. vb课后习题答案
dim a(15) as string
for i=0 to 15
a(i)=char(rnd*(90-65+1)+65)
for j=0 to i
if(a(j)=a(i)) then
i--
exit for
endif
next j
next i
这是第一个
dim x(10) as interage
for k=1 to 10
x(k)=k
print x(k); '交换前的版打印权
next k
for i=1 to 5
for j=10 to 5 step -1
x(i)=x(j)
next j
next i
for y=1 to 10 '交换后的
print y(k);
next y
3. 大学vb课后题答案
具体说一下吗.
4. 求大学VB代码答案
新建一个按钮(Command1),然后在右侧属性栏找到index并输入0
再复制下面的代码
PrivateSubCommand1_Click(IndexAsInteger)
SelectCaseIndex
Case0
WithMe
.Move(Screen.Width-.Width)/2,(Screen.Height-.Height)/2
EndWith
Case1
WithMe
.Width=.Width*2
.Height=Height*2
.Move(Screen.Width-.Width)/2,(Screen.Height-.Height)/2
EndWith
Case2
WithMe
.Width=.Width/2
.Height=Height/2
.Move(Screen.Width-.Width)/2,(Screen.Height-.Height)/2
EndWith
Case3
WithMe
.Left=.Left-100
EndWith
Case4
WithMe
.Top=.Top-100
EndWith
EndSelect
IfIndex<>0Then
WithCommand1(0)
.Caption="居中"
.Move(Me.ScaleWidth-.Width)/2,(Me.ScaleHeight-.Height)/2
EndWith
Fori=1To4
WithCommand1(i)
SelectCasei
Case1
.Caption="放大"
.Move0,0
Case2
.Caption="变小"
.MoveMe.ScaleWidth-.Width,0
Case3
.Caption="左移"
.Move0,Me.ScaleHeight-.Height
Case4
.Caption="上移"
.MoveMe.ScaleWidth-.Width,Me.ScaleHeight-.Height
EndSelect
.Visible=-1
EndWith
Next
EndIf
EndSub
PrivateSubForm_Load()
DimiAsInteger
WithMe
.Move(Screen.Width-.Width)/2,(Screen.Height-.Height)/2
EndWith
WithCommand1(0)
.Caption="居中"
.Move(Me.ScaleWidth-.Width)/2,(Me.ScaleHeight-.Height)/2
EndWith
Fori=1To4
LoadCommand1(i)
WithCommand1(i)
SelectCasei
Case1
.Caption="放大"
.Move0,0
Case2
.Caption="变小"
.MoveMe.ScaleWidth-.Width,0
Case3
.Caption="左移"
.Move0,Me.ScaleHeight-.Height
Case4
.Caption="上移"
.MoveMe.ScaleWidth-.Width,Me.ScaleHeight-.Height
EndSelect
.Visible=-1
EndWith
Next
EndSub
5. vb程序设计教程第二版 课后习题答案 陆汉权 冯晓霞 方红光编著 浙江大学出版社
建议网络文库下
6. 大学VB第五版答案
松软的泥土直踩了几脚.
别人都在春天播种吗?为什么我要和他们专一样?有没有人属曾试过在深秋的午后,开一处幽静的地方,种上一粒种子?那会是一种心情,一种与春风拂面时播种截然不同的心情!谁说埋下一粒种子,就一定要待它长出苗来?我只是想:那片春夏热闹过的土地,也许此时已很孤寂了吧!那么,将一粒种子种下去和它作伴,不是更好吗?
人们总是在给予的同时期待着,索要着,他们付出了就一定要求回报,他们太看重播种后收获丰收的喜悦心情,而忽略了播种那一刻的心情.大地是需要一粒种子埋入它的体内,只属于它自己.我懂——因为我也是孤寂的.只是,谁来懂我?走了很远后回头,发现爸爸还站在原处,呆呆地.我明白自己刚才的态度深深地伤害了爸爸,可他却没有责怪.只是想刻意地去忘记,忘记昨天、明天、后天,忘记自己,忘记一切!
入冬后的不久,我已淡忘了那一粒被我固执埋没的种孔子.直到春天的那一抹绿意悄悄爬上
7. vb第四版课后习题答案清华大学编著,喻焰主编
我也是武艺的粉丝哈!
8. 求VB课后习题的答案,中国农业大学出版的
书名
9. 求VB课后答案
自己把题目发上来!!
