更改中键默认键问题?

xml_ug

c里的程序是这样的：
             data.item_id=MY_FILENAME;
$ B% M# H) T; g7 J$ x$ R- @             data.item_attr=UF_STYLER_VALUE;
             data.value.string = title;
2 I9 f% X# D3 Y0 l# h. r9 N# `- C              UF_STYLER_set_value(dialog_id,&data);
! U5 J4 j& s( p4 _( P7 {* \             DefaultAction.item_id = UF_STYLER_NAV_INDEX;
3 \2 y7 i, v$ @# e+ o7 e             DefaultAction.item_attr = UF_STYLER_DEFAULT_ACTION;
5 v$ g- ~2 K- N$ d0 b             DefaultAction.subitem_index = UF_STYLER_APPLY_INDEX;
             UF_STYLER_set_value(dialog_id, &DefaultAction);
             UF_STYLER_free_value(&DefaultAction);

在ＶＢ．ｎｅｔ里能不能实现。