VB程序题1.将变量x1, x2定义为单精度型,m,n定义为整型,sl, s2定义为字符串型,y定义为布尔型,写出相应的

2025-04-06 08:21:21
推荐回答(1个)
回答1:

1.
Dim x1 As Single, x2 As Single
Dim m As Integer, n As Integer
Dim s1 As String, s2 As String
Dim y As Boolean
2.
Form_Click
3.
Private Sub Form_click()
Dim a As Integer, s As String, b As Integer
Randomize
a = Rnd * 1000
b = Mid(a, 3, 1) & Mid(a, 2, 1) & Mid(a, 1, 1)
Print a, b
End Sub
第三个我发现只要a,b两个变量就可以解决了,不知道题目是不是有问题