spendtimetodo还是doing
vb里要在界面上做一条抛物线,该用什么控件?怎么弄出来?
Me.Picture1.Line (-Me.Picture1.ScaleWidth \/ 2, 0)-(Me.Picture1.ScaleWidth \/ 2, 0), vbRed Me.Picture1.Line (0, Me.Picture1.ScaleHeight \/ 2)-(0, -Me.Picture1.ScaleHeight \/ 2), vbRed Me.Timer1.Interval = 1 x = Int(-Me.Picture1.ScaleWidth \/ 2)Me.Label2 = ...
vb6.0中要是一个变量p每大约10秒加1的代码该怎么写
在窗体中加入timer控件，将它的interval属性设置为1000，然后在timer1_timer事件中加入如下代码：Private Sub Timer1_Timer()p = p + 1 End Sub p的初始值要在全局中设置一下，比如初始值为：p=0即可
vb恶搞是什么?怎么做
恶搞就是让运行了恶搞软件的显示屏出现一些怪异显现，让不知情者差异的行为。如以下代码算是一个没有破坏力的小小恶搞吧，运行后会让客户电脑的桌面所有图标及“开始”不停闪烁。当然重启电脑或关闭进程后就会恢复啦。使用方法：打开vb6，在一个新窗体中画一个时间控件Timer1即可，属性默认，复制以下代码...
p=n!(n!=1*2*3*3...*(n-1)*n,n由键盘键入)
Private Function cacl(num As Long) As String Dim numlen As Long, last As Long, x As Long Dim i As Long, m As Long, n As Long, nl As Long, s0 As String Dim result() As Long, starttime As Single, s() As String numlen = 1 starttime = Timer ReDim result(1 To ...
VB6.0 扫描端口
Timer1_Timer End Sub 2、屏幕监控 当服务器系统发现TCP异常连接时,可通过屏幕监控功能将局域网中被监控工作站的屏幕画面抓取到服务器中并实施相应措施,如对工作站锁机或关机等。此处用到WINSOCK控件,其通讯原理请参阅相关资料,屏幕监控功能用到TCP协议,为了达到更好的效果,可在窗体中加入TIMER控件,设定TIMER事件...
VB有趣的问题
你是要做一个类似 ClickMe！的整人的程序吗 先把Form1的BorderStyle改成0-None，再添加一个CommandButton，然后添加以下代码 Private Sub Command1_Click()Unload Me'相当于End End Sub Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Form1.Top ...
【急】asp如何文件上传
lngTime = clng(timer()*1000) Set binForm = Server.CreateObject("ADODB.Stream") Set binItem = Server.CreateObject("ADODB.Stream") Set objForm = Server.CreateObject("Scripting.Dictionary") objForm.CompareMode = 1 End Sub Private Sub Class_Terminate objForm.RemoveAll Set objForm = nothing Set...
一个VB的编程问题
要建一个intel控件 Dim xx As String, yy As String, url As String Dim t As Double url = "http:\/\/www.xxxx.com\/xxxx.txt"Inet1.Cancel Inet1.Execute url, "get"t = Timer Do DoEvents If Inet1.StillExecuting = False Or Abs(t - Timer) > 20 Then Exit Do Loop xx = ""Do...
用vb做全局鼠标键盘钩子。。。求助。。
If List1.ListIndex >= List1.ListCount - 1 Then Form1.Caption = "记录鼠标": CC = "停锁记录鼠标": YhFu: Timer2.Enabled = FalseEnd Sub'鼠标左键点击Private Sub ZuoDanJi()mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, 0&, 0& '模拟鼠标点击End Sub'鼠标中键点击...
急!请教RS485串口通讯的问题
Private Sub TmrComm_Timer()'采用轮循法采集数据 Dim Rx_buff() As ByteDim okstring As StringDim ReceivedLen As IntegerOn Error GoTo ErrorHandlerTmrComm.Enabled = False '关闭定时器If commport.InBufferCount > 0 ThenReceivedLen = commport.InBufferCountRx_buff = commport.Inputokstring = StrConv(...
惠安县新生回答： somebody spend sometime in doing sth 某人花时间做某事 同样的结构还可以说: somebody spend some money in doing sth某人花钱做某事 同样的意思我们还可以用以下方式表达: somebody spend sometime(moeny) on sth 某人把钱或时间花在某事某物上
抄蔡15695801654问： spend ...to do对么 - ？
惠安县新生回答： spend可以加to do,也可以加on doing的~至于spend后面普遍都是加时间加to do的~ 望楼楼采纳哦~O(∩_∩)O~
抄蔡15695801654问： 是spend to do 还是spend doing - ？
惠安县新生回答： spend time on doing sth.或者spend time doing sth.on是可以省略的 spend sth on sth也是可以的 speaking practice doing sth.(练习做某事),practice后面的动词必须加-ing,固定用法. 问题补... 而practice无论本身是什么形式,后面的动词都要加-ing,明白了吗?其用法与＂enjoy, finish＂等类似.
抄蔡15695801654问： spend time+ on 还是 in sth. - ？
惠安县新生回答： 应该是是spend time on sth.或者spend time in doing sth.spend的主语必须是人,常用于以下结构: (1) spend time /money on sth. 在……上花费时间(金钱).例: I spent two hours on this maths problem. 这道数学题花了我两个小时. (2) ...
抄蔡15695801654问： spend to do 和 spend doing的区别 ?不要复制!!! - ？
惠安县新生回答： 楼主,应该没有spend to do这样的搭配 spend 只有 spend time do sth/ (in)doing sth和spend time with sb三种用法而已... 你是在哪里看到的呢?to do 应该是其他词组的搭配被你误以为是和spend一起连用了吧... 或者你把这个词组的出处或句子告诉我我可以分析给你看...
抄蔡15695801654问： spend to do和spend doing有什么区别呀? - ？
惠安县新生回答： spend是及物动词啊,而且没有spend sth to do sth 的形式啊,只有spend sth on (doing )sth或spend sth doing sth/with sb
抄蔡15695801654问： spent - be spent后面加doing还是to do ？
惠安县新生回答： spend + 时间/钱 + (in) doing sth spend + 时间/钱 + on sth 变成被动语态时,后面的doing sth和 with sth不变. 例如: He spent two hours reading last night. Two hours was spent reading by him last night.
抄蔡15695801654问： 英语中 什么时候用doing 什么时候用to do 详细点的 - ？
惠安县新生回答： doing和to do 都可以做非谓语结构.1,后者更多是用于表示目的的.2,前者多用于及物动词,介词后,目的性较弱,通常是或现在或过去或未来正在进行的;而后者用于及物动词和介词之后时,目的性较强
抄蔡15695801654问： 是to do 还是doing - ？
惠安县新生回答： 有些动词后既可接to do,也可接doing,它们后接to do与doing在意思上有时有较大的差别.因为它们也是中考的常考点之一,因而我们应该搞清楚它们的区别. 1. stop to do/stop doing sth.解析:stop to do sth.意为“停下来(正在做的事)去...
