VB编程 的一个小问题 请教! 急!!

来源:百度知道 编辑:UC知道 时间:2024/05/21 23:06:25
我是刚学VB的 你们能不能帮我写一下代码我衷心感谢!
有2个问题。
题目是
1.试编程将一个字串符逆序打印如“字符串”打印为"串字符"
2.试在窗体隔行方式输出10行随机英文大写字母,每行输出36个字符
问题也许不难 但对我来说 很急
答对一题我就给分了 二题答对的话+分
如果你挺懂VB的话如果愿意帮我的话 可以把QQ留给我 谢谢。

第一个问题,设窗体中有一个按钮(Button1),一个标签框(label1),按下按钮后在标签框中显示指定字符串的逆序输出,下面是按钮的单击事件代码
****************************************
Dim d As String
Dim i As Integer
label1.caption= ""
d = "字符串"
For i = Len(d) To 1 Step -1
label1.caption = label1.caption+ Mid(d, i, 1)

Next
****************************************
第二个问题,要求在单击窗体上的按钮后,在窗体中的显示题目中要求的文本
下面的按钮的单击事件代码
*****************************************
Randomize
Dim i ,p As Integer
for p=1 to 10
For i = 1 To 26
Print(Chr(int(26 * Rnd() + 81)));

Next i
Print vbCrLf
next p

第一个问题,来一个专业的事件代码(可以直接调用的)
使用方式是:“串符字”= StrRev("字符串")
****************************************
Function StrRev(str As String) As String
Dim rts As String
Dim i As Integer
For i = Len(str) To 1 Step -1