- 博客(3)
- 收藏
- 关注
原创 Form之间传递参数及调用过程小技巧
1 在 Form1 中 Private mForm As FormPrivate Sub Form_Initialize() Set mForm = New Form2 mForm .Init Me End SubPrivate Sub ShowForm() mForm.Params="Test" mForm.Show 1End SubPublic Sub msgT
2005-01-22 22:27:00 849
原创 VB6下接口的实现
一、接口的实现1、创建一ActiveX Dll Project,命名为ICom2、添加一类(接口),命名为IDog,设置一下属性和方法:Public Property Get Name() As StringEnd PropertyPublic Property Let Name(ByVal vNewValue As String)End PropertyPubli
2004-08-04 20:11:00 2233
原创 在VB6和VB.NET下分别获取汉字的字节
一、VB6下的实现: Dim str1 As String Dim str2 As String str = "汉" 双字节串 Dim array() As Byte 字节数组 arr = StrConv(str1, vb
2004-07-21 00:29:00 1263 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人