更改中键默认键问题?

xml_ug

c里的程序是这样的：
             data.item_id=MY_FILENAME;
             data.item_attr=UF_STYLER_VALUE;
- U. G5 ~) U( M) k' _. Q4 _4 @: d             data.value.string = title;
              UF_STYLER_set_value(dialog_id,&data);
# b9 w3 K9 r% i! Q) G7 j             DefaultAction.item_id = UF_STYLER_NAV_INDEX;
( R* c) z6 d2 G4 ~             DefaultAction.item_attr = UF_STYLER_DEFAULT_ACTION;
- h- X( Q1 b( v2 L. c             DefaultAction.subitem_index = UF_STYLER_APPLY_INDEX;
2 E% ~/ R' ?. q- X' m, f* X             UF_STYLER_set_value(dialog_id, &DefaultAction);
             UF_STYLER_free_value(&DefaultAction);

在ＶＢ．ｎｅｔ里能不能实现。
; q6 h# t: O& N  r6 E' P: ~