抖音做我女朋友好不好，有图完整，十分简单
本经验是为"抖音做我女伴侣"发的，作者看到网上年夜大都是应付网友的软件或建造方式，用记事本完当作的vbs，没有像抖音上的有图片的那么周全，为了帮忙网友们脱单，所以带来这份经验，若是大师想体验一下软件，经验末从头至尾有下载地址。
工具/原料
- windows电脑一台
- VB6.0精简版（有下载地址）
方式/步骤
- 1
打开VB6.0，新建一个工程，尺度EXE。
把窗口拉到恰当位置。不要太小。
箭号指的是在桌面屏幕的大小。
- 2
接下来找到抖音的图片，我也没素材，从网上下载下来的，和抖音的一样。
等下发在经验末从头至尾。
- 3
点击‘视图’，选择属性窗口，可以看到一个叫picture的，点击一下，右边会呈现3个小点点，打开找你要找的图片吧。
忘了说，在窗口上鼠标右键也是可以找到属性窗口的哦！
- 4
把图片放好就呈现了，可以改按钮的名字哦！（见图片）
- 5
双击按钮，写以下代码：
Private Sub Command1_Click()
MsgBox "3号方针已拿下", , "哈哈"
End Sub
再写：
Private Sub Command2_Click()
If MsgBox("考虑考虑呗", vbYesNo, "慢慢想，没关系") = vbYes Then
MsgBox "有车有房",,"慢慢想，没关系"
MsgBox "我妈会泅水",,"慢慢想，没关系"
MsgBox "家务我做",,"慢慢想，没关系"
MsgBox "零食你吃",,"慢慢想，没关系"
End If
If MsgBox("考虑考虑呗", vbYesNo) = vbNo Then
MsgBox "有车有房",,"慢慢想，没关系"
MsgBox "我妈会泅水",,"慢慢想，没关系"
MsgBox "家务我做",,"慢慢想，没关系"
MsgBox "零食你吃",,"慢慢想，没关系"
End If
End Sub
--------------我是朋分线，不要复制我----------------
阿谁线它本身会加。
- 6
还要写文字的：
- 7
最后在点击文件-生当作exe，点击试验一下结果吧
- 8
作者有事，不克不及写太多更具体的，有需要可以联系作者。
百度网盘下载链接：
https://pan.baidu.com/s/1gPh_calKESN24PqUwGyvWQ 密码：l6ev
VB6.0精简版下载链接：
https://pan.baidu.com/s/1PYT5sSXIP2n1BdIj3botIA 密码：pacd
注重事项
- 有两个版本，一个是边教边做的，一个是本身琢磨出来的，本身琢磨出来的比力完美。
- 快去脱单吧。
- 发表于 2018-08-11 00:00
- 阅读 ( 2158 )
- 分类：其他类型
