vb可以做什么小程序_用VB做一个简单的小程序_天天新消息


(资料图片仅供参考)

1、PrivateSubCommand1_Click()***.clsDimNAsInteger,iAsIntegerN=InputBox("n=",,9)Fori=1To2*N-1Ifi<=NThenPrintSpace(N-i)+String(2*i-1,CStr(i))ElsePrintSpace(N-(2*N-i))+String(2*(2*N-i)-1,CStr(2*N-i))EndIfNextiEndSub。

本文到此分享完毕,希望对大家有所帮助。

标签:

X
X

Copyright ©  2015-2022 华南信息网版权所有  备案号:粤ICP备18025786号-52   联系邮箱: 954 29 18 82 @qq.com