精致玩家小KK 精致玩家小KK
关注数: 7 粉丝数: 271 发帖数: 4,674 关注贴吧数: 2
请问这个排版如何处理? 我有一个txt文档有很多段书写格式如下的数据 <Music      Index="101"      Name="Let's Play~ Rudolf~"      Image="rnr_image/img_music/music_105.bmp"      File="rnr_script/music/e_song52.xml"      Level="5"      Genre="Carol Remix"      Artist="SEED9"      Coin="0"          Stat="4" ></Music> B="亚服,韩服,日服,国际服" <Music      Index="102"      Name="Jinglebell La la"      Image="rnr_image/img_music/music_102.bmp"      File="rnr_script/music/e_song53.xml"      Level="4"      Genre="Carol Remix"      Artist="SEED9"      Coin="0"          Stat="4" ></Music> B="亚服,韩服,日服,国际服" <Music      Index="103"      Name="Get Up"      Image="rnr_image/img_music/music_187.bmp"      File="rnr_script/music/e_song104.xml"      Level="3"      Genre="K-pop"      Artist="Jessica. H.O."      Coin="0"          Stat="4" ></Music> B="韩服" =============================================== 一共6个文档1500多段.... 我昨天发现这样书写不正确,应该把 B="XXX" 这一项移到      Stat="X"   这一项的后面,即移动后变成像下面这一段的结构 <Music      Index="100"      Name="First Sight"      Image="rnr_image/img_music/music_87.bmp"      File="rnr_script/music/e_song39.xml"      Level="3"      Genre="Dance"      Artist="Jenny"      Coin="0"          Stat="4"          B="国服,韩服" ></Music> 1500多段不好办,请问VB文件操作代码如何把它们批量处理?我最近也刚学到文件操作,但只教我读和写,kill函数都不讲,真是的...
帮妈妈做工资计算器,遇到几个困难 妈妈说厂里老是少给她二三十工资,积少成多,亏死了 帮她做个计算器,输入1~31号的加班钟数(如果只有30号则31号里输入0,二月份同理) 我遇到以下问题: 1.不会写判断输入月份后,1~31哪个日子是星期六\日,我知道是WeekDay函数,但是如果我输入七月份,程序如何会WeekDay2010年七月份的日期呢?它好像只是在WeekDay本月份的日期而已,这个就不会了~~~ 2.然后输出总工资,如果没有If的两种情况我就会输出,但两种情况都存在时,如何在计算完第一种情况后把第二种情况的总工资都加上并输出?而且我调试中输出的总工资太不对了 她周一到周五加班每小时6.03元 周六日加班每小时8.046元 法定假日都加班就每小时12.07元 基本工资为700元,且不算上基本工资,我只要算出她要计算那个月的加班工资再笔算上那700就行了 Option Base 1 Dim H(31) As Single Dim GZ1 As Currency    '正常加班工资 Dim GZ2 As Currency    '休息日加班工资 Dim GZ3 As Currency    '法定节假日加班工资 Dim Mon%     '月份 Dim Dayy%    '天数 Dim NormalMoney As Currency      '常规计算的加班工资总额 Dim SpecialMoney   As Currency     '法定假日加班工资总额 Private Sub Command1_Click() Form1.Cls GZ1 = 6.03 GZ2 = 8.046 Mon = InputBox("你想计算2010年几月份的工资?") '然后根据输入的月份来确定下面的i(日期)在哪天是周六日的代码 For i = 1 To 31 Step 1 NormalMoney = 0 H(i) = InputBox(i & "号你加班多久?")      If Weekday(i) = 6 Or Weekday(i) = 7 Then '如果是周六日就用以第二条公式计算          NormalMoney = NormalMoney + GZ2 * H(i)          Print i; "号的加班工资为"; GZ2 * H(i)      Else '否则用第一条公式计算          NormalMoney = NormalMoney + GZ1 * H(i)          Print i; "号的加班工资为"; GZ1 * H(i)      End If Next i      Print NormalMoney '输出加班总工资 End Sub Private Sub Command2_Click() Form1.Cls GZ3 = 12.07 Dayy = InputBox("本月你加班多少天?") For i = 1 To Dayy Step 1      H(i) = InputBox("本月第" & i & "个法定假日加班了多久?")      Print "第"; i; "个法定假日您的加班工资为"; GZ3 * H(i)      SpecailMoney = SpecailMoney + GZ3 * H(i)      Next i Print SpecailMoney '输出加班总工资 End Sub
热烈庆祝练习机报名订收帖突破500楼! 热烈庆祝[旧]R2B练习机永久订收报名帖突破500楼!!!       http://tieba.baidu.com/f?kz=592741012     (重新发一个报名帖明确指引大家报名订收,此旧帖不再登记报名邮箱,请勿旧的报名帖)     首先感谢 百度贴吧-自制音速吧 这个交流平台!!!     其次感谢各位网友的支持!!!     再是感谢R2B练习机工作室同“同事”们!!!     截止501楼为止,除开重覆发帖、灌水和无效邮箱的回复,订收报名帖一共 登记了400多位不同玩家的邮箱!4个专题QQ群一共有760位以上练习机用户(重 覆加群的已经在日前T出重覆的群,所以除非是开小号进,否则一般不会有重覆 的人,共760位),5群已经筹备好随时待命,4群将满人的时候随即开放。          R2B练习机最早于2009年3月8日发布在自制音速吧,当时还是没有声音只有 障碍的版本,那是我2月份双手练习RP时获得的一份灵感,古时候也曾想像过把 无限的浮云单独练习,可惜买了传说中的“免费练习卡”却不是如此功能!天 真不可笑,可笑的是太天真?没错,我太天真了,一直没有放弃这个幻想,终 于等到单机被一位女网友破译了!我们那可爱的祖师爷Lindas,大家都要谢谢 您!根据大家的建议,经历1个多月对音乐的剪剪接接,终于在4月14日发表了 配音版的R2B练习机,下载量从50+程式到100+,但是只有纳米下载资源,还是 有很多人下载不了;1.03版提供了纳米,RayFile和大米盘下载,提高了下载的 可行性,但还是只加了30多人气;1.04版更新中还提供邮件下载,因为下载次 数7次以上会提示满200人下载,很烦恼,但还是有的人下载到了,在1.05版的 时候决定用24个马甲QQ向大家发邮件,每个QQ发满7个人就不用,换下一个,定 时检查每个邮箱的附件是否满7次下载,满的就删掉重新上传文件,再发给新的 7个人……好麻烦呃~~~还发表订收帖子让大家留邮箱报名订收,然后1.06版时 才知道原来可以“保存到我的中转站”再下载,于是邮件带上了这个教程,乐 观的是每一版的新办法都使练习机的支持人数有所提升!1.07版更新后成立了 R2B练习机工作室,当时只有VB程序员负责做启动器,我浅薄的VB编程知识不能 帮他什么,只能提供程序逻辑思路,他也很配合我的指导去做,还有一个做歌 技术勉勉强强的助手,和一位室内设计师负责封面;当时我工作和家事有点多 了,邮件工作有点顾不来,然后↓ KK:123 答:321 KK:1234567 答:7654321 KK:牙膏我们用田七 答:田七不用看牙医 KK:对得好!马上招你进练习机工作室! 答:= =     这位可敬的邮递员,至今都天天经常盯着4个分群的聊天窗口看有没有新手 要邮件,有请求的就给他发过去,并且定时查看练习机订收帖的回复邮箱,及 时传递邮件。邮件好发,但操作繁锁!到今天,练习机工作室已经拥有以下团 队人员
韩服观战模式-看看韩国人跑R2 今天下午专门去网吧装韩服录的,,忘了把那聊天房的也录下,聊天房还有个播放器自动播放PAK里的POP音乐呢- -   播放哪些哪些,或哪些随机播放,看服务器怎么设置,应该有专人管这个聊天室的。。。就好像在个音乐大厅,聊天中虽然不觉察但音乐一首接一首,聊天室的气氛感觉很不错!在那发呆,或者逛来逛去撞下韩国妹- -,不经意嘴碰了嘴,擦肩而过了,哈哈```下面奉上一些游戏视频,我都在做观众看看他们怎么跑 以后可以应用到这个模式去观察新手,新月亮,新太阳普遍的心理障碍在哪里,哪些地方多摔,统计一下,相应地出台从入门到精通的一套练习歌 (观战模式:当房间满人时进入,会提示大概“房间已满人,是否暂时进行观战?”的意思,确定后进行观战,貌似会默认分配到最高经验值那位玩家的镜头,游戏开始后,如果最高经验的玩家在4号位置,你的视觉范围就以4号位为准,点击其他玩家名称右边的按钮会切换到他们位置的视角进行观战,再点一下当前观战的玩家按钮则会变成反向观察角度,比如默认从后面观察,像平时玩的角度,按一下会变成前方观察,这个有点邪恶,邪恶之处就不说了,大家自己想。。。我相信Linda等女孩子某种情况下不希望被观战- - 不过这个视角我觉得很有趣,看着障碍貌似突如其来,人物就闪闪闪,或当着你面前摔~~~部分模特玩家的样子貌似很凶地向你跑过来,,不顾一切地闪过枪林弹雨……我第一次进去观战时就碰到了那个With家族2人组队在虐人,居然忘了按录制键,,,开的是通牒呢,挺精彩,,旁边有个“天上飞”家族的高手在跟他们斗,是韩国的家族,只是也用中文名而已。) Video.No1-多彩生活
练习机1.08更新-迷惘中*_* 由于N个原因,1.08计划中的官方歌曲仿制进度一再又一再地受到阻挠,主要是配K音工程上的问题,要配起来非常。。。非常非常的费劲,计划是30号更新,等大家国庆放假有得下更新资源来玩的,但是到时候发出来的歌可能与计划中的差很远,起码少一半歌不能完全仿出来,那么,我想请大家投个票,决定下一版要怎么出歌 选择1:障碍仿制,配上K音与官方的一样更新。。。 选择2:剩下不能完全仿的,XML对录制的游戏MP3都要发布(但以后更新会给这些歌制造“对音版换K音版”的功夫) 懂的,认真想想就回复个选择序号 不懂的。。告诉你,第1个,就是歌曲仿制到与官方几乎一致才更新,第2个是半成品,你玩起来看起来一致,其实音质上还是有差异的次品仿制歌,以下是计划中已经完成的,提前爆一爆吧 已经完成 CS 西班牙斗牛士 月亮音速日记 Hey! Mr.Big 乒乓·浮云 眉飞色舞·机车 止战、舞吧舞吧、雪糕桶生风换K音 K工程中:双截棍、龙拳 K音未完成(障碍已经仿制完毕,要质量差的,直接可以配上MP3发布。。。) 星星 OnlyYou 呜拉巴哈 真的爱你 飘飘 梦里花 月亮 蛋炒饭 半夜 犬夜叉 龙拳 双截棍 波间带 最后回想到一句,某练习机Fans提及过:宁缺勿滥…… 不知大家是意下如何 补充:练习机启动器可能更新一个  消音  和  变速  功能,变速的难度稍大,但工作室会努力的!有人能帮忙找找VB编程里变速齿轮效果的的相关代码吗?
庆祝下~练习机邮件超过100次下载了 现在用群4637110的群共享来放练习机的更新包了 以后邮件会少传,没有完整端的才邮件发,有的就进群下更新包 在那邮件少传的时代开始之前先纪念下…… 居然超过100次下载了,嘿嘿 教下大家吧,如果有什么资源要发邮件给好多人,发送的时候,在收件人那上面有一个“分别发送”的选择~~点一下它,好像发过去后,这封邮件的每一位收件人都会得到唯一的拥有权,而不是共有这份邮件,所以他下载多少次,不影响其他收信者的下载次数 至今仅收到5宗上报不能下载的,都显示超200次下载次数,用别的Q发也不行,可能是他们机子问题。。!?(有可能吗 再用第3个马甲发的时候他们才下载到了 不过基本上,90%以上的收信者都一次性下载到了该超大附件,已经是102次了,嘿嘿。。。不过相信在1.05出之前应该上不了200次吧? (放水:1.05可能出  最后的问候,诺言,U-GO-GIRL,Sk8er Boi,中国话,孤军规律,世界第一魔法,Cosmic Elevator,On My Style,K音版狂轰,K音版JUMP OVER,K音版或OST对音版维纳斯,表白,骑士精神。。。但因为我的做歌技术垃圾,所以都要为对不准音的障碍进行调校,,进度又慢,可能有的歌出不来~~请问有没有对音高手愿意来帮帮我?我需要这样的助手~~``Linda姐姐今晚训我啦~~节奏感很差呢!!!
首页 1 2 3 4 下一页