vb如何用二重循环打出如下图形 1 12 123 1234 12345
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/09/22 18:17:03
vb如何用二重循环打出如下图形 1 12 123 1234 12345
其实是1换行12换行123换行1234换行12345
其实是1换行12换行123换行1234换行12345
Function GetStr(ByVal i As Integer) As String '取得字符串
If i = 1 Then
GetStr = 1
Else
GetStr = GetStr(i - 1) & i
End If
End Function
Private Sub Command1_Click() '调用输出
Me.AutoRedraw = True
Dim n As Integer
n = Val(InputBox("请输入一个大于0的数值", "输入"))
If n > 0 Then
For i = 1 To n
Print GetStr(i)
Next
Else
MsgBox "输入的数值无效"
End If
End Su
If i = 1 Then
GetStr = 1
Else
GetStr = GetStr(i - 1) & i
End If
End Function
Private Sub Command1_Click() '调用输出
Me.AutoRedraw = True
Dim n As Integer
n = Val(InputBox("请输入一个大于0的数值", "输入"))
If n > 0 Then
For i = 1 To n
Print GetStr(i)
Next
Else
MsgBox "输入的数值无效"
End If
End Su
vb如何用二重循环打出如下图形 1 12 123 1234 12345
用二重循环打印以下图行 1 12 123 1234 12345
用for循环语句打出以下图形 1 12 123 1234 12345 123456
如何用循环语句打印这图形?
C语言编程 for循环 .屏幕上输出如下图形: 1 12 123 1234 12345 123456
C语言编程 for循环 .屏幕上输出如下图形:1 12 123 1234 12345 123456 要求等边三角形,
如何用matlab画如下图形
请问如何用mathematic绘制如下图形
用VB中的循环打印如下内容:1 1 12 1 12 123 1 12 123 1234 1 12 123 1234 12
如何用C语言求二重定积分?
在c语言中如何用循环结构编程输出下列图形.
循环利用如何用英语翻译