易截截图软件、单文件、免安装、纯绿色、仅160KB

VB Timer控件

用VB中的Timer控件 可以获得时间
但是如果电脑上的时间显示不正确 那岂不是获得的时间也是不正确的

怎么获得正确的时间
连网，从别的地方获得
引用
用VB中的Timer控件 可以获得时间
但是如果电脑上的时间显示不正确 那岂不是获得的时间也是不正确的

怎么获得正确的时间

用Now獲得電腦系統時間(Date&Time)
按照楼主的说法，无法获得准确的时间，因为只有相对，没有绝对。
使用Now函数可以获得你的计算机的当前时间。
http://www.nokiamobile.org.cn/post/1287444.html
Private Sub Command1_Click()
Winsock1.Connect "stdtime.gov.hk", 13
End Sub

Private Sub Winsock1_Close()
Text1.Text = Text1.Text & vbCrLf & "关闭连接"
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim tmpstr    As String    '13端口返回的是字符串数据类型！！！
      Winsock1.GetData tmpstr
      Text1.Text = tmpstr
      Winsock1.Close '大家帮我看看这条语句有必要吗？
End Sub


引用
用VB中的Timer控件 可以获得时间
但是如果电脑上的时间显示不正确 那岂不是获得的时间也是不正确的

怎么获得正确的时间


Timer控件（定时器）主要不是用来获得当前时间的�


相关问答：

为什么C写DLL文件C、PB能调用VB不能调用

为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？

1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......

vb+sql

在VB中，如何执行下面的SQL语句
Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber='0001'
比如：
cn.execute("Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber=&# ......

vb MSFlexGrid1.Row 实时错误'30009'Row数值无效

代码如下：
Private Sub MSFlexGrid1_SelChange()
  If MSFlexGrid1.Rows = 1 Then Exit Sub
  If MSFlexGrid1.Row = 0 Then Exit Sub
 
  grid_row = MSFlexGrid1.Row
......

VB 文本框

字符串 m1="E"
字符串 m2="F"

如果text1.text=m1+m2的话  则text1显示的是 EF

但是如果
字符串 m1="E"
字符串 m2="6"
如果text1.text=m1+m ......

vb隐藏代码

  用vb做好的软件，想要加入自动隐藏的功能，在那添加啊，还有隐藏的代码那有啊    借用一下    谢了
方法1
Private Sub Form_Load()
Me.Height = 1 * Screen.TwipsPerPixelY
Me ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号