求vb大神解答

2025-02-26 15:07:50

推荐回答（1个）

回答1：

Private Sub Form_Click()
Dim b As String
Dim a As String
Randomize
b = Str(Int(Rnd * 900 + 100))
Print b
a = Mid(Trim(Str(b)), 3, 1) & Mid(Trim(Str(b)), 2, 1) & Mid(Trim(Str(b)), 1, 1)
Print a
End Sub

最新问答

开头是Darling Darling Darling 哦 honey honey honey是什么歌？

平面设计师证书好考吗？

听说香港最低月工资7000港币，是不是这样

现在在深圳吃一餐海鲜要多少钱？两个人。哪里的海鲜又新鲜又便宜？

混凝土试块抗压强度统计方法的计算公式请问这个公式