微信公开课

微信公开课小程序热门讨论「Ubuntu linux desktop版与sever版有什么不同？为什么desktop比sever的iso文件大？」最新回复-前者是桌面版本，后者是服务器版本，服务器因为没有x桌面系统，所以要小一些
server版就是各种非图形化的软件（比如apache,bind,cacti等deamon）比较多，用来做服务器的软件。desktop版就是图形化软件比较多，比如各种浏览器、游戏、图形化小程序、图像处理软件等等。图形化软件普遍都比较大，所以如果数量多了，1000个图形化软件的尺寸基本上肯定会比1000个命令行软件要大。而事实上，Linux图形化软件的数量也确实比命令行软件要多一些。 更多有关「Ubuntu linux desktop版与sever版有什么不同？为什么desktop比sever的iso文件大？」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「ui怎么设置button被选中后的背景颜色」最新回复-1，通过按钮的事件来设置背景色(void)viewDidLoad{[superviewDidLoad];UIButton*button1=[[UIButtonalloc]initWithFrame:CGRectMake(50,200,100,50)];[button1setTitle:@button1forState:UIControlStateNormal];button1.backgroundColor=[UIColororangeColor];[button1addTarget:selfaction:@selector(button1BackGroundHighlighted:)forControlEvents:UIControlEventTouchDown];[button1addTarget:selfaction:@selector(button1BackGroundNormal:)forControlEvents:UIControlEventTouchUpInside];[self.viewaddSubview:button1];}//button1普通状态下的背景色(void)button1BackGroundNormal:(UIButton*)sender{sender.backgroundColor=[UIColororangeColor];}//button1高亮状态下的背景色(void)button1BackGroundHighlighted:(UIButton*)sender{sender.backgroundColor=[UIColorgreenColor];}2,通过把颜色转换为UIImage来作为按钮不同状态下的背景图片(void)viewDidLoad{[superviewDidLoad];UIButton*button2=[[UIButtonalloc]initWithFrame:CGRectMake(170,200,100,50)];[button2setTitle:@button2forState:UIControlStateNormal];[button2setBackgroundImage:[selfimageWithColor:[UIColorredColor]]forState:UIControlStateNormal];[button2setBackgroundImage:[selfimageWithColor:[UIColorgrayColor]]forState:UIControlStateHighlighted];[self.viewaddSubview:button2];}//颜色转换为背景图片(UIImage*)imageWithColor:(UIColor*)color{CGRectrect=CGRectMake(0.0f,0.0f,1.0f,1.0f);UIGraphicsBeginImageContext(rect.size);CGContextRefcontext=UIGraphicsGetCurrentContext();CGContextSetFillColorWithColor(context,[colorCGColor]);CGContextFillRect(context,rect);UIImage*image=UIGraphicsGetImageFromCurrentImageContext();UIGraphicsEndImageContext();returnimage;}
//// ViewController.m// 通过代码导入图片//// Createdbyyonson14-5-24.// Copyright(c)2014年wangjunzhuang.Allrightsreserved.//#importViewController.h@interfaceViewController()@end@implementationViewController-(void)viewDidLoad{[superviewDidLoad];//Doanyadditionalsetupafterloadingtheview,typicallyfromanib.//创建按钮UIButton*btn=[[UIButtonalloc]init];NSLog(@viewdidiload-----%p,btn);//设置按钮的尺寸、位置btn.frame=CGRectMake(0,0,100,100);//设置按钮的背景图片 普通状态下的UIImage*normal=[UIImageimageNamed:@t15.tiff];[btnsetBackgroundImage:normalforState:UIControlStateNormal];//设置文字和颜色[btnsetTitle:@点我吧！forState:UIControlStateNormal];[btnsetTitleColor:[UIColorredColor]forState:UIControlStateNormal];//创建高亮状态下的按钮//设置按钮的背景图片UIImage*hight=[UIImageimageNamed:@bd1121-45-10-244.tiff];[btnsetBackgroundImage:hightforState:UIControlStateHighlighted];//设置文字和颜色[btnsetTitle:@不要啊！forState:UIControlStateHighlighted];[btnsetTitleColor:[UIColorgrayColor]forState:UIControlStateHighlighted];//监听按钮点击[btnaddTarget:selfaction:@selector(btnClick:)forControlEvents:UIControlEventTouchUpInside];//传到父类[self.viewaddSubview:btn];//创建一个文本框UITextField*mytext=[[UITextFieldalloc]init];//设置文本框的大小mytext.frame=CGRectMake(100,100,100,50);//给文本框背景颜色mytext.backgroundColor=[UIColorblueColor];//给文本框设置在中点的位置CGFloatcenterX=self.view.frame.size.width*0.5;CGFloatcenterY=self.view.frame.size.height*0.5;mytext.center=CGPointMake(centerX,centerY);mytext.tag=99;//设置字体大小mytext.font=[UIFontsystemFontOfSize:30];//将对象添加到父类[self.viewaddSubview:mytext];}#pragmamark监听按钮点击的状态-(void)btnClick:(UIButton*)btn{NSLog(@-----%p,btn);//打印被点击地址。}#pragmamark 点击屏幕任意位置收起键盘-(void)touchesBegan:(NSSet*)toucheswithEvent:(UIEvent*)event{[self.viewendEditing:YES];}-(void)didReceiveMemoryWarning{[superdidReceiveMemoryWarning];//Disposeofanyresourcesthatcanberecreated.}@end 更多有关「ui怎么设置button被选中后的背景颜色」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「vb  小程序 计算器 【急！】」最新回复-你很幸运,找到了以前的一个小程序PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click,Button2.Click,Button3.Click,Button4.Click,Button5.Click,Button6.Click,Button7.Click,Button8.Click,Button9.Click,Button10.Click,Button11.Click,Button12.Click,Button13.Click,Button14.Click,Button15.Click,Button16.Click,Button17.Click,Button18.ClickStaticnum,sum,flag,sflagAsIntegernum当前输入的数sum当前的结果flag取值中0代表空,1代表+,2代表,3代表*,4代表/,5代表=sflag0代表继续输入,1代表结束输入SelectCaseDirectCast(sender,Button).NameCaseButton1.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(1)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(1)num=1EndIfsflag=0CaseButton2.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(2)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(2)num=2EndIfsflag=0CaseButton3.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(3)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(3)num=3EndIfsflag=0CaseButton4.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(4)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(4)num=4EndIfsflag=0CaseButton5.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(5)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(5)num=5EndIfsflag=0CaseButton6.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(6)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(6)num=6EndIfsflag=0CaseButton7.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(7)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(7)num=7EndIfsflag=0CaseButton8.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(8)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(8)num=8EndIfsflag=0CaseButton9.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(9)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(9)num=9EndIfsflag=0CaseButton10.NameIfsflag=0ThenTextBox1.Text=TextBox1.Text&CStr(0)num=CInt(TextBox1.Text)ElseTextBox1.Text=CStr(0)num=0EndIfsflag=0上面是数字的取得CaseButton11.Name+TextBox1.Text=CStr(sum)flag=1sflag=1CaseButton12.NameTextBox1.Text=CStr(sum)flag=2sflag=1CaseButton13.Name*TextBox1.Text=CStr(sum)flag=3sflag=1CaseButton14.Name/TextBox1.Text=CStr(sum)flag=4sflag=1CaseButton15.Name进行+/*各种运算Ifflag=1Thensum=sum+numTextBox1.Text=CStr(sum)ElseIfflag=2Thensum=sumnumTextBox1.Text=CStr(sum)ElseIfflag=3Thensum=sum*numTextBox1.Text=CStr(sum)ElseIfflag=4Andnum0Thensum=sum/numTextBox1.Text=CStr(sum)ElseIfflag=5Thensum=sumTextBox1.Text=CStr(sum)EndIfflag=0sflag=1CaseButton16.NameCE清除num=0sum=0flag=0sflag=0TextBox1.Text=CaseButton17.Name删除num=0CaseButton18.Name退出EndEndSelectEndSub不过有点小bug,就是第一次运算会不成功.
我做好了，放在我的网盘里http://ys-b.ys168.com/?jsq.exe_50c2bsp0d6ejkisp0cp5bsqjt1bktrrm7b5bsqjksp2bu01f20f01z 更多有关「vb  小程序 计算器 【急！】」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「VB 小程序 计算器」最新回复-你还不如用EXCEL做=(A1/B1)*(C1/D1)*((PI()*90)/3)如果非用VB,百度Hi我吧PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Cells(1,A)==PI()Cells(1,B)=下面的4个框中输入Z1234的备选值,多个值用逗号隔开Cells(2,A)=Z1Cells(3,A)=Z2Cells(4,A)=Z3Cells(5,A)=Z4Dimz1,z2,z3,z4Dima1,a2,a3,a4DimnRow,OutRowz1=Split(Cells(2,B),,)z2=Split(Cells(3,B),,)z3=Split(Cells(4,B),,)z4=Split(Cells(5,B),,)nRow=7OutRow=(UBound(z1)+1)*(UBound(z2)+1)*(UBound(z3)+1)*(UBound(z4)+1)Cells(6,B)=共&OutRow&条结果Range(Cells(nRow,A),Cells(nRow+1000,B)).ClearRows(nRow).ClearOnErrorResumeNextFora1=0ToUBound(z1)Fora2=0ToUBound(z2)Fora3=0ToUBound(z3)Fora4=0ToUBound(z4)Cells(nRow,A)=(&z1(a1)&/&z2(a2)&)*(&z3(a3)&/&z4(a4)&)*((&Cells(1,A)&*90)/3)Err.ClearCells(nRow,B)=(z1(a1)/z2(a2))*(z3(a3)/z4(a4))*((Val(Cells(1,A))*90)/3)IfErr.Number0ThenCells(nRow,B)=除数不能为0EndIfnRow=nRow+1NextNextNextNextEndSub
dimz1asdouble,z2asdouble,z3asdouble,z4asdoubledimpiasdouble,dasdoublepi=3.14159z1=val(txtZ1.text)z2=val(txtZ2.text)z3=val(txtZ3.text)z4=val(txtZ4.text)d=(z1*z2*pi*90)/(z2*z4*3) 更多有关「VB 小程序 计算器」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「vbs整人小程序代码.手机可以用吗」最新回复-VBS文件手机是不能打开的，但可以将它嵌入到网页文件上，有的手机浏览器是支持HTML文件的，但是VBS代码中的大部分在手机上都不能用，如调用外部程序什么的，因为那是Windows的代码，不过手机可以支持msgbox、inputbox等函数，嵌到网页中的方法是新建一个文本文档，扩展名改为html，在里面输入scriptlanguage=vbscript/script，输入vbs代码时在两个括号中间输入，不过可能和vbs文件不太一样，如scriptlanguage=vbscriptmsgbox哈哈！/script不过手机还是推荐用JS脚本，举个例，弹出对话框scriptlanguage=vbscriptalert(哈哈！);/script如果你有能力你可以直接把做出的html文件上传到一个域名上，然后在手机直接输入网址打开，或者文件传到手机上打开测试你的手机浏览器是否支持JS插件：在浏览器地址栏上输入javascript:alert(哈哈！)然后回车，如果能弹出对话框说明支持JSVBS的方法：输入vbscript:msgbox(哈哈！)回车，同上望采纳
绝对不可以，不是同一系统。 更多有关「vbs整人小程序代码.手机可以用吗」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「VB将指定文本文件复制到剪贴板」最新回复-复制到剪切板的主要代码：Clipboard.SetTextstr示例（示例文件1.txt）：Openc:1.txtForInputAs#1Clipboard.ClearClipboard.SetTextInput(LOF(1),1)Close#1其中的Clipboard.Clear表示清空剪切板（推荐清空一次）如果是使用相对路径的，c:1.txt改为App.Path&1.txt读取剪切板主要代码：s=Clipboard.GetText()
exe我已发PrivateSubForm_Load()OpenApp.Path&cpu.txtForInputAs#1LineInput#1,aClipboard.ClearClipboard.SetTextaCloseEndEndSub本回答被提问者采纳 更多有关「VB将指定文本文件复制到剪贴板」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「vb求教程，如何做下图小程序」最新回复-晚上给你一个吧我也是看到这个才写的一个小程序随电脑自启动有100+句小情话每天随机出现读者必须在10秒后输入“老公我爱你”才能关闭这个窗口不知道是否合适您当前的需求
去这里看教程吧更多追问追答追问就是没有教程啊..追答点上面的去这里看教程就进去看了追问？？？知乎答主没有发教程追答网页打开以后点里面的字，看不到吗？追问？什么？没看到啊知乎啊没有教程 更多有关「vb求教程，如何做下图小程序」的疑问请扫码关注微信公开课+小程序！

微信公开课小程序热门讨论「VF  几个小程序」最新回复-其实这些问题都比较简单啦gets(fenshu);switchcasefenshu=91andfenshu=100printf(优秀);break;casefenshu=81andfenshu=90printf(良好);break;casefenshu=71andfenshu=80printf(中等);break;casefenshu=60andfenshu=70printf(及格);break;elseprintf(不及格);break;SETTALKOFFFORx=0TO100FORY=0TO100FORz=0TO100IF3*x+5*Y+z/3=100ANDx+Y+z=100?公鸡、母鸡、小鸡的数量分别是：,x,Y,zENDIFENDFORENDFORENDFORRETU
gets(fenshu);switchcasefenshu=91andfenshu=100printf(优秀);break;casefenshu=81andfenshu=90printf(良好);break;casefenshu=71andfenshu=80printf(中等);break;casefenshu=60andfenshu=70printf(及格);break;elseprintf(不及格);break; 更多有关「VF  几个小程序」的疑问请扫码关注微信公开课+小程序！