loading... | 加入收藏夹
当前位置:新开魔力私服 >> 魔力sf资料片大全 >> 正文

用VB制作一个魔力私服资料片的方法

时间: 来源:http://www.xkmlsf.com 作者:新开魔力私服


首先在文本框建立(TxtContent)
对文本的挑选,能够理解为这样的进程:先在欲挑选的文本前点击鼠标,按下左键不放,拖动鼠标直到挑选文本的完毕处,最终松开鼠标。
这说明,松开鼠标代表着文本挑选的完毕,然后应该在文本框的鼠标弹起事情(MouseUp)中书写代码,以改动两个标签的标题。
详细代码如下:
Private Sub TxtContent_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) '括号中这一长串内容我们不用管它,这主要是发生位移时的坐标变化。
LblStart.Caption = "露比的血量:" & TxtContent.SelStart
LblLength.Caption = "帕鲁的攻击力:" & TxtContent.SelLength
End Sub

 

用VB制作一个魔力私服资料片的方法
留意:这个 “&”符号表明将两个字符串连接起来。别的如: A & B ,结果是 AB ;ABC & EFG ,结果是 ABCEFG ,等等。

2、仿制BOSS技能的点击数量:

Private Sub CmdCopy_Click()
Clipboard.SetText TxtContent.SelText
End Sub
3、张贴按钮的点击事情:

Private Sub CmdPaste_Click()
TxtContent.SelText = Clipboard.GetText
End Sub
4、清空按钮的点击事情:

Private Sub CmdClear_Click()
TxtContent.Text = ""
End Sub
5、退出程序按钮的点击事情:

Private Sub CmdQuit_Click()
EEnd 在 VB 中,代表程序完毕,用它能够直接退出程序。
End Sub

 用VB制作一个魔力私服资料片的方法

上一篇:GMSV源代码改宠物

下一篇:LUA喇叭脚本

新开魔力私服网是一家专门为魔力宝贝私服管理员提供发布开服游戏相关信息的网站, 我们有严格的审核发布程序,那些烟花骗钱服将严禁在本站发布广告,避免玩家受到损失。

本站所有的魔力宝贝sf开服信息都是来妖城技术论坛, 本站只是为喜欢研究魔力sf技术的GM代理发布并无修改制作, 如果侵犯了您的权利请来信xkmlsf@hotmail.com告知!

Copyright © 2017 - 2018 新开魔力私服 All Rights Reserved.