
5双击按钮 , 写以下代码:
Private Sub Command1_Click()
MsgBox "3号方针已拿下", , "哈哈"
Sub
再写:
Private Sub Command2_Click()
If MsgBox("考虑考虑呗", vbYesNo, "慢慢想 , 没关系") = vbYes Then
MsgBox "有车有房",,"慢慢想 , 没关系"
MsgBox "我妈会泅水",,"慢慢想 , 没关系"
MsgBox "家务我做",,"慢慢想 , 没关系"
MsgBox "零食你吃",,"慢慢想 , 没关系"
If
If MsgBox("考虑考虑呗", vbYesNo) = vbNo Then
MsgBox "有车有房",,"慢慢想 , 没关系"
MsgBox "我妈会泅水",,"慢慢想 , 没关系"
MsgBox "家务我做",,"慢慢想 , 没关系"
MsgBox "零食你吃",,"慢慢想 , 没关系"
If
Sub
--------------我是朋分线 , 不要复制我----------------
阿谁线它本身会加 。

6还要写文字的:

7最后在点击文件-生当作exe , 点击试验一下结果吧


8作者有事 , 不克不及写太多更具体的 , 有需要可以联系作者 。
百度网盘下载链接:
https://pan.baidu.com/s/1gPh_calKESN24PqUwGyvWQ 暗码:l6ev
VB6.0精简版下载链接:
https://pan.baidu.com/s/1PYT5sSXIP2n1BdIj3botIA 暗码:pacd
注重事项有两个版本 , 一个是边教边做的 , 一个是本身琢磨出来的 , 本身琢磨出来的比力完美 。
快去脱单吧 。
以上内容就是抖音做我女朋友好不好 , 有图完整 , 十分简单的内容啦 , 希望对你有所帮助哦!
猜你喜欢
- 抖音怎样删除自己上传的小视频呢
- 抖音内怎么收藏喜欢的视频?收藏后哪里可找到
- 教你用手机拍出分身特效视频成为抖音大神!
- 抖音猫耳朵怎么弄的 抖音视频怎么加猫耳朵
- 抖音短视频怎么删除 抖音发布的视频怎么删除
- 如何将抖音火山小视频中的音频提取出来
- 抖音如何提高播放量
- 抖音星球堕落怎么拍
- 怎样发抖音视频步骤 发抖音视频的步骤
- 苹果手机抖音怎么合拍 抖音如何与别人合拍
