VB,打印五角星:打印出如图4-x-1排列的五角星图案Private Sub Command1_Click()Dim n As IntegerDim i As Integern = 10For i = 1 To nPrint Tab; Space(n - i) & String(i * 2 - 1, "*")NextEnd Sub在这基础上,帮我改下

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/13 16:44:04
VB,打印五角星:打印出如图4-x-1排列的五角星图案Private Sub Command1_Click()Dim n As IntegerDim i As Integern = 10For i = 1 To nPrint Tab; Space(n - i) & String(i * 2 - 1, "*")NextEnd Sub在这基础上,帮我改下

VB,打印五角星:打印出如图4-x-1排列的五角星图案Private Sub Command1_Click()Dim n As IntegerDim i As Integern = 10For i = 1 To nPrint Tab; Space(n - i) & String(i * 2 - 1, "*")NextEnd Sub在这基础上,帮我改下
VB,打印五角星:打印出如图4-x-1排列的五角星图案

Private Sub Command1_Click()

Dim n As Integer

Dim i As Integer

n = 10

For i = 1 To n

Print Tab; Space(n - i) & String(i * 2 - 1, "*")

Next

End Sub

在这基础上,帮我改下

VB,打印五角星:打印出如图4-x-1排列的五角星图案Private Sub Command1_Click()Dim n As IntegerDim i As Integern = 10For i = 1 To nPrint Tab; Space(n - i) & String(i * 2 - 1, "*")NextEnd Sub在这基础上,帮我改下
空格与星的组合.
第一行:N个空格,接一个星星
第二行:N-1个空格,接两个星星
第三行:N-3个空格,接三个星星……

VB,打印五角星:打印出如图4-x-1排列的五角星图案Private Sub Command1_Click()Dim n As IntegerDim i As Integern = 10For i = 1 To nPrint Tab; Space(n - i) & String(i * 2 - 1, "*")NextEnd Sub在这基础上,帮我改下 用VB打印以下图形!* *** ***** *** * 打印同一份稿件,甲1/3小时打印4/5,乙1/2小时打印6/7,()打印得快. VB编写程序,计算并打印1到100之间的所有奇数和. vb用rnd函数打印一个1~57之间的一个随机数 急…… 用VB按金字塔形状打印杨辉三角形要求打印前8行, 用vb.net2008打印杨辉三角形(打印10行),要求如图所示 打字员李明要打印一本书,第一天打印了x页,第二天打印的页数是第一天打印页数的2倍少40页,第三天打印的页数比第二天打印的页数的一半多30页,第三天正好打印完这本书. (1)用含有x的式 用vb嵌套循环打印图案 ** 1 ** ** 2 2 ** ** 3 3 3 ** ** 4 4 4 4 ** ** 5 5 5 5 5 **用for结构、、 用VB做一个阶乘就是比如你输入的是5 那么输出或者打印出来的 的是1*2*3*4*5=120 VB字母转换次序打印在form上 打印一份稿件,甲单独打印10小时,乙单独打印6小时,甲乙两人合作打几小时?1除(1/10+1/6)=4 英语单词:打印. 一份书稿计划由甲已丙三人10天打印完成.前一周他们一共打印了400页,以后三天甲打印了164页,已打印了前一周的1/3,丙打印了96页,正好完成任务.完成任务时,三人打印稿件页数之比为5:4:3.已一 一份书稿计划由甲已丙三人10天打印完成.前一周他们一共打印了400页,以后三天甲打印了164页,已打印了前一周的1/3,丙打印了96页,正好完成任务.完成任务时,三人打印稿件页数之比为5:4:3.乙一 VB打印9格图形1 然后再转成2 (1)1 2 3 (2)1 4 7 4 5 6 2 5 8 7 8 9 3 6 9还有打印:1 0 0 0 10 1 0 1 00 0 1 0 00 1 0 1 01 0 0 0 1打印1 2 34 5 67 8 9再转换1 4 72 5 83 6 9 打印以下数组,并将对角线的数的和放在文本框中.1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 VB打印以下数组,并将对角线的数的和放在文本框中.1 2 3 45 6 7 89 10 11 1213 14 15 16 VB打印随机数问题要求打印20个随机数为一排,随机数范围(1,10),然后进行统计里面有多少个1,多少个2,多少个3,多少个4,以此类推,一直到10,然后进行求和都没人回答啊