请问高手，怎样列出一控件的所有属性和对应的值。

Question

大哥你好，最近颇困惑：）
请问大哥可否赐教关于用VB画图的技巧！尤其是菱形！
拜托了！很急的！
我的QQ4081531
邮箱[email protected]

Answer 1

在
  Private Sub Form_Load()  End Sub中赋值

Answer 2

Private Sub Form_Load()
     
    dim intTop as Integer
    dim intLeft as Integer
    dim intHeight as Integer
    dim intWidth as Integer
    '调入窗体时读取数据
    intTop = GetSetting(App.EXEName, "FormPostion", "TOP", 100)
    intLeft = GetSetting(App.EXEName, "FormPostion", "Left", 100)
    intHeight = GetSetting(App.EXEName, "FormSize", "Height", 400)
    intWidth = GetSetting(App.EXEName, "FormSize", "Width", 400)
    me.Top=intTop
    me.Left=intLeft
    me.Width=intWidth
    me.Height=intHeight 
End Sub
Private Sub Form_Unload(Cancel As Integer)
  '退出窗体时保存数据
  SaveSetting App.EXEName, "FormPostion", "Top", Str(me.Top)
  SaveSetting App.EXEName, "FormPostion", "Left", Str(me.Left)
  SaveSetting App.EXEName, "FormSize", "Height", Str(me.Height)
  SaveSetting App.EXEName, "FormSize", "Width", Str(me.Width)  
End Sub

Answer 3

我的问题是在设定一个控件后，将它的所有属性存起来，比如用MS Chart控件，用户可能设定图形的显示方式，我要将它保存起来，以便用户下次进入时不用再设置图形的显示方式。