sanoa的个人资料

【原创科幻小说】反击流浪星球看完《流浪地球》，产生一个想法，如果有其他星球，向流浪地球一样，来到我们太阳系，那我们该怎么应对呢？想来想去，如果对方真的有移动星球的能力，那么，以我们现在的科技水平，可能真的无法与之对抗。所以，写了《反击流浪星球》这个小说，虽然，文中给人类开了个挂，但是，最后还是设定了一个开放结局。

【原创】反击流浪星球看完《流浪地球》，产生一个想法，如果有其他星球，向流浪地球一样，来到我们太阳系，那我们该怎么应对呢？想来想去，如果对方真的有移动星球的能力，那么，以我们现在的科技水平，可能真的无法与之对抗。所以，写了《反击流浪星球》这个小说，虽然，文中给人类开了个挂，但是，最后还是设定了一个开放结局。请各位多多点评，谢谢。

C2做的游戏《最强火力2》在4399发布了，请各位多提意见╰(*°▽°*

C2做的游戏《最强火力2》在4399发布了，请各位多提意见╰(*°▽°* 使用键盘和鼠标操作，可以捡取物品，可以换弹药……

【高考话题】大数据告诉你：读什么专业最有“钱”途又是一年高考季！身为过来人，最近经常有朋友来咨询孩子选学校和专业的问题。学校的选择，有待各自高考分数的揭晓，专业的选择现在就可以开始了。不少同学可能高考前就已经早早立下志向，但大部分同学可能与当年的我一样，高考后的内心十分迷茫：什么专业最有“钱”途？当下热门的专业，未来前景如何？经多方咨询与大数据比较，时下最热门专业主要是“金融相关专业”和“互联网相关专业”。那么，站在考生家长的角度，这两个专业，谁最有“钱”途呢？

社会竞争那么残酷，要么赢要么输，为什么不做赢的一方？一楼大鸡蛋，镇楼。

转贴:电影《忠烈杨家将》三郎-周渝民-弓箭对决电影《忠烈杨家将》三郎(周渝民)与敌方弓箭手的最后对决片段…… 电影《忠烈杨家将》三郎-周渝民-弓箭对决_电影相关_电影_bilibili_哔哩哔哩弹幕视频网来自：http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.bilibili.com%2Fvideo%2Fav8146868%2F&urlrefer=2f8968ff393fe1647d57c5ac0f1336f8

Lumia526使用windows insider体验Win10M (Build 10586.107) Lumia 526使用windows insider体验Windows 10 Mobile (Build 10586.107) 用升级顾问测试了一下，说Lumia 526不能升级win10M，好失望。到官网找信息，也没有明确表示526可以升级Win10M。只好通过 Windows Insider（Windows 预览体验）来体验一把Win10M。为了保险起见，选择了Release Preview 版本。但是，第一次升级，体验很不好，各种无故死机，然后各种扣电池。可能是我在升级中途强行关机了一次（因为在升级的第19步，等的时间太长）。还好没有变砖。于是，当天，又通过Windows Device Recovery Tool 将 526又刷回了wp8.1。lumia Cyan。但，糟糕的体验挡不住一颗骚(zuo)动(si)的心。我将手机里能删除的数据都删除了，将能卸载的应用都卸载了。又一次，升级了Win10M。在漫长的等待之后，这次没再手贱关机，终于又升级到了Windows 10 Mobile (Build 10586.107) 。虽然，不太流畅，但总算没有遇到死机。

悲剧了，用升级顾问测试了一下，说不能升级win10 一楼防度娘。。。。

cm的usb调试打不开怎么办？ cm的usb调试打不开怎么办？开发者选项一开。开启android调试，点击返回，再进入，android调试又是灰色状态了。重启也不行。数据线连接电脑也没有反应。请问各位这种情况要怎么办？

电源图标是怎么个情况？电脑升级win10后。在插电的情况下，点击电源图标出现，电量情况、电源和睡眠设置、亮度调节等提示。如图：在使用电池的情况下，点击多少次都不出现。如图：这是win10系统的问题，还是电脑的问题？各位有没有遇到这种情况？

电源图标是怎么个情况？ pcpad升级win10，重置了一次。在插电的情况下，点击电源图标出现，电量情况、电源和睡眠设置、亮度调节等提示。如图：在使用电池的情况下，点击多少次都不出现。如图：这是win10系统的问题，还是pad的问题？各位有没有遇到这种情况？

手机号码格式错误是什么意思？选择30元话费-预订类，显示“对不起，要充值手机号码格式错误，不能完成充值”是什么意思？手机号码没有输入错误啊？？？

收入又回来啦，暂时安心啦。。。早晨看的时候，全部都是0，心中一片凉啊现在收入又回来啦。暂时安心了。

收入又回来啦。早晨看的时候，全部都是0，心中一片凉啊早晨看的时候，全部都是0，心中一片凉啊现在收入又回来啦。暂时安心了。

手机有道词典4.0.1各种打不开…… 今天更新了手机有道词典，新版4.0.1。 16Mb啊结果各种打不开…… 我勒个去。。。。只能删掉，重新安装3.6。我的流量啊……

上周五，【咳嗽星人】在【雾霾恶魔】的帮助下，攻占了我公元2013年1月18日，周五，【咳嗽星人】在【雾霾恶魔】的帮助下，攻占了我的【咽喉】要塞。然后，【咳嗽星人】以粗暴的手段在我的【咽喉】要塞进行大肆破坏，以让我不断咳嗽的方式，宣布它们的胜利。战火一度波及到我的【气管】主通路，和【肺部】给氧中心。我请Water军队来压制，但收效甚微。

重温灌篮高手之后的胡思乱想 1l留空……

现在买进建设银行，7月15能不能分红？现在买进建设银行，7月15能不能分红？谢谢！！！

永远的毁灭公爵通关了，发帖庆祝一下永远的毁灭公爵通关了，发帖庆祝一下哈哈哈哈…… 感觉不好说，跟其他FPS游戏相比，除了爆粗和色_情内容，也没太多突出。有时解密多于战斗，而且一点提示都没有，卡关是经常的事。这也许是跟那些一路扫射过关的游戏最大的不同吧。

T的地堡可以卖掉，要是其他建筑也可以卖就好了 T的地堡可以卖掉，很爽，钱不够的时候可以凑钱其他建筑不能卖，很不爽，尤其是气矿，气矿不像星际1，枯竭了，还能采气，采完气就孤零零的杵在那，很不爽啊

亲爱的别走亲爱的别走献给2008年5月12日大地震中的遇难者以及在此次地震中失去亲人的人们！还未来得及说声再见还未来得及端详你的脸你已离开我的世界远走到天边耳边还萦绕着你的笑睡梦中还见到你的脸而你却已不再我的身边再也无法听我深情的呼唤好想再亲亲你的脸好想再拉起你的手好想说声亲爱的别走可是我已无法将你挽留亲爱的别走我拼命忍着不让泪流没有你的世界我要如何承受亲爱的别走可我如何说的出口只能默默祝福祝愿你一路好走

《荣誉勋章:血战太平洋》士兵语音（部分）血战太平洋采用的小队作战，其中：Frank(法兰克，队长)，Willy（威利，狙击手），Jimmy（吉米，军医），是永远不会死的。除了过场动画，在作战时，队友会给你语音信息，其中主要是Frank和willy发出语音，下面我记得的部分语音写下：Move up！前进（出现提示时，上方向键）Grenade！Take Cover！手雷，找掩护Grenade! Grenade, Tom! 手雷，手雷，汤米、注意手雷，汤米（敌人扔手雷过来，其他人就会喊，主角好像没有这么“意识”）Fall Back！后退Take Cover! 找掩护！（出现提示时，下方向键）Reload！我在装弹Cover Me! 掩护我I'm Out！没子弹了（出现提示时，右方向键）I got ya! Cover fire!火力掩护 Over Here！在这里、集合（出现提示时，左方向键）Hold Fire！That's All of them！停火，把敌人歼灭了。That's It!Save Your Ammo！没人了，注意节省子弹。（一场战斗过后，队友们就会喊）Watch Your Ammo！看着你的子弹、你打到我了。（误伤自己人就会听到）I can't see them！我找不到他I lost him. Where is he?!他在哪里？Tommy just smoked their captain/officer! 汤米，干掉他们的头Nice shot, Tommy/Willy! 打得好，汤米/威利

将excel的图表用picture控件显示显示 '“工程”——“引用”：microsoft excel x.0 object library'添加command，list，picture控件Dim Excelvb As ObjectDim Exchart As ObjectSub ChartSh()Dim i%Set Excelvb = CreateObject("Excel.Application")'Excelvb.Visible = TrueExcelvb.Workbooks.Open "c:\1.xls"Set Exchart = Excelvb.ChartsOn Error Resume NextDoi = i + 1List1.AddItem Exchart(i).NameIf Err.Number > 0 Then Exit DoLoopEnd SubPrivate Sub Command1_Click()call ChartShEnd SubPrivate Sub Form_Unload(Cancel As Integer)Set Exchart = NothingExcelvb.QuitSet Excelvb = NothingEnd SubPrivate Sub List1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)Clipboard.ClearExchart(List1.Text).ChartArea.CopyPicture1.ClsPicture1.Picture = Clipboard.GetData(3)End Sub

十六进制、八进制快速转换为十进制 vb 提供了hex函数十进制-->十六进制oct函数十进制-->八进制却没有提供“dec函数” 把数值转换为十进制但是我们可以使用编程实现把十六进制（八进制）转换为十进制最近我发现一个快捷的方法，o(∩_∩)o...就是在数值前加上 “&H”（&O）就可以啦如：十六-->十num="FFFF"val("&H"& num)就是十进制了八进制-->十进制：num=7777val("&O"& num)就是十进制了

繁体、简体都是中文字，有什么好吵的 1楼留给百度

请求帮助运行XACT，出现could not connect to a windows auditioning server.咋回事啊？

【原创】西瓜大战在丛林深处，一棵高大的松树前面坐着一个白胡子的老人，在老人前面的大树桩上摆着一本厚厚的红皮书，旁边的树杈上还挂着一个画板……　　干咳了几声之后，老人开始说话：“今天，我给大家讲一个蚂蚁与小鸟的故事。”　　“哗啦，哗啦……”　　老人翻开书页，开始念道：“从前，有一只蚂蚁不小心掉进了水池里……”　　（老人旁边的画板上切换出一幅蚂蚁坐在自己的澡盆里，却大喊着救命的图片。）　　“这时，一只小鸟从空中飞过，听到了蚂蚁求救的声音……”　　（剧务拿着竹竿钓着一只手工的纸鹤，在画板前晃来晃去。）　　“小鸟叼了一片树叶扔进水里，蚂蚁爬上树叶得救了……”　　（画板上的图片切换：蚂蚁裹着树叶形状的浴巾站在澡盆外面。）　　“蚂蚁非常感谢小鸟，对它说道：‘谢谢你救了我，我一定会报答你的。’小鸟听到蚂蚁的话，心想：一只小小的蚂蚁能为我做什么呢？于是，笑了笑，飞走了……”　　（剧务晃动着竹竿将纸鹤移出画面。）　　“一天，小鸟飞累了，蹲在树枝上休息……”　　（画板上图片切换：一只鸟蹲在树枝上，一个猎人举枪瞄准了它。）　　“这时，一个猎人偷偷的瞄准了这只在树枝上休息的……”，老人将书翻过一页，继续念道：“苍蝇……”　　“苍蝇？”图片中的猎人惊讶的叫道。　　“苍蝇？”小鸟也惊讶的叫道。　　“苍蝇？”剧务也十分惊讶。　　“呃？苍蝇？”老人也很纳闷。他赶紧抱歉的笑着说道：“对不起，各位，也许是翻错页了，等我找一找。”　　“哗啦，哗啦……”　　他迅速的翻了几页，念道：“美女与苍蝇？！哦，不对！”　　“哗啦，哗啦……”　　又翻了几页，“苍蝇总动员？！也不是。”　　“哗啦，哗啦……”　　又翻了几页，“苍蝇王？！哦——，天哪！”　　“哗啦，哗啦……”　　这次翻了更多页，“加勒比苍蝇？！”　　“哗啦，哗啦……”　　这次翻到了最后一页，“最后的苍蝇？！”　　“哦，该死！”老人气的跳起来对着红皮书连踢带打，甚至跳上树桩对着红皮书狠狠的跺了几脚，最后一脚把红皮书踢了出去……　　当他重新坐下来时，尴尬的笑着说道：“很抱歉，各位。希望大家不要像我一样买盗版的书来看……”　　“好啦，现在，让我给你们讲一个新的故事吧，蚂蚁与苍蝇的故事——西瓜大战！”

【原创】短信情歌（嘟……，嘟……，嘟……，您所拨打的电话暂时无人接听，请稍候再拨……）不知小小的手机能否装下我的心一句我爱你就让它反应不灵70个字的限定让话语减了又精不知你是否能读懂我的心意拇指在键盘上舞蹈输入我的心情喜怒哀乐的故事都想分享给你偶尔开个玩笑你不要生气猪头猪脑猪尾巴那不是说你*小小一封短信表达我的情意祝福你健康、快乐祝你永远开心就算世界再大你永远在我心里没事发个短信告诉你——我好想你（安红，俺想你！）啦…… 啦……啦…… 啦……发送一封短信向你表达我的心祝你温柔、漂亮永远美丽就算追你的男人再多我也不惧一天一封短信告诉你——我永远爱你*（男声：美女，嘻嘻……，我好爱你啦）（女声：话费太贵了，有事你还是给我发短信吧）话费总是太贵漫游还得加倍有事发个短信快捷又实惠优美的拇指运动能让你锻炼身体70个字的限定还能让你开发智力Repeat *——*啦…… 啦……啦…… 啦……（男声：咦？怎么我发了这么多短信，她都不回呢？打个电话试试……）（拨号声……）（对不起！您所拨打的电话已停机！）（男声：啊？！）

【新人报到】sanoa 新人报到,新人报到

【原创】《西瓜大战》在丛林深处，一棵高大的松树前面坐着一个白胡子的老人，在老人前面的大树桩上摆着一本厚厚的红皮书，旁边的树杈上还挂着一个画板……干咳了几声之后，老人开始说话：“今天，我给大家讲一个蚂蚁与小鸟的故事。”“哗啦，哗啦……”老人翻开书页，开始念道：“从前，有一只蚂蚁不小心掉进了水池里……”（老人旁边的画板上切换出一幅蚂蚁坐在自己的澡盆里，却大喊着救命的图片。）“这时，一只小鸟从空中飞过，听到了蚂蚁求救的声音……”（剧务拿着竹竿钓着一只手工的纸鹤，在画板前晃来晃去。）“小鸟叼了一片树叶扔进水里，蚂蚁爬上树叶得救了……”（画板上的图片切换：蚂蚁裹着树叶形状的浴巾站在澡盆外面。）“蚂蚁非常感谢小鸟，对它说道：‘谢谢你救了我，我一定会报答你的。’小鸟听到蚂蚁的话，心想：一只小小的蚂蚁能为我做什么呢？于是，笑了笑，飞走了……”（剧务晃动着竹竿将纸鹤移出画面。）“一天，小鸟飞累了，蹲在树枝上休息……”（画板上图片切换：一只鸟蹲在树枝上，一个猎人举枪瞄准了它。）“这时，一个猎人偷偷的瞄准了这只在树枝上休息的……”，老人将书翻过一页，继续念道：“苍蝇……”“苍蝇？”图片中的猎人惊讶的叫道。“苍蝇？”小鸟也惊讶的叫道。“苍蝇？”剧务也十分惊讶。“呃？苍蝇？”老人也很纳闷。他赶紧抱歉的笑着说道：“对不起，各位，也许是翻错页了，等我找一找。”“哗啦，哗啦……”他迅速的翻了几页，念道：“美女与苍蝇？！哦，不对！”“哗啦，哗啦……”又翻了几页，“苍蝇总动员？！也不是。”“哗啦，哗啦……”又翻了几页，“苍蝇王？！哦——，天哪！”“哗啦，哗啦……”这次翻了更多页，“加勒比苍蝇？！”“哗啦，哗啦……”这次翻到了最后一页，“最后的苍蝇？！”“哦，该死！”老人气的跳起来对着红皮书连踢带打，甚至跳上树桩对着红皮书狠狠的跺了几脚，最后一脚把红皮书踢了出去……当他重新坐下来时，尴尬的笑着说道：“很抱歉，各位。希望大家不要像我一样买盗版的书来看……”“好啦，现在，让我给你们讲一个新的故事吧，蚂蚁与苍蝇的故事——西瓜大战！”

太阳能手机电池DIY 现在全国手机用户已突破5亿户，可以说手机已经成为人们必不可少的电子用品，但随之而来的是给手机电池充电的问题，虽然手机厂商已经推出了大容量、可以支持超长待机的手机电池，但再超长待机的电池还是需要充电的……下面是几款可以DIY的手机充电设备，面前只停留在理论基础上，有条件的朋友可以试验一下，但不保证一定成功……一：太阳能手机电池：原理：简单的将太阳能电池与手机电池连接在一起。示意图：1、

求助任务栏出现问题原来任务栏都是这个样子的如下图

need help关于mschart 1.如何在mschart中设置2y轴啊？2.y轴坐标可以翻转么？（像excel里那样）

FlashPlayer 2006-12-22更新：增加载入、保存、删除列表功能，增加截图功能，增加全屏播放功能，增加文件重命名功能， …… 可调节背景色，可添加网络上的Flash文件播放并保存，支持文件拖放，将Flash文件拖放到窗口自动播放并添加到播放列表， ………… 制作：龙之心 Email:[email protected] 无毒无害，绝不添加任何防腐剂…… 如果有好的意见＆建议，欢迎大家发送Email至[email protected]. 需要Flash9.ocx控件，把IE的Flash播放插件升级到最高就行了…… http://file1.x5dj.com/DownLoad.aspx?UserID=624058&ShowcaseID=612234&Key=7F4FDE5FC3FCD11E5DAEED96A78479D7E97A12B822D67277C1D9F3110080BBE6

VB + FlashPlayer 2006-12-22更新：增加载入、保存、删除列表功能，增加截图功能，增加全屏播放功能，增加文件重命名功能，……可调节背景色，可添加网络上的Flash文件播放并保存，支持文件拖放，将Flash文件拖放到窗口自动播放并添加到播放列表，…………制作：龙之心Email:[email protected]无毒无害，绝不添加任何防腐剂……如果有好的意见＆建议，欢迎大家发送Email至[email protected].需要Flash9.ocx控件，把IE的Flash播放插件升级到最高就行了……http://file1.x5dj.com/DownLoad.aspx?UserID=624058&ShowcaseID=612234&Key=7F4FDE5FC3FCD11E5DAEED96A78479D7E97A12B822D67277C1D9F3110080BBE6

VB如何把这样的图片显示成完整的？如下图好像是一座房子，怎么把它显示成完整的？还有*.x文件是怎么来的？

毁灭公爵毁灭公爵1

新鲜的排序问题（N组数一起排）有几组数如：1234……1111121131234……1111121131234……111112113…………把这些数按组（从1到113）从大到小排序，113112111……321113112111……321…………有以下条件：1.最小值、最大值未知 2.最小值与最大值之间的数字并非顺序排列 3.数组多少未知

如何将111111转换成11:11:11格式？如题……如何将一个等于或者小于六位的数转换为时间格式？

控制欢迎界面是否显示 macromedia fireworks MX 在打开时有一个等待界面显示加载信息这种效果用vb做一个borderstyle=0的窗体就可以，而且还可以控制等待窗体是否显示新建工程，form1中加入Timer1，Check1form1的属性：borderstyle=0startupPosition=2其他自定义……Timer1属性：Enabled=falseInterval=1000（随便，不要太长，也不要太短）其他自定义……Check1属性：value=0其他自定义……添加窗体form2编辑菜单:文件Mnufile……显示欢迎画面 Mnusplash添加模块Module1代码：form1：Option ExplicitPrivate Sub Check1_Click() Call SaveEnd SubPrivate Sub Skip() Load Form2 Form2.Show Timer1.Enabled = False unload meEnd SubPrivate Sub Form_Load() Call Check If varstr = "Skip" Then Call Skip Exit Sub Else Call Clear End If Timer1.Enabled = TrueEnd SubPrivate Sub Timer1_Timer() Call SkipEnd SubForm2:Private Sub Form_Load() Call Check If varstr = "Skip" Then MnuSplash.Checked = False '不显示 Else MnuSplash.Checked = True '显示 End IfEnd SubPrivate Sub MnuSplash_Click() If MnuSplash.Checked = False Then Call Clear 'Clear为显示 MnuSplash.Checked = True 'True为显示 Else Call Save 'save为不显示 MnuSplash.Checked = False 'False为不显示 End IfEnd SubModule1:Public filename As StringPublic varstr As StringPublic Function Check() filename = App.Path & "\config.txt" Open filename For Input As #1 Line Input #1, varstr Close #1 End FunctionPublic Function Save() filename = App.Path & "\config.txt" Open filename For Output As #1 Print #1, "Skip" Close #1End FunctionPublic Function Clear() filename = App.Path & "\config.txt" Open filename For Output As #1 Print #1, "" Close #1End Function在"工程"——“工程1属性”选“启动对象”为“form1”此方法也可用来做Tips，只不过要Form2加载form1而已不过，有个问题：config.txt不存在的话，要出错我记得哪里看到过，判断文件是否存在的代码找了半天都没有找到最近真是健忘阿……

如何查找某字符串中是否含有某一个字符？例如： Dim filename1 As String filename1 = CommonDialog1.FileName我想知道filename1中是否含有"."以判定filename1为“XXXX.扩展名”形式还是“XXXX”形式哪位知道该怎么样做哩？帮帮忙，ok？

在mdiform中如何从form2窗体中得知form1已打开？如题！！求各位帮帮忙，谢谢啊！

哪里有d2video.mpq文件下载？我想要看暗黑过场动画，可惜d2video.mpq文件只有16kb，哪里有d2video.mpq文件下载啊？

如何在关闭程序时跳出确认框？好多程序在关闭时都跳出确认框，选择“是”关闭程序，选择“否”，程序不关闭，这种效果如何实现？