VB请高手注释下

问题描述

OptionStrictOffOptionExplicitOnPublicClassForm2InheritsSystem.Windows.Forms.FormDimaAsString'声明变量DimbAsStringPrivateSubButton15_Click_1(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton15.ClickEndEndSubPrivateSubTextBox2_TextChanged(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesTextBox2.TextChangedEndSubPrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Clickb=CStr(1)a=a&bTextBox2.Text=aEndSubPrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.Clickb=CStr(2)a=a&bTextBox2.Text=aEndSubPrivateSubButton3_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton3.Clickb=CStr(3)a=a&bTextBox2.Text=aEndSubPrivateSubButton4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton4.Clickb=CStr(4)a=a&bTextBox2.Text=aEndSubPrivateSubButton5_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton5.Clickb=CStr(5)a=a&bTextBox2.Text=aEndSubPrivateSubButton6_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton6.Clickb=CStr(6)a=a&bTextBox2.Text=aEndSubPrivateSubButton7_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton7.Clickb=CStr(7)a=a&bTextBox2.Text=aEndSubPrivateSubButton8_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton8.Clickb=CStr(8)a=a&bTextBox2.Text=aEndSubPrivateSubButton9_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton9.Clickb=CStr(9)a=a&bTextBox2.Text=aEndSubPrivateSubButton10_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton10.Clickb="*"a=a&bTextBox2.Text=aEndSubPrivateSubButton11_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton11.Clickb=CStr(0)a=a&bTextBox2.Text=aEndSubPrivateSubButton12_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton12.Clickb="#"a=a&bTextBox2.Text=aEndSubPrivateSubButton13_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton13.ClickTextBox2.Text="num:"a="num:"EndSubPrivateSubButton14_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton14.ClickIf(TextBox2.Text="")ThenTextBox2.Text="对不起,请输入号码!"ElseTextBox2.Text="正在通话中哦!请稍后!"'a="num:"EndIfEndSubPrivateSubForm2_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Loada="num."EndSubEndClass另外希望高手可以帮我组织下语言,这要怎么讲!顺便问一下,为什么我在调试的时候,.net会提示出没有将程序设定成可调试。先谢了哦!

解决方案

解决方案二:
这有什么可讲的?没有设定为可调式的问题,你关了.net,删除工程下的bin文件夹,再开即可。或者找到bindebug將文件的只读属性去掉就行了。
解决方案三:
还是不行啊!我是做了一个登陆框,账号和密码输进去的时候,整个登陆框就卡住了,页面转换不过去,怀疑是不是没有连接到数据库啊!
解决方案四:
把代码打包发到ty51@sina.com刚你看看
解决方案五:
引用3楼xx22nn的回复:

把代码打包发到ty51@sina.com刚你看看

小心泄密呀嘿嘿
解决方案六:
在别的电脑上都可以运行,就是在我的电脑上不可以???
解决方案七:
东哥。。。。牛XX

时间: 2024-09-30 03:24:40

VB请高手注释下的相关文章

ip-关于物理层的问题,请高手看下

问题描述 关于物理层的问题,请高手看下 物理层屏蔽了Ethernet与IP的差异性,这句话错在什么地方?能解释一下吗? 解决方案 物理层是将数据变成可传输的比特流,而根据Mac和IP找地址那是数据链路层和网络层的协议.我感觉网络层区分了两者的差异.仅供参考 解决方案二: 网络层是不能区分的,只有比特流

源代码-COM控件编译连接成功 但手动编译总是失败 请高手指点下

问题描述 COM控件编译连接成功 但手动编译总是失败 请高手指点下 这几天做COM技术内幕第10章的例子,手动编译时碰到了麻烦,请高手指点下! 问题如下:(我用的是VS2013C++) 这一章的例子用到手动编译,我这方面没经验,总是出错,于是就想到把客户端,COM控件, 代理DLL,本地服务器分别用VS2013在IDE下做出来,前面的客户端,和COM控件我做出来 了,但COM控件手动编译总是出错.这个问题困了我好几天了,资料查了好多,但手动编译总是过不去. 下面是我的Makefile文件的内容:

