2、可以使用微信小程序的消息推送功能,将用户分组的信息推送给用户;
3、可以使用微信小程序的数据库功能,将用户的openid和分组信息存储起来,以便以后使用;
4、可以使用微信小程序的云函数功能,实现定时自动分组,以及定时自动推送分组信息;
5、可以使用微信小程序的客服消息功能,实现用户主动查询自己的分组信息;
6、可以使用微信小程序的客服消息功能,实现用户主动申请更改分组信息;
7、可以使用微信小程序的客服消息功能,实现用户主动申请取消分组信息;
8、可以使用微信小程序的客服消息功能,实现用户主动申请查看其他用户的分组信息;
9、可以使用微信小程序的客服消息功能,实现用户主动申请查看某一分组的所有用户信息;
10、可以使用微信小程序的客服消息功能,实现用户主动申请查看某一分组的所有用户的openid。
先画两个command(command1,command2),一个TEXT然后输入如下程序。最好是复制
Dim a, c As Integer
Private Sub Command1_Click()
Randomize
a = Int(20 * Rnd)
End Sub
Private Sub Command2_Click()
Dim c As Integer
c = 0
Do
b = InputBox("请输入你认为中奖的号码:")
b = Val(b)
If a <>b Then
c = 0
ElseIf a = b Then
Text1.Text = "恭喜你中奖": c = 1
End If
Loop Until c = 1
End Sub
public static int[] getRandom(int count){if(count<1)
return null
Random rnd = new Random()
int[] result = new int[count]
while(count>0){
result[--count] = rnd.nextInt(99000)+1000
}
return result
}
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)