VB编程求代码！thank

显示全部楼层 · 2008-11-21 00:08:32

[1] 把北京欢迎您在窗体上反向输出。
[2] 用InputBox函数输入3个任意整数，按从大到小的顺序输出。
[
3] 利用文本框、列表框和四个命令按钮实现英文单词的添加、删除、全部删除和退出四个功能

千问 · 2008-11-21 00:08:32

第一题Private Sub Form_click()Print StrReverse("北京欢迎您")End Sub第二题Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer Dim max As Integer Dim n As String a = Val(InputBox("输入第1个整数", "Input")) b = Val(InputBox("输入第2个整数", "Input")) c = Val(InputBox("输入第3个整数", "Input")) max = a n = "一" ...

千问 · 2008-11-21 00:08:32

1:
Dim a As String
a = Mid("北京欢迎您", 1, 1)
Dim b As String
b = Mid("北京欢迎您", 2, 1)
Dim c As String
c = Mid("北京欢迎您", 3, 1)
...

千问 · 2008-11-21 00:08:32

'第一题Private Sub Form_Click()Print StrReverse("北京欢迎你")End Sub'第二题Private Sub Form_Click()Dim n(2) As Integer, tmp As IntegerFor i = 0 To 2n(i) = Val(InputBox("输入n"...

VB编程 求代码！thank

VB编程求代码！thank