所有卡通人物的图片:说明: 在一TextBox中输入一个数值(1~9), 点击 确定 按钮.用VB写

来源：百度文库 编辑：神马品牌网 时间：2024/04/30 02:14:05
text1 输入5 Command1 点确定
1
121
12321
1234321
123454321
还要打印出来.text1框输入几,text2框就出现几行金字塔
在另一个TextBox中列出图型,如上图所示

Dim i As Integer
Dim j As Integer
Dim s0 As String
Dim s1 As String
Dim t As Integer
t = CInt(Val(Text1.Text))
If t > 0 Then

For i = 1 To t
s0 = ""
For j = 1 To i
s0 = s0 & j
Next
s0 = s0 + StrReverse(Left(s0, Len(s0) - 1))
s1 = s1 & vbCrLf & s0
Next
End If
其中TEXT1是输入框,S1是输出的

说明: 在一TextBox中输入一个数值(1~9), 点击 确定 按钮.用VB写 在vb中如何控制textbox中只能输入汉字 VB如何命令在textbox中只限输入数字？ vb如何禁止在textbox中输入任何东西？ 在JCreator Pro 中如何输入数值！ .net(c#)能否让textbox中一输入信息其后的label显示相应文字? vb.net中如何让textbox在输入时，不会下拉出现历史记录 如何在VB中使TEXTBOX只能输入[数字逗号和句号] 如何在VB中使TEXTBOX只能输入数字,并支持Ctrl+V粘贴? 如何在EXCEL中输入数值 0.2E-10 ？