微信抽奖小程序怎么做？

首先打开手机，进入微信。点击抽奖助手功能

选择点击抽奖助手功能。

点击发起抽奖功能

选择点击发起抽奖功能。

点击输入所有抽奖信息后点击发起抽奖功能，选择点击输入所有抽奖信息后点击发起抽奖功能。

打开微信发现页面，点击小程序。搜索“活动抽奖”。然后点击发起抽奖。

完善了奖品信息，填写抽奖说明，可以在这里描述此次抽奖的目的或者小要求，填写两个条件，必须是个人的公众号粉丝才能抽奖。高级功能的使用。

程序在下面，除去13号后总共点名39次，每次都不重复. 点完39次后可以复位又可以点名了。

Dim times, j As Integer

Dim num(1 To 40) As Integer

Private Sub Command1_Click()

start: Randomize

a = Int(Rnd * 40 + 1)

For i = 1 To 40

If a = num(i) Or a = 13 Then

GoTo start

End If

Next

Text1.Text = a

j = j + 1

num(j) = a

If j = 39 Then

MsgBox "所有人员均已点过！"

Command1.Enabled = False

Command2.Enabled = True

End If

End Sub

Private Sub Command2_Click()

j = 0

For i = 1 To 40

num(i) = 0

Next

Command2.Enabled = False

Command1.Enabled = True

Text1.Text = ""

End Sub

界面：

具体 *** 作步骤如下：

工具／原料：iPhone13、IOS15.4、微信8.0.18

1、进入微信后，点击小程序功能。

2、选择点击抽奖助手功能。

3、选择点击发起抽奖功能。

4、选择点击输入所有抽奖信息后点击发起抽奖功能。

---