噶嘛呢么哪
噶嘛呢么哪
关注数: 5
粉丝数: 15
发帖数: 319
关注贴吧数: 28
求科鲁兹电路图 求科鲁兹电路图求科鲁兹电路图
科鲁兹电路图 求科鲁兹电路图求求了
求科鲁兹电路图 各位大佬,科鲁兹电路图从哪里搞求求了求求了
我发现不管是啥事,没干之前都是正常中规中矩的,只要自己亲身体验了之后,就会有各种负面消息,不好的地方全都暴露出来了。感觉运气不好还是怎么滴
求助贴,求助贴 新疆的一个小县城县直属单位硕士引进值得去吗,按照专业面试成绩啥的分配岗位,优点是离家近,求助各位大佬指点迷津,急需你们的高见,在线等,很着急
铁子们,西部管道没有消息,我是不是无了啊 我是不是无了啊
为什么消息发不过去啊 铁子们,面试的机会要没了,呜呜呜,完蛋了,快来救命啊,救命啊救命啊🆘🆘🆘🆘🆘🆘🆘🆘🆘🆘🆘🆘🆘🆘
有没有收到移动面试通知的啊 有没有收到移动面试通知的呀,太慌了。
通奥检测怎么样 兄台们,通奥检测怎么样啊
vb的webbrower浏览器用不了呢 Private Sub Form_Load() '消除弹窗 WebBrowser1.Silent = True '程序装入后进入IE设定的起始页 WebBrowser1.Navigate "http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Fhttp%3A%2F%2Fcxfw.jtyst.xinjiang.gov.cn%2Fhome%2Findex&urlrefer=5a77f5796ce7c62d16cfbaa5b6a324fa" '0.5s响应一次 Timer1.Interval = 500 '宏定义量进行赋值 inf = 9999 '数据库初始化 End Sub Private Sub Timer1_Timer() If qq = 3 Then '只执行一次 '移动网页 WebBrowser1.Document.parentwindow.scrollby 280, 460 '消除滚动条 WebBrowser1.Document.Body.Scroll = "no" '缩放 WebBrowser1.Document.Body.Style.Zoom = 0.75 End If qq = qq + 1 End Sub
vb的WebBrowser浏览器打不开网址呢 Private Sub Form_Load() '消除弹窗 WebBrowser1.Silent = True '程序装入后进入IE设定的起始页 1.Navigate "http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Fhttp%3A%2F%2Fcxfw.jtyst.xinjiang.gov.cn%2Fhome%2Findex&urlrefer=5a77f5796ce7c62d16cfbaa5b6a324fa" '0.5s响应一次 Timer1.Interval = 500 '宏定义量进行赋值 inf = 9999 '数据库初始化 End Sub Private Sub Timer1_Timer() If qq = 3 Then '只执行一次 '移动网页 WebBrowser1.Document.parentwindow.scrollby 280, 460 '消除滚动条 WebBrowser1.Document.Body.Scroll = "no" '缩放 WebBrowser1.Document.Body.Style.Zoom = 0.75 End If qq = qq + 1 End Sub 运行的截图如下,求大佬指点,如拨云见日,茅塞顿开啊
救救我,救救我winsock实时实时错误40006 服务器Private Sub Command1_Click() Call Winsock1.SendData(Text2.Text) Text2.SelStart = Len(Text2.Text) Text1.Text = Text1.Text & vbCrLf & "我:" & Text1.Text & Text2.Text Text1.Text = "" End Sub Private Sub Form_Load() Winsock1.LocalPort = 1000 Winsock1.Listen End Sub Private Sub Winsock1_Close() Winsock1.Close Winsock1.Listen End Sub Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long) If Winsock1.State <> sckClosed Then Winsock1.Close End If Call Winsock1.Accept(requestID) End Sub Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim message As String Call Winsock1.GetData(message) Text2.Text = Text2.Text & vbCrLf & "对方:" & message Text2.SelStart = Len(Text2.Text) End Sub 客户端 Private Sub Command1_Click() Call Winsock1.SendData(Text2.Text) Text2.SelStart = Len(Text2.Text) Text1.Text = Text1.Text & vbCrLf & "我:" & Text1.Text & Text2.Text Text1.Text = "" End Sub Private Sub Form_Load() Winsock1.LocalPort = 1000 Winsock1.Listen End Sub Private Sub Winsock1_Close() Winsock1.Close Winsock1.Listen End Sub Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long) If Winsock1.State <> sckClosed Then Winsock1.Close End If Call Winsock1.Accept(requestID) End Sub Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim message As String Call Winsock1.GetData(message) Text2.Text = Text2.Text & vbCrLf & "对方:" & message Text2.SelStart = Len(Text2.Text) End Sub 运行截图
昌吉新变厂怎么样 hr 说一万一一个月,到手不知道多少啊
哪位老哥讲一下国企和私企最大的区别
老铁们,生成的exe离开源文件后,换个电脑还能用吗 老铁们,生成的exe离开源文件后,换个电脑还能用吗,现在在隔离,没有其他的电脑
vb过程太大 用了好几个select case,一个套一个,差不多套了5个,运行后显示过程太大,麻烦大佬指点指点,菜鸡实在没辙了
1
下一页