匹配对象的属性和函数-请高手指教下,C#里面正则表达式如何匹配对象的属性和嵌套的函数

问题描述 请高手指教下,C#里面正则表达式如何匹配对象的属性和嵌套的函数 'M.smith pass :'+stu.count(iif(sc.avg(sc.getscore()) >60,1,0))+teacher.class 需要匹配出 1.sc,getscore() 2.stu,count(iif(sc.avg(sc.getscore()) >60,1,0)) 3.teacher.class 不需要比配单引号里面的 M.smith 解决方案 1.sc{1},getscore(){1} 2.

请高手指教下,C#正则表达式如何匹配对象的属性和嵌套的函数

问题描述 请高手指教下,C#正则表达式如何匹配字符串里面的对象的属性和嵌套的函数,对象的函数.属性名不确定.字符串如下"'M.smithpass:'+stu.count(iif(sc.avg(sc.getscore())>60,1,0))+teacher.class"需要匹配出1.sc,getscore()2.stu,count(iif(sc.avg(sc.getscore())>60,1,0))3.teacher.class不需要比配单引号里面的M.smith 解决方案

我是一名.net新手,我想在最短时间内做一个电子商务网站,需要注意些什么呢?有什么好的简单的方法吗!请高手指点下……谢谢

问题描述 我是一名.net新手,我想在最短时间内做一个电子商务网站,需要注意些什么呢?有什么好的简单的方法吗!请高手指点下我的目的是:快速开发使用方便基本功能要有!希望各位高手给点建议-- 解决方案 解决方案二:做吧!up!..解决方案三:照着别人的网站做就可以了解决方案四:电子商务..要求安全性高撒金额有关系的都要用事务存储过程..要注意防SQL注入服务器安全--------做电子商务不是做OA那么简单哦.很容易被人加攻击的.解决方案五:参考PetShophttp://msdn.microso

为什么程序老是进不了循环?请高手指点下 谢谢了~

问题描述 stringstrcon="IntegratedSecurity=SSPI;InitialCatalog=修改的;DataSource=(local);";SqlConnectioncon=newSqlConnection();con.ConnectionString=strcon;con.Open();SqlDataAdapterda=newSqlDataAdapter("SELECTDISTINCT*FROMbiao",con);DataSetds=n

请高手指点下HttpWebRequest类断点续传的代码,设置了AddRange()值后不起作用

问题描述 以下代码在前一次下载的文件基础上又下载了整个大小的源文件,请高手指点下,谢谢!DimaddressAsString="http://www.wowui.cn/down/wowui.rar"DimdownfileAsString="C:wowui.rar"'HTTP断点下载DimhttpreqAsHttpWebRequest=CType(WebRequest.Create(address),HttpWebRequest)DimhttpresAsHttpWeb

请高手看下,下面红色的动态Input上传的图片怎么没有赋值给PIC3

问题描述 请高手看下,下面红色的动态Input上传的图片怎么没有赋值给PIC3.上传图片将地址和文件名给PIC3,然后从数据库中取出并显示.当提交保存的时候,一直是数据库中旧的值.不知道问题出在哪儿?是不是循环中的动态input有问题?谢谢!<%dimpaixuifrs.EOFandrs.BOFthenresponse.Write"<divalign=center><fontcolor=red>还没有分类</font></center>&qu

在VS中编写PDA程序,遇到技术问题,请高手指导下

问题描述 在PDA中编写一个图片存储和读取的程序,语言是C#,图片以二进制的形式保存到数据库中,这一步可以做到,但是在编写读取图片的程序的时候,"Imageimage=Image.FromStream(buf,true);"无法使用,请各位大哥指教下,有没有方法解决 解决方案 解决方案二:Byte[]byteBLOBData=newByte[0];byteBLOBData=(Byte[])XXXXXX);MemoryStreamstmBLOBData=newMemoryStream(b