vb如何模拟鼠标右键点击弹出xp菜单

vb打印问题

Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4

'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......

vb修改DTPicker1日期问题

Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Chec ......

vb使用picturebox控件

我想使用picturebox控件画图
我的sql数据库中数据表名字是udata，其中有两列，一列是sdatetime，另一列是data。我想用其中的sdatetime列的数值（时间）作为横坐标，data列的数值（数据）作为纵坐标。
在一个新 ......

VB 做监控系统

我想用VB做监控系统，界面如图：

点击操作组上的按钮有相应的显示，当然显示的内容不一样，显示区域是主体，在中间那块：

怎么实现这个功能啊？用visible属性就太复杂了！
请大家教教我！
一 ......

VB读多行文本

一个多行的text
如果把每一行放入一个字符串上呢?
lineinput

VB code:
Private Sub Command1_Click()
Dim TextLine

Open "d:\test.txt" For Input As #1 ' 打开文件。
Do Whi ......